1、=Excel中文转拼音(简称版)=打开Excel-工具-宏-ViaualBasic编辑器在弹出来的窗口中对着VBAproject点右键-插入-模块下面会出现一个名为模块1,粘贴以下内容:Functiongetpychar(char)tmp=65536+Asc(char)If(tmp=45217Andtmp=45253Andtmp=45761Andtmp=46318Andtmp=46826Andtmp=47010Andtmp=47297Andtmp=47614Andtmp=48119Andtmp=49062
2、Andtmp=49324Andtmp=49896Andtmp=50371Andtmp=50614Andtmp=50622Andtmp=50906Andtmp=51387Andtmp=51446Andtmp=52218Andtmp=52698Andtmp=52980Andtmp=53689Andtmp=54481Andtmp工具-宏-ViaualBasic编辑器在弹出来的窗口中对着VBAproject点右键-插入-模块下面会出现一个名为模块2,点击在右边的空白栏中粘贴以下内容:Opti
3、onExplicitOptionCompareTextPublicFunctionHZQP(expressionAsString,OptionaldelimiterAsString=,OptionallimitAsInteger=-1)AsStringexpression必需的包含要转换的字符串delimiter可选的。用于标识分隔拼音的字符串字符。如果忽略,则使用空格字符()作为分隔符。如果delimiter是一个长度为零的字符串,则返回仅包含一个元素,即完整的expression字符串。limit可选的。要返回拼音字符数,1表示返回所
4、有的拼音字符数,1表示返回拼音首字母。DimSTRAsString,arrWord(400)AsStringDimiAsInteger,jAsIntegerarrWord(1)=吖aarrWord(2)=哎aiarrWord(3)=腤anarrWord(4)=肮angarrWord(5)=凹aoarrWord(6)=八baarrWord(7)=挀baiarrWord(8)=扳banarrWord(9)=邦bangarrWord(10)=勹baoarrWord(11)=陂beiarrWord(12)=奔benarrWord(
5、13)=崩bengarrWord(14)=皀biarrWord(15)=边bianarrWord(16)=杓biaoarrWord(17)=憋biearrWord(18)=邠binarrWord(19)=仌bingarrWord(20)=拨boarrWord(21)=峬buarrWord(22)=嚓caarrWord(23)=猜caiarrWord(24)=飡canarrWord(25)=仓cangarrWord(26)=撡caoarrWord(27)=冊cearrWord(28)=嵾cenarrWord(29)=噌cenga
6、rrWord(30)=*chaarrWord(31)=拆chaiarrWord(32)=辿chanarrWord(33)=伥changarrWord(34)=抄chaoarrWord(35)=车chearrWord(36)=抻chenarrWord(37)=阷chengarrWord(38)=吃chiarrWord(39)=充chongarrWord(40)=抽chouarrWord(41)=出chuarrWord(42)=搋chuaiarrWord(43)=巛chuanarrWord(44)=刅chuangarrWord(45)=
7、吹chuiarrWord(46)=旾chunarrWord(47)=踔chuoarrWord(48)=呲ciarrWord(49)=从congarrWord(50)=凑couarrWord(51)=粗cuarrWord(52)=汆cuanarrWord(53)=崔cuiarrWord(54)=邨cunarrWord(55)=搓cuoarrWord(56)=咑daarrWord(57)=呆daiarrWord(58)=丹danarrWord(59)=当dangarrWord(60)=刀daoarrWord(61)=恴dearrWo
8、rd(62)=灯dengarrWord(63)=仾diarrWord(64)=敁dianarrWord(65)=刁diaoarrWord(66)=爹diearrWord(67)=丁dingarrWord(68)=丟diuarrWord(69)=东dongarrWord(70)=剅douarrWord(71)=嘟duarrWord(72)=耑duanarrWord(73)=垖duiarrWord(74)=吨dunarrWord(75)=多duoarrWord(76)=妸earrWord(77)=奀enarrWord(78)=儿e
9、rarrWord(79)=发faarrWord(80)=帆fanarrWord(81)=方fangarrWord(82)=飞feiarrWord(83)=分fenarrWord(84)=丰fengarrWord(85)=仏foarrWord(86)=紑fouarrWord(87)=夫fuarrWord(88)=旮gaarrWord(89)=该gaiarrWord(90)=干ganarrWord(91)=冈gangarrWord(92)=皋gaoarrWord(93)=戈gearrWord(94)=给geiarrWord(95)=
10、根genarrWord(96)=更gengarrWord(97)=工gongarrWord(98)=勾gouarrWord(99)=估guarrWord(100)=瓜guaarrWord(101)=乖guaiarrWord(102)=关guanarrWord(103)=光guangarrWord(104)=归guiarrWord(105)=衮gunarrWord(106)=呙guoarrWord(107)=铪haarrWord(108)=嗨haiarrWord(109)=佄hanarrWord(110)=夯hangarrWord(1
11、11)=蒿haoarrWord(112)=诃hearrWord(113)=黒heiarrWord(114)=拫henarrWord(115)=亨hengarrWord(116)=叿hongarrWord(117)=侯houarrWord(118)=乎huarrWord(119)=花huaarrWord(120)=怀huaiarrWord(121)=欢huanarrWord(122)=巟huangarrWord(123)=灰huiarrWord(124)=昏hunarrWord(125)=吙huoarrWord(126)=丌jiar
12、rWord(127)=加jiaarrWord(128)=戋jianarrWord(129)=江jiangarrWord(130)=艽jiaoarrWord(131)=阶jiearrWord(132)=巾jinarrWord(133)=坕jingarrWord(134)=冂jiongarrWord(135)=丩jiuarrWord(136)=凥juarrWord(137)=姢juanarrWord(138)=噘juearrWord(139)=军junarrWord(140)=咔kaarrWord(141)=开kaiarrWord(142
13、)=刊kanarrWord(143)=忼kangarrWord(144)=*kaoarrWord(145)=匼kearrWord(146)=肎kenarrWord(147)=劥kengarrWord(148)=空kongarrWord(149)=抠kouarrWord(150)=郀kuarrWord(151)=夸kuaarrWord(152)=蒯kuaiarrWord(153)=宽kuanarrWord(154)=匡kuangarrWord(155)=亏kuiarrWord(156)=坤kunarrWord(157)=扩kuoar
14、rWord(158)=垃laarrWord(159)=来laiarrWord(160)=兰lanarrWord(161)=啷langarrWord(162)=捞laoarrWord(163)=仂learrWord(164)=雷leiarrWord(165)=塄lengarrWord(166)=唎liarrWord(167)=俩liaarrWord(168)=嫾lianarrWord(169)=簗liangarrWord(170)=蹽liaoarrWord(171)=咧liearrWord(172)=邻linarrWord(173)=
15、伶lingarrWord(174)=溜liuarrWord(175)=囖loarrWord(176)=龙longarrWord(177)=娄louarrWord(178)=露luarrWord(179)=驴lvarrWord(180)=孪luanarrWord(181)=掠luearrWord(182)=抡lunarrWord(183)=頱luoarrWord(184)=妈maarrWord(185)=埋maiarrWord(186)=颟manarrWord(187)=牤mangarrWord(188)=猫maoarrWord(18
16、9)=庅mearrWord(190)=沒meiarrWord(191)=椚menarrWord(192)=掹mengarrWord(193)=咪miarrWord(194)=芇mianarrWord(195)=喵miaoarrWord(196)=乜miearrWord(197)=民minarrWord(198)=名mingarrWord(199)=谬miuarrWord(200)=摸moarrWord(201)=哞mouarrWord(202)=母muarrWord(203)=拏naarrWord(204)=腉naiarrWord
17、(205)=囡nanarrWord(206)=囔nangarrWord(207)=孬naoarrWord(208)=讷nearrWord(209)=馁neiarrWord(210)=嫩nenarrWord(211)=能nengarrWord(212)=妮niarrWord(213)=拈nianarrWord(214)=娘niangarrWord(215)=鸟niaoarrWord(216)=捏niearrWord(217)=脌ninarrWord(218)=宁ningarrWord(219)=妞niuarrWord(220)=农n
18、ongarrWord(221)=奴nuarrWord(222)=女nvarrWord(223)=疟nuearrWord(224)=奻nuanarrWord(225)=郍nuoarrWord(226)=噢oarrWord(227)=讴ouarrWord(228)=妑paarrWord(229)=拍paiarrWord(230)=眅panarrWord(231)=乓pangarrWord(232)=抛paoarrWord(233)=呸peiarrWord(234)=喷penarrWord(235)=匉pengarrWord(236)=
19、丕piarrWord(237)=片pianarrWord(238)=剽piaoarrWord(239)=氕piearrWord(240)=姘pinarrWord(241)=娉pingarrWord(242)=钋poarrWord(243)=仆puarrWord(244)=七qiarrWord(245)=掐qiaarrWord(246)=千qianarrWord(247)=呛qiangarrWord(248)=悄qiaoarrWord(249)=切qiearrWord(250)=亲qinarrWord(251)=靑qingarrWord
20、(252)=宆qiongarrWord(253)=丘qiuarrWord(254)=区quarrWord(255)=峑quanarrWord(256)=炔quearrWord(257)=夋qunarrWord(258)=呥ranarrWord(259)=穣rangarrWord(260)=荛raoarrWord(261)=惹rearrWord(262)=人renarrWord(263)=扔rengarrWord(264)=日riarrWord(265)=戎rongarrWord(266)=厹rouarrWord(267)=嶿rua
21、rrWord(268)=堧ruanarrWord(269)=桵ruiarrWord(270)=闰runarrWord(271)=叒ruoarrWord(272)=仨saarrWord(273)=毢saiarrWord(274)=三sanarrWord(275)=桒sangarrWord(276)=掻saoarrWord(277)=色searrWord(278)=森senarrWord(279)=僧sengarrWord(280)=杀shaarrWord(281)=筛shaiarrWord(282)=山shanarrWord(283)
22、=伤shangarrWord(284)=弰shaoarrWord(285)=奢shearrWord(286)=申shenarrWord(287)=升shengarrWord(288)=尸shiarrWord(289)=収shouarrWord(290)=书shuarrWord(291)=刷shuaarrWord(292)=衰shuaiarrWord(293)=闩shuanarrWord(294)=霜shuangarrWord(295)=谁shuiarrWord(296)=吮shunarrWord(297)=说shuoarrWord(29
23、8)=厶siarrWord(299)=忪songarrWord(300)=凁souarrWord(301)=苏suarrWord(302)=狻suanarrWord(303)=夊suiarrWord(304)=孙sunarrWord(305)=唆suoarrWord(306)=他taarrWord(307)=囼taiarrWord(308)=坍tanarrWord(309)=汤tangarrWord(310)=仐taoarrWord(311)=忑tearrWord(312)=鼟tengarrWord(313)=剔tiarrWord
24、(314)=天tianarrWord(315)=旫tiaoarrWord(316)=贴tiearrWord(317)=厅tingarrWord(318)=囲tongarrWord(319)=偷touarrWord(320)=凸tuarrWord(321)=湍tuanarrWord(322)=推tuiarrWord(323)=吞tunarrWord(324)=乇tuoarrWord(325)=屲waarrWord(326)=歪waiarrWord(327)=弯wanarrWord(328)=尩wangarrWord(329)=危we
25、iarrWord(330)=昷wenarrWord(331)=翁wengarrWord(332)=挝woarrWord(333)=乌wuarrWord(334)=夕xiarrWord(335)=呷xiaarrWord(336)=仙xianarrWord(337)=乡xiangarrWord(338)=灱xiaoarrWord(339)=些xiearrWord(340)=心xinarrWord(341)=兴xingarrWord(342)=凶xiongarrWord(343)=休xiuarrWord(344)=戌xuarrWord(34
26、5)=吅xuanarrWord(346)=疶xuearrWord(347)=坃xunarrWord(348)=丫yaarrWord(349)=咽yanarrWord(350)=殃yangarrWord(351)=邀yaoarrWord(352)=椰yearrWord(353)=一yiarrWord(354)=乚yinarrWord(355)=应yingarrWord(356)=哟yoarrWord(357)=佣yongarrWord(358)=优youarrWord(359)=扜yuarrWord(360)=囦yuanarrWord(361)=曰yuearrWord(362)=蒀yunarrWord(363)=帀zaarrWord(364)=災zaiarrWord(365)=兂zanarrWord(366)=牂zangarrWord(367)=傮zaoarrWord(368)=啫zearrWord(369)=贼zeiarrWord(370)=怎zenarrWord(371)=曽zengarrWord(372)=吒zhaarrWord(373)