excel表汉字生成拼音的方法

答案:2 悬赏:70 手机版

解决时间 2021-03-31 09:03

提问者网友：人生佛魔见
2021-03-31 05:45

excel表汉字生成拼音的方法

最佳答案

五星知识达人网友：洎扰庸人
2021-03-31 06:15

利用word的拼音指南功能，假设A列为汉字
你要先选中A列，复制黏贴到word中，选择仅保留文本
ctrl+A,菜单栏拼音指南，确定
ctrl+A,复制，黏贴回excel的A列
=phonetic(A1),下拖
把excel的拼音指南关掉

全部回答

1楼网友：底特律间谍
2021-03-31 06:34

单个汉字的话可以直接用公式，多个汉字的话vba更方便一些。
按住ALT依次按F11,I,M。将下面的代码粘贴到右侧窗口。
==========
Function PY(x)
On Error Resume Next
Application.Volatile
For i = 1 To Len(x)
PY = PY & Application.WorksheetFunction.HLookup(Mid(x, i, 1), [{"吖","八","嚓","咑","鵽","发","猤","铪","夻","咔","垃","呒","旀","噢","妑","七","囕","仨","他","屲","夕","丫","帀";"A","B","C","D","E","F","G","H","J","K","L","M","N","O","P","Q","R","S","T","W","X","Y","Z"}], 2)
Next
End Function
==========
假设要转化的汉字在A列，B1输入公式 =PY(A1)向下填充即可。追问弄不来啊，要不我文件发你，你给我转，行吗

我要举报

如以上回答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！

点此我要举报以上问答信息