1.打开一份Excel文档,在第一列输入一些中文汉字。
2.然后按下快捷键【Alt+F11】,调出VB宏界面,然后点击上方的【插入】按钮。
3.然后点击【模块】,可以看到,会出现一个代码输入界面。
4.在代码界面输入代码:
Function pinyin(p As String) As String
i = Asc(p)
Select Case i
Case -20319 To -20284: pinyin = “A“
Case -20283 To -19776: pinyin = “B“
...
Case Else: pinyin = p
End Select
End Function
Function getpy(str)
For i = 1 To Len(str)
getpy = getpy & pinyin(Mid(str, i, 1))
Next i
End Function
如图。
5.代码输入完成后,关闭Visual Basic窗口,返回Excel状态,然后在第二列第一行输入函数getpy(A1),按下【Enter】键。
6.然后拖动填充柄,可以看到,第二列显示了汉字的首字母拼音。
感谢今日头条的邀请,大家好,我是Excel奇妙之旅,专注于Excel知识和技能的分享
EXCEL如何自动将姓名转换为拼音?以下是我的解决方法,不是用VBA,而是借助word来操作
操作思路:
第一:把excel中的姓名粘贴到word中,借助word添加拼音,再把word中添加拼音的结果粘贴到excel中
第二:用PHONETIC函数取得拼音
第三:用substitute函数将拼音声调去掉(这一步视需求,如不需要删除声调可以忽略)
接下来详细介绍操作方法:
1)第一:把excel中的姓名粘贴到word中,借助word添加拼音,注意粘贴的时候选择只保留文本那个选项,添加拼音后再粘贴回Excel
注意粘贴到Word的时候选择只保留文本那个选项,不然word无法添加拼音
第二:用PHONETIC函数取得拼音
在C3单元格输入公式= =PHONETIC(B3),然后下拉公式,得到所有姓名拼音
第三:用substitute函数将拼音声调去掉(这一步视需求,如不需要删除声调可以忽略
在D3单元格输入公式=SUBSTITUTE(SUBSTITUTE(SUBSTITUTE(SUBSTITUTE(SUBSTITUTE(SUBSTITUTE(SUBSTITUTE(SUBSTITUTE(SUBSTITUTE(SUBSTITUTE(SUBSTITUTE(SUBSTITUTE(SUBSTITUTE(SUBSTITUTE(SUBSTITUTE(SUBSTITUTE(SUBSTITUTE(SUBSTITUTE(SUBSTITUTE(SUBSTITUTE(SUBSTITUTE(SUBSTITUTE(SUBSTITUTE(SUBSTITUTE(C3,“ā“,“a“),“á“,“a“),“ǎ“,“a“),“à“,“a“),“ē“,“e“),“é“,“e“),“ě“,“e“),“è“,“e“),“ī“,“i“),“í“,“i“),“ǐ“,“i“),“ì“,“i“),“ō“,“o“),“ó“,“o“),“ǒ“,“o“),“ò“,“o“),“ū“,“u“),“ú“,“u“),“ǔ“,“u“),“ù“,“u“),“ǖ“,“ü“),“ǘ“,“ü“),“ǚ“,“ü“),“ǜ“,“ü“)
这个公式利用substitute函数把拼音中的字母为韵母的声调都替换成了不带声调的韵母,也就让拼音的声调去除了
我是Excel奇妙之旅,专注于Excel知识和技能的分享,关注Excel奇妙之旅,带给你更多的实战技巧1、光标定在C2单元格中,输入公式“=getpy(B2)”,敲回车确认,如图所示:
我们看到唐僧的汉语拼音就自动出现了。
2、选中C2单元格,鼠标放在单元格右下角出现“+”后,向下拖到鼠标。
3、所有人的姓名都以汉语拼音形式显示了。
4、下面我们还需要将拼音的首字母变成大写字母,又该怎样操作呢?
光标定在D2单元格中,输入公式“=PROPER(C2)”,敲回车确认。我们看到唐僧的姓名拼音首字母变成大写的了。
5、选中D2单元格,鼠标放在单元格右下角出现“+”,向下拖动鼠标。
6、所有人的姓名拼音首字母都变成了大写大母形式显示了。
1、在键盘上找到shift键和ctrl键,它们的位置是挨着的。
2、同时按下shift键和ctrl键,就可以进行中英文切换。
3、比如刚开始是拼音或英文状态,同时按下shift键和ctrl键的话,就可以将其切换成中文输入法。
4、您还可以同时按下ctrl键和空格键,也能进行中英文切换。
5、如果您使用的是搜狗输入法,而当时是属于英文输入状态的话,此时只需按下shift键或在搜狗输入法的界面单击【英】按钮,就可以成功切换成中文状态,将拼音转换成汉字了。
6、如果您使用的是微软拼音输入法,您在使用它打字时还需再按一下键盘中的空格键,这样才能成功输出汉字。
7、每一种不同类型的输入法,要选择不同的操作方式,这样才能成功将拼音转换成汉字。
1、首先,打开要转换成拼音的excel表格。
2、按“Alt+F11”组合键,进入Visual Basic状态,也就是看到的这个灰色的界面。
3、执行“插入→模块”命令,插入一个新模块。再双击插入的模块,进入模块代码状态。
4、看到空白界面后,将下面的所有内容复制,粘贴到空白处。
5、按下ALT+Q关闭Visual Basic窗口,返回Excel状态。
6、选中转换后的拼音需要放在哪个列,例如要把B列的第2行的内容转换成拼音,放在D列的第2个单元格,输入公式:=getpy(B2),这里的B2,是指源头单元格的坐标。
7、如果要去除拼音之间的空格。去掉空格的拼音放在E列,如果这个未去掉空格的数据原来在D2单元格,去掉空格之后的拼音放在E2单元格,则在E2单元格输入: =SUBSTITUTE(D2,“ “,““),然后就转换完成了。