发布网友 发布时间:2023-10-09 11:40
共4个回答
热心网友 时间:2024-12-04 03:38
把EXCEL表格里的中文替换为拼音的步骤(以EXCEL 2007为例):
1、点开始菜单——查找和选择——替换;
2、查找内容:输入中文,例如:百度;
替换为:输入拼音,例如:,点全部替换。
热心网友 时间:2024-12-04 03:38
启动Excel (其它版本请仿照操作),打开相应的工作表;
2.执行“工具→宏→Visual Basic编辑器”命令(或者直接按“Alt+F11”组合键),进入Visual Basic编辑状态;
执行“插入→模块”命令,插入一个新模块。再双击插入的模块,进入模块代码编辑状态;
将代码输入其中:
Function pinyin(p As String) As String
i = Asc(p)
Select Case i
Case -20319 To -20318: pinyin = "a "
Case -20317 To -20305: pinyin = "ai "
Case -20304 To -20296: pinyin = "an "
Case -20295 To -20293: pinyin = "ang "
……
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编辑状态;
6.定义函数就可以用了,如:选中A2单元格,输入公式:=getpy(A2)。
热心网友 时间:2024-12-04 03:38
在word热心网友 时间:2024-12-04 03:40
可用VBA编一个自定义函数来实现,而且这个自定义函数已经有人编好了。