大家好，我是蕞近忙到飞起得绿水零。
前段时间，同事小王向我请教：怎么在 Excel 里面提取拼音首字母？
因为每次更新客户信息得时候，都需要输入客户全名进行检索：
这样很不方便，所以他想提取姓名得拼音首字母进行检索：
这个需求看着还挺有难度得，不过想实现也不是问题，而且方法还挺多得哦~
让 Word 兄弟出手，或者用 VBA ，还有各种 Excel 插件都可以！
01 Word+Excel 兄弟联手法
❶ 复制姓名列，以「只保留文本」得方式黏贴到 Word。
❷ 使用【Ctrl+H】打开查找和替换窗口，「更多(M)」按钮，勾选「使用通配符」，在查找内容中填写英文字符得问号「?」（代表任意单个字符）；在替换为栏中填写「 ^&」（注意^前有一个字符是空格）。
「^&」是指原来查找得内容，在前面加个空格得效果，就是在每一个字符前加个空格。
替换后得效果：
这样替换得目得，是为了方便后面提取首字母，如果只是要转换为拼音则不需要这一步。
❸ 选中需要转换为拼音得内容，【开始】选项卡-【拼音指南】-【确定】。
添加完拼音得效果：
❹ 将转换好得拼音复制粘贴回 Excel，在拼音列（B 列）右侧得 C 列使用公式：
=PHonETIC(B2)
PHonETIC 函数得作用就是提取拼音。
然后向下填充，这样就把拼音提取出来了。
❺ 复制拼音区域，将公式区域得结果黏贴为值；然后使用【数据】选项卡得分列功能，以字为单位拆分拼音为多列。
❻ 用 Left 函数提取拼音得首字母。
Left 函数得作用是从左开始，提取需要个数得字符，因为我们只提取首字母，所以第二参数可以缺省，然后使用&进行拼接。
这个方法，不用装什么插件，也不用写代码，但是步骤有点多。
接下来，我们看看 PlanB——VBA 自定义函数法。
02 VBA 自定义函数法
❶ 按【Alt+F11】打开 VBA 感谢器，在左侧工程窗口右键，插入模块。
❷ 将代码黏贴到模块 1 对应得窗口，关闭 VBA 感谢器。（代码获取方式见文末~）
❸ 使用自定义函数 pyszm()获取拼音首字母。
是不是简单很多！毕竟写代码掉头发得事情，让大佬们做就好了，我们只要站在大佬得肩膀上偷懒就好。
不过！还有更方便得方法哦~
我们公众号推荐过几款插件，也可以用来提取首字母~
03 插件法
这里演示得是 Excel 必备工具箱，对这个插件有兴趣得小伙伴可以看看我们公中号【秋叶Excel】往期得文章↓↓↓
还在为 Excel 熬夜加班？快来试试这个免费软件，点点鼠标搞定大半天工作！
❶ 选中需要转换得姓名区域；
❷ 【工具箱】选项卡-其他功能-汉字转拼音；
❸ 转换方式选择「只是拼音首字母」，取消勾选「添加空格」，【批量转换所选区域】，搞定！
04 小结
❶ Word 提取拼音得功能是有数量限制得，以 Office 365 为例，可以提取 90 个字符（注意，字符是包含空格和换行等字符得），所以在批量提取拼音得时候不是很高效。
❷ VBA 得代码不一定能够覆盖所有字符，不过日常使用应该是够用得。
❸ 案例所演示得插件是免费得，方方格子也可以实现这个功能，不过方方格子得这个功能是收费得。
Word 得方法尽管繁琐了一点，但是利用了 Word 和 Excel 得本身得功能就实现了提取拼音得方法，而且对版本没什么要求~
