e为大家准备了配套的案例文件(含代码)、Excel essential工具箱、方形网格安装包。

直接关注公众掌号【秋叶Excel】，回复【1020】！

大家好，忙得飞绿水。

前段时间同事小王问我:如何在Excel中提取拼音首字母？

因为每次更新客户信息时，都需要输入客户的全名进行检索:

这样很不方便，所以他想提取自己名字的拼音首字母进行检索:

这个需求看着挺难的，但是实现起来不是问题，方法也不少~

让Word兄弟来做，或者用VBA，还有各种Excel插件！

0Word+Excel兄弟联手法

复制名称栏，以“只保留文字”的方式粘贴到Word中。

使用[Ctrl+H]打开搜索和替换窗口，单击“更多(M)”按钮，选中“使用通配符”，并填写问号“？”(代表任意单个字符)；在替换为的列中填入“& ”(注意前面有一个字符空)。

“&”指的是原始搜索内容。前面加个空的效果就是每个字符前面加个空。

替换后的效果:

这种替换的目的是为了方便后面提取首字母，如果只是为了转换成拼音就没必要了。

选择要转换成拼音的内容，点击开始选项卡-拼音指南-确定。

添加拼音的效果:

将转换后的拼音复制并粘贴回Excel，并使用拼音列(B列)右侧C列中的公式:

=语音(B2)

语音功能用于提取拼音。

然后往下填，这样就把拼音提取出来了。

复制拼音区，将公式区的结果作为值粘贴；然后使用[数据]选项卡的排序功能将拼音按单词拆分成多列。

使用Left函数提取拼音首字母。

Left函数用于从左侧提取所需数量的字符。因为我们只提取第一个字母，所以可以默认第二个参数，然后使用&

这种方法不需要插件或代码，但是有几个步骤。

接下来，让我们看看计划B——VBA自定义函数方法。

0VBA自定义函数方法

按[Alt+F11]打开VBA编辑器，并在左侧工程窗口中右键单击以插入模块。

将代码粘贴到模块1的相应窗口中，并关闭VBA编辑器。(代码获取方法见文末~)

使用自定义函数pyszm()获取拼音首字母。

是不是简单多了！毕竟让大佬们去做写代码的掉头发就好了。我们只要站在老板的肩膀上偷懒就行了。

但是！有更方便的方法~

微信官方账号已经推荐了几个插件，也可以用来提取声母~

03插件方法

下面是Excel必不可少的工具箱。对这个插件感兴趣的可以看看我们中型【秋叶Excel】之前的文章

还在为Excel加班？来试试这个免费软件吧，只需点击一下鼠标就能完成大部分工作！

选择要转换的名称区域；

单击[工具箱]选项卡-其他功能-汉字转拼音；

选择“仅拼音声母”作为转换方式，取消选中“添加空框”，点击“批量转换选定区域”。搞定了。

04摘要

单词拼音提取的功能数量是有限制的。以Office 365为例，可以提取90个字符(注意字符包括空和换行符等字符)，所以批量提取拼音时效率不是很高。

VBA电码可能无法涵盖所有字符，但应该足够日常使用。

案例演示的插件是免费的，方格子也可以实现这个功能，但是方格子的这个功能是收费的。

Word的方法有点繁琐，但是利用Word和Excel的功能实现了提取拼音的方法，对版本没有要求~

你还知道其他有趣或实用的功能，可能会有点冷门？欢迎在留言区分享~

e为大家准备了配套的案例文件(含代码)、Excel essential工具箱、方形网格安装包。

直接关注公众掌号【秋叶Excel】，回复【1020】！