1、在Excel中添加中文轉(zhuǎn)拼音完整編碼方法:打開Excel->工具->宏->Viaual Basic編輯器在彈出來(lái)的窗口中對(duì)著VBAproject點(diǎn)右鍵->插入->模塊下面會(huì)出現(xiàn)一個(gè)名為"模塊1",點(diǎn)擊在右邊的空白欄中粘貼以下編碼內(nèi)容:Function pinyin(p As String) As Stringi = Asc(p)Select Case iCase -20319 To -20318: pinyin = "a"