案例的拼音（原来简单的拼音）

小E为大家准备了本文配套案例文件（含代码），Excel 必备工具箱和方方格子安装包，

领取直接关注公棕号【秋叶Excel】，回复【1020】！

大家好，我是最近忙到飞起的绿水零。

前段时间，同事小王向我请教：怎么在 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 的本身的功能就实现了提取拼音的方法，而且对版本没什么要求~

你还知道哪些可能有点冷门，但又很有趣或者实用的功能吗？欢迎在留言区分享~

小E为大家准备了本文配套案例文件（含代码），Excel 必备工具箱和方方格子安装包，

领取直接关注公棕号【秋叶Excel】，回复【1020】！