Excel使用拼音函数

Excel中文转拼音（完整版）

打开Excel->工具->宏->Viaual Basic编辑器（或者直接 alt+f11）
在弹出来的窗口中对着VBAproject点右键->插入->模块
下面会出现一个名为"模块1"，点击
在右边的空白栏中粘贴以下内容：

Function pinyin(p As String) As String
i = Asc(p)
Select Case i
Case -20319 To -20318: pinyin = "a "
Case -20317 To -20305: pinyin = "ai "
Case -20304 To -20296: pinyin = "an "
Case -20295 To -20293: pinyin = "ang "
Case -20292 To -20284: pinyin = "ao "
Case -20283 To -20266: pinyin = "ba "
Case -20265 To -20258: pinyin = "bai "
Case -20257 To -20243: pinyin = "ban "
Case -20242 To -20231: pinyin = "bang "
Case -20230 To -20052: pinyin = "bao "
Case -20051 To -20037: pinyin = "bei "
Case -20036 To -20033: pinyin = "ben "
Case -20032 To -20027: pinyin = "beng "
Case -20026 To -20003: pinyin = "bi "
Case -20002 To -19991: pinyin = "bian "
Case -19990 To -19987: pinyin = "biao "
Case -19986 To -19983: pinyin = "bie "
Case -19982 To -19977: pinyin = "bin "
Case -19976 To -19806: pinyin = "bing "
Case -19805 To -19785: pinyin = "bo "
Case -19784 To -19776: pinyin = "bu "
Case -19775 To -19775: pinyin = "ca "
Case -19774 To -19764: pinyin = "cai "
Case -19763 To -19757: pinyin = "can "
Case -19756 To -19752: pinyin = "cang "
Case -19751 To -19747: pinyin = "cao "
Case -19746 To -19742: pinyin = "ce "
Case -19741 To -19740: pinyin = "ceng "
Case -19739 To -19729: pinyin = "cha "
Case -19728 To -19726: pinyin = "chai "
Case -19725 To -19716: pinyin = "chan "
Case -19715 To -19541: pinyin = "chang "
Case -19540 To -19532: pinyin = "chao "
Case -19531 To -19526: pinyin = "che "
Case -19525 To -19516: pinyin = "chen "
Case -19515 To -19501: pinyin = "cheng "
Case -19500 To -19485: pinyin = "chi "
Case -19484 To -19480: pinyin = "chong "
Case -19479 To -19468: pinyin = "chou "
Case -19467 To -19290: pinyin = "chu "
Case -19289 To -19289: pinyin = "chuai "
Case -19288 To -19282: pinyin = "chuan "
Case -19281 To -19276: pinyin = "chuang "
Case -19275 To -19271: pinyin = "chui "
Case -19270 To -19264: pinyin = "chun "
Case -19263 To -19262: pinyin = "chuo "
Case -19261 To -19250: pinyin = "ci "
Case -19249 To -19244: pinyin = "cong "
Case -19243 To -19243: pinyin = "cou "
Case -19242 To -19239: pinyin = "cu "
Case -19238 To -19236: pinyin = "cuan "
Case -19235 To -19228: pinyin = "cui "
Case -19227 To -19225: pinyin = "cun "
Case -19224 To -19219: pinyin = "cuo "
Case -19218 To -19213: pinyin = "da "
Case -19212 To -19039: pinyin = "dai "
Case -19038 To -19024: pinyin = "dan "
Case -19023 To -19019: pinyin = "dang "
Case -19018 To -19007: pinyin = "dao "
Case -19006 To -19004: pinyin = "de "
Case -19003 To -18997: pinyin = "deng "
Case -18996 To -18978: pinyin = "di "
Case -18977 To -18962: pinyin = "dian "
Case -18961 To -18953: pinyin = "diao "
Case -18952 To -18784: pinyin = "die "
Case -18783 To -18775: pinyin = "ding "
Case -18774 To -18774: pinyin = "diu "
Case -18773 To -18527: pinyin = "dong "
Case -18526 To -18519: pinyin = "fa "
Case -18518 To -18502: pinyin = "fan "
Case -18501 To -18491: pinyin = "fang "
Case -18490 To -18479: pinyin = "fei "
Case -18478 To -18464: pinyin = "fen "
Case -18463 To -18449: pinyin = "feng "
Case -18448 To -18448: pinyin = "fo "
Case -18447 To -18447: pinyin = "fou "
Case -18446 To -18240: pinyin = "fu "
Case -18239 To -18238: pinyin = "ga "
Case -18237 To -18232: pinyin = "gai "
Case -18231 To -18221: pinyin = "gan "
Case -18220 To -18212: pinyin = "gang "
Case -18211 To -18202: pinyin = "gao "
Case -18201 To -18185: pinyin = "ge "
Case -18184 To -18184: pinyin = "gei "
Case -18183 To -18182: pinyin = "gen "
Case -18181 To -18013: pinyin = "geng "
Case -18012 To -17998: pinyin = "gong "
Case -17997 To -17989: pinyin = "gou "
Case -17988 To -17971: pinyin = "gu "
Case -17970 To -17965: pinyin = "gua "
Case -17964 To -17962: pinyin = "guai "
Case -17961 To -17951: pinyin = "guan "
Case -17950 To -17948: pinyin = "guang "
Case -17947 To -17932: pinyin = "gui "
Case -17931 To -17929: pinyin = "gun "
Case -17928 To -17923: pinyin = "guo "
Case -17922 To -17760: pinyin = "ha "
Case -17759 To -17753: pinyin = "hai "
Case -17752 To -17734: pinyin = "han "
Case -17733 To -17731: pinyin = "hang "
Case -17730 To -17722: pinyin = "hao "
Case -17721 To -17704: pinyin = "he "
Case -17703 To -17702: pinyin = "hei "
Case -17701 To -17698: pinyin = "hen "
Case -17697 To -17693: pinyin = "heng "
Case -17692 To -17684: pinyin = "hong "
Case -17683 To -17677: pinyin = "hou "
Case -17676 To -17497: pinyin = "hu "
Case -17496 To -17488: pinyin = "hua "
Case -17487 To -17483: pinyin = "huai "
Case -17482 To -17469: pinyin = "huan "
Case -17468 To -17455: pinyin = "huang "
Case -17454 To -17434: pinyin = "hui "
Case -17433 To -17428: pinyin = "hun "
Case -17427 To -17418: pinyin = "huo "
Case -17417 To -17203: pinyin = "ji "
Case -17202 To -17186: pinyin = "jia "
Case -17185 To -16984: pinyin = "jian "
Case -16983 To -16971: pinyin = "jiang "
Case -16970 To -16943: pinyin = "jiao "
Case -16942 To -16916: pinyin = "jie "
Case -16915 To -16734: pinyin = "jin "
Case -16733 To -16709: pinyin = "jing "
Case -16708 To -16707: pinyin = "jiong "
Case -16706 To -16690: pinyin = "jiu "
Case -16689 To -16665