excle汉字转拼音

excle汉字转拼音，把下面的代码拷贝到excel->工具-》宏-->Vb编辑器中即可：DimdAsObjectFunctionInitDictinary()Setd=CreateObject("Scripting.Dictionary")d.Add"A",-20319d.Add"Ai",-20317d.Add"An",-20304d.Add"Ang",-20295d.Add"Ao",-20292d.Add"Ba",-20283d.Add&qu