excel中的姓名汉字变拼音忒有用啦！.docVIP

excel中的姓名汉字变拼音忒有用啦！ FunctionPinYin(Hz As String) DimPinMa As String DimMyPinMa As Variant Dim TempAs Integer, i As Integer, j As Integer PinMa =a,20319,ai,20317,an,20304,ang,20295,ao,20292, PinMa =PinMa ba,20283,bai,20265,ban,20257,bang,20242,bao,20230,bei,20051,ben,20036,beng,20032,bi,20026,bian,20002,biao,19990,bie,19986,bin,19982,bing,19976,bo,19805,bu,19784, PinMa =PinMa ca,19775,cai,19774,can,19763,cang,19756,cao,19751,ce,19746,ceng,19741,cha,19739,chai,19728,chan,19725,chang,19715,chao,19540,che,19531,chen,19525,cheng,19515,chi,19500,chong,19484,chou,19479,chu,19467,chuai,19289,chuan,19