excel中把漢字轉(zhuǎn)換成拼音的方法
時(shí)間:
張偉670由 分享
在excel中把的漢字轉(zhuǎn)換成拼音,拼音在字的上面,在word和EXCEL中,都可以,再粘貼到別的地方,用起來(lái)不如word,那么下面小編就教你具體怎么怎么把漢字轉(zhuǎn)換成拼音吧。希望對(duì)你有幫助!
excel中把漢字轉(zhuǎn)換成拼音的方法
打開(kāi)需要轉(zhuǎn)換的excel表格
excel中把漢字轉(zhuǎn)換成拼音的方法圖1
單擊excel表格的任意位置,然后按下ALT+F11,進(jìn)入這個(gè)灰色的編輯界面
excel中把漢字轉(zhuǎn)換成拼音的方法圖2
插入--模塊
excel中把漢字轉(zhuǎn)換成拼音的方法圖3
打開(kāi)如下所示的界面。
excel中把漢字轉(zhuǎn)換成拼音的方法圖4
把下面的內(nèi)容復(fù)制粘貼到第四個(gè)步驟打開(kāi)的界面中,并保存,參考下圖操作。
Function pinyin(p As String) As String
i = Asc(p)
Select Case i
Case -20319 To -20318: pinyin = "a "
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
excel中把漢字轉(zhuǎn)換成拼音的方法圖5
保存,參考圖片進(jìn)行操作。
excel中把漢字轉(zhuǎn)換成拼音的方法圖6
插入一列,用于存放轉(zhuǎn)換后的拼音
excel中把漢字轉(zhuǎn)換成拼音的方法圖7
這里放在如果所示的這一列,在這一列中輸入=getpy(轉(zhuǎn)換源頭所在的列)
excel中把漢字轉(zhuǎn)換成拼音的方法圖8
這是轉(zhuǎn)成拼音后的效果
excel中把漢字轉(zhuǎn)換成拼音的方法圖9
這里的D2是數(shù)據(jù)源頭
excel中把漢字轉(zhuǎn)換成拼音的方法圖10