excel 汉字转换成拼音全拼&excel 汉字转换成拼音简拼(只取首字母)
Excel将汉字转拼音技巧你会吗?

Excel将汉字转拼⾳技巧你会吗?
厉害了,word哥,汉字提取拼⾳
如何将下列的汉字拼⾳在Excel中?
英雄
吕布
⼩乔
⼤乔
程咬⾦
钟馗
1将拼⾳显⽰出来
将表格中的数据复制,然后新建⼀个word⽂档中
ctrl+v将复制的值粘贴
ctrl+a选中所有数据,点击字体字号旁边的“⽂”标志符号,出现下⽅的拼⾳指南
直接点击确定,然后所有的⽂字上⽅便出现了拼⾳符号
2带拼⾳字符保存在Excel数据中
将word中的数据全选,复制粘贴回Excel⽂档中
在B列数据上⽅可以看到汉字上⽅已经带有拼⾳字符了
3使⽤PHONETIC函数提取拼⾳字符
函数太复杂,记不住没关系
在C列使⽤输⼊公式=ph,EXCEL会⾃动联想公式
=PHONETIC(B1),向下填充,得到所有的结果
这样就将所有的汉字拼⾳提取出来了!
这下总不会将钟馗读成zhongdao了~~
===========================
同步原创微信公众号:⾃学成才Excel(ID:selftt)
关注回复Excel有惊喜!
本⽂为头条号作者发布,不代表今⽇头条⽴场。
EXCEL中直接把中文转换成拼音全拼

1.第一种方法:打开Excel->工具->宏->Viaual Basic编辑器在弹出来的窗口中对着VBAproject点右键->插入->模块下面会出现一个名为"模块1",点击在右边的空白栏中粘贴以下内容:Function getpychar(char)tmp = 65536 + Asc(char)If (tmp >= 45217 And tmp <= 45252) Thengetpychar = "A"ElseIf (tmp >= 45253 And tmp <= 45760) Then getpychar = "B"ElseIf (tmp >= 45761 And tmp <= 46317) Then getpychar = "C"ElseIf (tmp >= 46318 And tmp <= 46825) Then getpychar = "D"ElseIf (tmp >= 46826 And tmp <= 47009) Then getpychar = "E"ElseIf (tmp >= 47010 And tmp <= 47296) Then getpychar = "F"ElseIf (tmp >= 47297 And tmp <= 47613) Then getpychar = "G"ElseIf (tmp >= 47614 And tmp <= 48118) Then getpychar = "H"ElseIf (tmp >= 48119 And tmp <= 49061) Then getpychar = "J"ElseIf (tmp >= 49062 And tmp <= 49323) Then getpychar = "K"ElseIf (tmp >= 49324 And tmp <= 49895) Then getpychar = "L"ElseIf (tmp >= 49896 And tmp <= 50370) Then getpychar = "M"ElseIf (tmp >= 50371 And tmp <= 50613) Then getpychar = "N"ElseIf (tmp >= 50614 And tmp <= 50621) Then getpychar = "O"ElseIf (tmp >= 50622 And tmp <= 50905) Then getpychar = "P"ElseIf (tmp >= 50906 And tmp <= 51386) Then getpychar = "Q"ElseIf (tmp >= 51387 And tmp <= 51445) Then getpychar = "R"ElseIf (tmp >= 51446 And tmp <= 52217) Then getpychar = "S"ElseIf (tmp >= 52218 And tmp <= 52697) Then getpychar = "T"ElseIf (tmp >= 52698 And tmp <= 52979) Then getpychar = "W"ElseIf (tmp >= 52980 And tmp <= 53640) Then getpychar = "X"ElseIf (tmp >= 53689 And tmp <= 54480) Then getpychar = "Y"ElseIf (tmp >= 54481 And tmp <= 62289) Then getpychar = "Z"Else '如果不是中文,则不处理getpychar = charEnd IfEnd FunctionFunction getpy(str)For i = 1 To Len(str)getpy = getpy & getpychar(Mid(str, i, 1))Next iEnd Function现在转换函数已编写完成!关掉此编缉的窗口。
excel中把汉字转换成拼音的方法

excel中把汉字转换成拼音的方法在excel中把的汉字转换成拼音,拼音在字的上面,在word和EXCEL中,都可以,再粘贴到别的地方,用起来不如word,那么下面小编就教你具体怎么怎么把汉字转换成拼音吧。
希望对你有帮助!excel中把汉字转换成拼音的方法打开需要转换的excel表格单击excel表格的任意位置,然后按下ALT+F11,进入这个灰色的编辑界面excel中把汉字转换成拼音的方法图2插入--模块excel中把汉字转换成拼音的方法图3打开如下所示的界面。
excel中把汉字转换成拼音的方法图4把下面的内容复制粘贴到第四个步骤打开的界面中,并保存,参考下图操作。
Function pinyin(p As String) As Stringi = Asc(p)Select Case iCase -20319 To -20318: pinyin = "a "Case Else: pinyin = pEnd SelectEnd FunctionFunction getpy(str)For i = 1 To Len(str)getpy = getpy & pinyin(Mid(str, i, 1))Next iEnd Functionexcel中把汉字转换成拼音的方法图5保存,参考图片进行操作。
excel中把汉字转换成拼音的方法图6插入一列,用于存放转换后的拼音excel中把汉字转换成拼音的方法图7这里放在如果所示的这一列,在这一列中输入=getpy(转换源头所在的列)excel中把汉字转换成拼音的方法图8这是转成拼音后的效果excel中把汉字转换成拼音的方法图9这里的D2是数据源头excel中把汉字转换成拼音的方法图10。
EXCEL中直接把中文转换成拼音全拼

1.第一种方法:打开Excel-江具->宏->Viaual Basic编辑器在弹出来的窗口中对着VBAproject点右键->插入->模块下面会出现一个名为"模块1",点击在右边的空白栏中粘贴以下内容:Fun cti on getpychar(char)tmp = 65536 + Asc(char)If (tmp >= 45217 And tmp <= 45252) Thengetpychar = "A"ElseIf (tmp >= 45253 And tmp <= 45760) Then getpychar = "B"ElseIf (tmp >= 45761 And tmp <= 46317) Then getpychar = "C"ElseIf (tmp >= 46318 And tmp <= 46825) Then getpychar = "D"ElseIf (tmp >= 46826 And tmp <= 47009) Then getpychar = "E"ElseIf (tmp >= 47010 And tmp <= 47296) Then getpychar = "F"ElseIf (tmp >= 47297 And tmp <= 47613) Then getpychar = "G"ElseIf (tmp >= 47614 And tmp <= 48118) Then getpychar = "H"Elself (tmp >= 48119 And tmp <= 49061) Then getpychar = "J" ElseIf (tmp >= 49062 And tmp <= 49323) Thengetpychar = "K"ElseIf (tmp >= 49324 And tmp <= 49895) Thengetpychar = "L"ElseIf (tmp >= 49896 And tmp <= 50370) Thengetpychar = "M"ElseIf (tmp >= 50371 And tmp <= 50613) Thengetpychar = "N"ElseIf (tmp >= 50614 And tmp <= 50621) Thengetpychar = "O"ElseIf (tmp >= 50622 And tmp <= 50905) Thengetpychar = "P"ElseIf (tmp >= 50906 And tmp <= 51386) Thengetpychar = "Q"ElseIf (tmp >= 51387 And tmp <= 51445) Thengetpychar = "R"ElseIf (tmp >= 51446 And tmp <= 52217) Thengetpychar = "S"ElseIf (tmp >= 52218 And tmp <= 52697) Thengetpychar = "T"ElseIf (tmp >= 52698 And tmp <= 52979) Thengetpychar = "W"Elself (tmp >= 52980 And tmp <= 53640) Thengetpychar = "X"ElseIf (tmp >= 53689 And tmp <= 54480) Thengetpychar = "Y"ElseIf (tmp >= 54481 And tmp <= 62289) Thengetpychar = "Z"Else如果不是中文,则不处理getpychar = charEnd IfEnd Fun cti onFun cti on getpy(str)For i = 1 To Len( str)getpy = getpy & getpychar(Mid(str, i, 1))Next iEnd Fun cti on现在转换函数已编写完成!关掉此编缉的窗口。
EXCEL中文姓名转换姓名全拼音字母的Excel宏

EXCEL中文姓名转换姓名全拼音字母的Excel宏打开Excel->工具->宏->Viaual Basic编辑器在弹出来的窗口中对着VBAproject点右键->插入->模块下面会出现一个名为"模块1",点击在右边的空白栏中粘贴以下内容:Option ExplicitOption Compare TextPublic Function HZQP(expression As String, Optional delimiter As String = " ", Optional limit As Integer = -1) As String'expression' 必需的?包含要转换的字符串?'delimiter' 可选的。
用于标识分隔拼音的字符串字符。
如果忽略,则使用空格字符(" ")作为分隔符。
如果delimiter是一个长度为零的字符串,则返回仅包含一个元素,即完整的 expression字符串。
'limit' 可选的。
要返回拼音字符数,–1表示返回所有的拼音字符数,1表示返回拼音首字母。
Dim STR As String, arrWord(400) As StringDim i As Integer, j As IntegerarrWord(1) = "吖a"arrWord(2) = "哎ai"arrWord(3) = "腤an" arrWord(4) = "肮ang" arrWord(5) = "凹ao" arrWord(6) = "八ba" arrWord(7) = "挀bai" arrWord(8) = "扳ban" arrWord(9) = "邦bang" arrWord(10) = "勹bao" arrWord(11) = "陂bei" arrWord(12) = "奔ben" arrWord(13) = "崩beng" arrWord(14) = "皀bi" arrWord(15) = "边bian" arrWord(16) = "杓biao" arrWord(17) = "憋bie" arrWord(18) = "邠bin" arrWord(19) = "仌bing" arrWord(20) = "拨bo" arrWord(21) = "峬bu" arrWord(22) = "嚓ca" arrWord(23) = "猜cai" arrWord(24) = "飡can" arrWord(25) = "仓cang" arrWord(26) = "撡cao" arrWord(27) = "冊ce" arrWord(28) = "嵾cen" arrWord(29) = "噌ceng" arrWord(30) = "*cha" arrWord(31) = "拆chai" arrWord(32) = "辿chan"arrWord(33) = "伥chang" arrWord(34) = "抄chao" arrWord(35) = "车che" arrWord(36) = "抻chen" arrWord(37) = "阷cheng" arrWord(38) = "吃chi" arrWord(39) = "充chong" arrWord(40) = "抽chou" arrWord(41) = "出chu" arrWord(42) = "搋chuai" arrWord(43) = "巛chuan" arrWord(44) = "刅chuang" arrWord(45) = "吹chui" arrWord(46) = "旾chun" arrWord(47) = "踔chuo" arrWord(48) = "呲ci" arrWord(49) = "从cong" arrWord(50) = "凑cou" arrWord(51) = "粗cu" arrWord(52) = "汆cuan" arrWord(53) = "崔cui" arrWord(54) = "邨cun" arrWord(55) = "搓cuo" arrWord(56) = "咑da" arrWord(57) = "呆dai" arrWord(58) = "丹dan" arrWord(59) = "当dang" arrWord(60) = "刀dao" arrWord(61) = "恴de" arrWord(62) = "灯deng"arrWord(64) = "敁dian" arrWord(65) = "刁diao" arrWord(66) = "爹die" arrWord(67) = "丁ding" arrWord(68) = "丟diu" arrWord(69) = "东dong" arrWord(70) = "剅dou" arrWord(71) = "嘟du" arrWord(72) = "耑duan" arrWord(73) = "垖dui" arrWord(74) = "吨dun" arrWord(75) = "多duo" arrWord(76) = "妸e" arrWord(77) = "奀en" arrWord(78) = "儿er" arrWord(79) = "发fa" arrWord(80) = "帆fan" arrWord(81) = "方fang" arrWord(82) = "飞fei" arrWord(83) = "分fen" arrWord(84) = "丰feng" arrWord(85) = "仏fo" arrWord(86) = "紑fou" arrWord(87) = "夫fu" arrWord(88) = "旮ga" arrWord(89) = "该gai" arrWord(90) = "干gan" arrWord(91) = "冈gang"arrWord(93) = "戈ge" arrWord(94) = "给gei" arrWord(95) = "根gen" arrWord(96) = "更geng" arrWord(97) = "工gong" arrWord(98) = "勾gou" arrWord(99) = "估gu" arrWord(100) = "瓜gua" arrWord(101) = "乖guai" arrWord(102) = "关guan" arrWord(103) = "光guang" arrWord(104) = "归gui" arrWord(105) = "衮gun" arrWord(106) = "呙guo" arrWord(107) = "铪ha" arrWord(108) = "嗨hai" arrWord(109) = "佄han" arrWord(110) = "夯hang" arrWord(111) = "蒿hao" arrWord(112) = "诃he" arrWord(113) = "黒hei" arrWord(114) = "拫hen" arrWord(115) = "亨heng" arrWord(116) = "叿hong" arrWord(117) = "侯hou" arrWord(118) = "乎hu" arrWord(119) = "花hua" arrWord(120) = "怀huai" arrWord(121) = "欢huan"arrWord(123) = "灰hui" arrWord(124) = "昏hun" arrWord(125) = "吙huo" arrWord(126) = "丌ji" arrWord(127) = "加jia" arrWord(128) = "戋jian" arrWord(129) = "江jiang" arrWord(130) = "艽jiao" arrWord(131) = "阶jie" arrWord(132) = "巾jin" arrWord(133) = "坕jing" arrWord(134) = "冂jiong" arrWord(135) = "丩jiu" arrWord(136) = "凥ju" arrWord(137) = "姢juan" arrWord(138) = "噘jue" arrWord(139) = "军jun" arrWord(140) = "咔ka" arrWord(141) = "开kai" arrWord(142) = "刊kan" arrWord(143) = "忼kang" arrWord(144) = "*kao" arrWord(145) = "匼ke" arrWord(146) = "肎ken" arrWord(147) = "劥keng" arrWord(148) = "空kong" arrWord(149) = "抠kou" arrWord(150) = "郀ku" arrWord(151) = "夸kua"arrWord(153) = "宽kuan" arrWord(154) = "匡kuang" arrWord(155) = "亏kui" arrWord(156) = "坤kun" arrWord(157) = "扩kuo" arrWord(158) = "垃la" arrWord(159) = "来lai" arrWord(160) = "兰lan" arrWord(161) = "啷lang" arrWord(162) = "捞lao" arrWord(163) = "仂le" arrWord(164) = "雷lei" arrWord(165) = "塄leng" arrWord(166) = "唎li" arrWord(167) = "俩lia" arrWord(168) = "嫾lian" arrWord(169) = "簗liang" arrWord(170) = "蹽liao" arrWord(171) = "咧lie" arrWord(172) = "邻lin" arrWord(173) = "伶ling" arrWord(174) = "溜liu" arrWord(175) = "囖lo" arrWord(176) = "龙long" arrWord(177) = "娄lou" arrWord(178) = "露lu" arrWord(179) = "驴lv" arrWord(180) = "孪luan" arrWord(181) = "掠lue"arrWord(183) = "頱luo" arrWord(184) = "妈ma" arrWord(185) = "埋mai" arrWord(186) = "颟man" arrWord(187) = "牤mang" arrWord(188) = "猫mao" arrWord(189) = "庅me" arrWord(190) = "沒mei" arrWord(191) = "椚men" arrWord(192) = "掹meng" arrWord(193) = "咪mi" arrWord(194) = "芇mian" arrWord(195) = "喵miao" arrWord(196) = "乜mie" arrWord(197) = "民min" arrWord(198) = "名ming" arrWord(199) = "谬miu" arrWord(200) = "摸mo" arrWord(201) = "哞mou" arrWord(202) = "母mu" arrWord(203) = "拏na" arrWord(204) = "腉nai" arrWord(205) = "囡nan" arrWord(206) = "囔nang" arrWord(207) = "孬nao" arrWord(208) = "讷ne" arrWord(209) = "馁nei" arrWord(210) = "嫩nen" arrWord(211) = "能neng"arrWord(213) = "拈nian" arrWord(214) = "娘niang" arrWord(215) = "鸟niao" arrWord(216) = "捏nie" arrWord(217) = "脌nin" arrWord(218) = "宁ning" arrWord(219) = "妞niu" arrWord(220) = "农nong" arrWord(221) = "奴nu" arrWord(222) = "女nv" arrWord(223) = "疟nue" arrWord(224) = "奻nuan" arrWord(225) = "郍nuo" arrWord(226) = "噢o" arrWord(227) = "讴ou" arrWord(228) = "妑pa" arrWord(229) = "拍pai" arrWord(230) = "眅pan" arrWord(231) = "乓pang" arrWord(232) = "抛pao" arrWord(233) = "呸pei" arrWord(234) = "喷pen" arrWord(235) = "匉peng" arrWord(236) = "丕pi" arrWord(237) = "片pian" arrWord(238) = "剽piao" arrWord(239) = "氕pie" arrWord(240) = "姘pin" arrWord(241) = "娉ping"arrWord(243) = "仆pu" arrWord(244) = "七qi" arrWord(245) = "掐qia" arrWord(246) = "千qian" arrWord(247) = "呛qiang" arrWord(248) = "悄qiao" arrWord(249) = "切qie" arrWord(250) = "亲qin" arrWord(251) = "靑qing" arrWord(252) = "宆qiong" arrWord(253) = "丘qiu" arrWord(254) = "区qu" arrWord(255) = "峑quan" arrWord(256) = "炔que" arrWord(257) = "夋qun" arrWord(258) = "呥ran" arrWord(259) = "穣rang" arrWord(260) = "荛rao" arrWord(261) = "惹re" arrWord(262) = "人ren" arrWord(263) = "扔reng" arrWord(264) = "日ri" arrWord(265) = "戎rong" arrWord(266) = "厹rou" arrWord(267) = "嶿ru" arrWord(268) = "堧ruan" arrWord(269) = "桵rui" arrWord(270) = "闰run" arrWord(271) = "叒ruo"arrWord(272) = "仨sa" arrWord(273) = "毢sai" arrWord(274) = "三san" arrWord(275) = "桒sang" arrWord(276) = "掻sao" arrWord(277) = "色se" arrWord(278) = "森sen" arrWord(279) = "僧seng" arrWord(280) = "杀sha" arrWord(281) = "筛shai" arrWord(282) = "山shan" arrWord(283) = "伤shang" arrWord(284) = "弰shao" arrWord(285) = "奢she" arrWord(286) = "申shen" arrWord(287) = "升sheng" arrWord(288) = "尸shi" arrWord(289) = "収shou" arrWord(290) = "书shu" arrWord(291) = "刷shua" arrWord(292) = "衰shuai" arrWord(293) = "闩shuan" arrWord(294) = "霜shuang" arrWord(295) = "谁shui" arrWord(296) = "吮shun" arrWord(297) = "说shuo" arrWord(298) = "厶si" arrWord(299) = "忪song" arrWord(300) = "凁sou" arrWord(301) = "苏su"arrWord(303) = "夊sui" arrWord(304) = "孙sun" arrWord(305) = "唆suo" arrWord(306) = "他ta" arrWord(307) = "囼tai" arrWord(308) = "坍tan" arrWord(309) = "汤tang" arrWord(310) = "仐tao" arrWord(311) = "忑te" arrWord(312) = "鼟teng" arrWord(313) = "剔ti" arrWord(314) = "天tian" arrWord(315) = "旫tiao" arrWord(316) = "贴tie" arrWord(317) = "厅ting" arrWord(318) = "囲tong" arrWord(319) = "偷tou" arrWord(320) = "凸tu" arrWord(321) = "湍tuan" arrWord(322) = "推tui" arrWord(323) = "吞tun" arrWord(324) = "乇tuo" arrWord(325) = "屲wa" arrWord(326) = "歪wai"arrWord(327) = "弯wan" arrWord(328) = "尩wang" arrWord(329) = "危wei" arrWord(330) = "昷wen"arrWord(332) = "挝wo" arrWord(333) = "乌wu" arrWord(334) = "夕xi" arrWord(335) = "呷xia" arrWord(336) = "仙xian" arrWord(337) = "乡xiang" arrWord(338) = "灱xiao" arrWord(339) = "些xie" arrWord(340) = "心xin" arrWord(341) = "兴xing" arrWord(342) = "凶xiong" arrWord(343) = "休xiu" arrWord(344) = "戌xu" arrWord(345) = "吅xuan" arrWord(346) = "疶xue" arrWord(347) = "坃xun" arrWord(348) = "丫ya" arrWord(349) = "咽yan" arrWord(350) = "殃yang" arrWord(351) = "邀yao" arrWord(352) = "椰ye" arrWord(353) = "一yi" arrWord(354) = "乚yin" arrWord(355) = "应ying" arrWord(356) = "哟yo" arrWord(357) = "佣yong" arrWord(358) = "优you" arrWord(359) = "扜yu" arrWord(360) = "囦yuan"arrWord(362) = "蒀yun" arrWord(363) = "帀za" arrWord(364) = "災zai" arrWord(365) = "兂zan" arrWord(366) = "牂zang" arrWord(367) = "傮zao" arrWord(368) = "啫ze" arrWord(369) = "贼zei" arrWord(370) = "怎zen" arrWord(371) = "曽zeng" arrWord(372) = "吒zha" arrWord(373) = "夈zhai" arrWord(374) = "沾zhan" arrWord(375) = "张zhang" arrWord(376) = "佋zhao" arrWord(377) = "蜇zhe" arrWord(378) = "贞zhen" arrWord(379) = "凧zheng" arrWord(380) = "之zhi" arrWord(381) = "中zhong" arrWord(382) = "州zhou" arrWord(383) = "朱zhu" arrWord(384) = "抓zhua" arrWord(385) = "拽zhuai" arrWord(386) = "专zhuan" arrWord(387) = "妆zhuang" arrWord(388) = "隹zhui" arrWord(389) = "宒zhun" arrWord(390) = "卓zhuo"arrWord(392) = "宗zong"arrWord(393) = "邹zou"arrWord(394) = "租zu"arrWord(395) = "劗zuan"arrWord(396) = "厜zui"arrWord(397) = "尊zun"arrWord(398) = "昨zuo"arrWord(399) = "咗zuo"For i = 1 To Len(expression)STR = Mid(expression, i, 1)If (Asc(STR) < 0) ThenFor j = 1 To 399If Left(arrWord(j), 1) > STR ThenIf limit = -1 ThenSTR = Mid(arrWord(j - 1), 2) & delimiterElseSTR = Mid(arrWord(j - 1), 2, limit) & delimiterEnd IfExit ForEnd IfNextEnd IfHZQP = HZQP + STRNextHZQP = Left(HZQP, Len(HZQP) - Len(delimiter))End Function在你的excel中创建宏,输入以下内容,然后在excel中使用自定义函数=hsqp(字符表达式,"",开关参数)三种用法: =hzqp(A2,"",-1) =hzqp(A2,"-",-1) =hzqp(A2," ",-1)单词公式拼音公式我们 women women wo-men wo men=hzqp(A2,"",-1) =hzqp(A2,"-",-1) =hzqp(A2," ",-1)三种用法: =hzqp(A2,"",-1) =hzqp(A2,"-",-1) =hzqp(A2," ",-1)。
excel批量将汉字变成拼音的设置方法

excel批量将汉字变成拼音的设置方法要在 Excel 中批量将汉字变成拼音,可以使用以下步骤:1. 打开 Excel 表格,选择要将这些汉字变成拼音的单元格范围。
2. 在 Excel 中打开“拼音指南”选项卡,然后选择“拼音指南”工具栏。
3. 在“拼音指南”工具栏中,点击“添加拼音”按钮,然后在弹出的对话框中选择要应用的拼音方案。
4. 在“拼音指南”工具栏中,选择要应用的拼音方案,然后单击“添加”按钮。
5. 选择要将这些拼音应用到的单元格,然后单击“确定”按钮。
6. 使用 Excel 的“条件格式”工具栏,选择要自动添加拼音的单元格范围。
7. 在“条件格式”工具栏中,选择“突出显示单元格规则”选项卡,然后选择“拼音”。
8. 在“条件格式”工具栏中,选择“格式刷”按钮,然后将拼音格式应用到整个单元格范围。
9. 使用 Excel 的“数据验证”工具栏,选择要将这些拼音应用于的单元格范围。
10. 在“数据验证”工具栏中,选择“限制”选项卡,然后选择“拼音”。
11. 在“数据验证”工具栏中,选择“格式”选项卡,然后选择“拼音格式”,并根据需要设置拼音格式。
12. 使用 Excel 的“自动填充”工具栏,选择要将这些拼音自动应用到的单元格范围。
13. 在“自动填充”工具栏中,选择“从下拉列表中选择”按钮,然后在弹出的对话框中选择“拼音”。
14. 在“自动填充”工具栏中,选择“继续”按钮,然后按照需要重复执行此过程,直到将所有汉字变成拼音。
以上是在 Excel 中批量将汉字变成拼音的设置方法。
要获得评分最高的内容,请确保遵循最佳实践,包括准确性、可靠性和可读性。
同时,尽可能地减少使用编造成分,以提高回答的质量和价值。
excelVBA汉字转化为无音标全拼音并首字母大写

excelVBA汉字转化为无音标全拼音并首字母大写Function pinyin(p As String) As Stringi = Asc(p)Select Case iCase -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 -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 -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: pinyin ="Ju " Case -16664 To -16658: pinyin ="Juan " Case -16657 To -16648: pinyin ="Jue " Case -16647 To -16475: pinyin ="Jun " Case -16474 To -16471: pinyin ="Ka " Case -16470 To -16466: pinyin ="Kai " Case -16465 To -16460: pinyin ="Kan " Case -16459 To -16453: pinyin ="Kang " Case -16452 To -16449: pinyin ="Kao " Case -16448 To -16434: pinyin ="Ke " Case -16433 To -16430: pinyin ="Ken " Case -16429 To -16428: pinyin ="Keng " Case -16427 To -16424: pinyin ="Kong " Case -16423 To -16420: pinyin ="Kou " Case -16419 To -16413: pinyin ="Ku " Case -16412 To -16408: pinyin ="Kua " Case -16407 To -16404: pinyin ="Kuai " Case -16403 To -16402: pinyin ="Kuan " Case -16401 To -16394: pinyin ="Kuang "Case -16220 To -16217: pinyin ="Kun " Case -16216 To -16213: pinyin ="Kuo " Case -16212 To -16206: pinyin ="La " Case -16205 To -16203: pinyin ="Lai " Case -16202 To -16188: pinyin ="Lan " Case -16187 To -16181: pinyin ="Lang " Case -16180 To -16172: pinyin ="Lao "Case -16171 To -16170: pinyin ="Le " Case -16169 To -16159: pinyin ="Lei " Case -16158 To -16156: pinyin ="Leng " Case -16155 To -15960: pinyin ="Li " Case -15959 To -15959: pinyin ="Lia " Case -15958 To -15945: pinyin ="Lian " Case -15944 To -15934: pinyin ="Liang " Case -15933 To -15921: pinyin ="Liao " Case -15920 To -15916: pinyin ="Lie " Case -15915 To -15904: pinyin ="Lin " Case -15903 To -15890: pinyin ="Ling " Case -15889 To -15879: pinyin ="Liu " Case -15878 To -15708: pinyin ="Long " Case -15707 To -15702: pinyin ="Lou " Case -15701 To -15682: pinyin ="Lu " Case -15681 To -15668: pinyin ="Lv " Case -15667 To -15662: pinyin ="Luan " Case -15661 To -15660: pinyin ="Lue " Case -15659 To -15653: pinyin ="Lun " Case -15652 To -15641: pinyin ="Luo " Case -15640 To -15632: pinyin ="Ma "Case -15625 To -15455: pinyin ="Man " Case -15454 To -15449: pinyin ="Mang " Case -15448 To -15437: pinyin ="Mao " Case -15436 To -15436: pinyin ="Me " Case -15435 To -15420: pinyin ="Mei " Case -15419 To -15417: pinyin ="Men " Case -15416 To -15409: pinyin ="Meng " Case -15408 To -15395: pinyin ="Mi " Case -15394 To -15386: pinyin ="Mian " Case -15385 To -15378: pinyin ="Miao " Case -15377 To -15376: pinyin ="Mie " Case -15375 To -15370: pinyin ="Min " Case -15369 To -15364: pinyin ="Ming " Case -15363 To -15363: pinyin ="Miu " Case -15362 To -15184: pinyin ="Mo " Case -15183 To -15181: pinyin ="Mou " Case -15180 To -15166: pinyin ="Mu " Case -15165 To -15159: pinyin ="Na " Case -15158 To -15154: pinyin ="Nai " Case -15153 To -15151: pinyin ="Nan " Case -15150 To -15150: pinyin ="Nang " Case -15149 To -15145: pinyin ="Nao " Case -15144 To -15144: pinyin ="Ne " Case -15143 To -15142: pinyin ="Nei " Case -15141 To -15141: pinyin ="Nen " Case -15140 To -15140: pinyin ="Neng " Case -15139 To -15129: pinyin ="Ni " Case -15128 To -15122: pinyin ="Nian " Case -15121 To -15120: pinyin ="Niang "Case -15117 To -15111: pinyin ="Nie " Case -15110 To -15110: pinyin ="Nin " Case -15109 To -14942: pinyin ="Ning " Case -14941 To -14938: pinyin ="Niu " Case -14937 To -14934: pinyin ="Nong " Case -14933 To -14931: pinyin ="Nu " Case -14930 To -14930: pinyin ="Nv " Case -14929 To -14929: pinyin ="Nuan " Case -14928 To -14927: pinyin ="Nue " Case -14926 To -14923: pinyin ="Nuo " Case -14922 To -14922: pinyin ="O " Case -14921 To -14915: pinyin ="Ou " Case -14914 To -14909: pinyin ="Pa " Case -14908 To -14903: pinyin ="Pai " Case -14902 To -14895: pinyin ="Pan " Case -14894 To -14890: pinyin ="Pang " Case -14889 To -14883: pinyin ="Pao " Case -14882 To -14874: pinyin ="Pei " Case -14873 To -14872: pinyin ="Pen " Case -14871 To -14858: pinyin ="Peng " Case -14857 To -14679: pinyin ="Pi " Case -14678 To -14675: pinyin ="Pian " Case -14674 To -14671: pinyin ="Piao " Case -14670 To -14669: pinyin ="Pie "Case -14668 To -14664: pinyin ="Pin " Case -14663 To -14655: pinyin ="Ping " Case -14654 To -14646: pinyin ="Po " Case -14645 To -14631: pinyin ="Pu "Case -14630 To -14595: pinyin ="Qi " Case -14594 To -14430: pinyin ="Qia " Case -14429 To -14408: pinyin ="Qian " Case -14407 To -14400: pinyin ="Qiang " Case -14399 To -14385: pinyin ="Qiao " Case -14384 To -14380: pinyin ="Qie " Case -14379 To -14369: pinyin ="Qin " Case -14368 To -14356: pinyin ="Qing " Case -14355 To -14354: pinyin ="Qiong " Case -14353 To -14346: pinyin ="Qiu " Case -14345 To -14171: pinyin ="Qu " Case -14170 To -14160: pinyin ="Quan " Case -14159 To -14152: pinyin ="Que " Case -14151 To -14150: pinyin ="Qun " Case -14149 To -14146: pinyin ="Ran " Case -14145 To -14141: pinyin ="Rang " Case -14140 To -14138: pinyin ="Rao " Case -14137 To -14136: pinyin ="Re " Case -14135 To -14126: pinyin ="Ren " Case -14125 To -14124: pinyin ="Reng " Case -14123 To -14123: pinyin ="Ri " Case -14122 To -14113: pinyin ="Rong " Case -14112 To -14110: pinyin ="Rou " Case -14109 To -14100: pinyin ="Ru " Case -14099 To -14098: pinyin ="Ruan " Case -14097 To -14095: pinyin ="Rui " Case -14094 To -14093: pinyin ="Run " Case -14092 To -14091: pinyin ="Ruo " Case -14090 To -14088: pinyin ="Sa " Case -14087 To -14084: pinyin ="Sai "Case -14083 To -13918: pinyin ="San " Case -13917 To -13915: pinyin ="Sang " Case -13914 To -13911: pinyin ="Sao " Case -13910 To -13908: pinyin ="Se " Case -13907 To -13907: pinyin ="Sen " Case -13906 To -13906: pinyin ="Seng " Case -13905 To -13897: pinyin ="Sha " Case -13896 To -13895: pinyin ="Shai " Case -13894 To -13879: pinyin ="Shan " Case -13878 To -13871: pinyin ="Shang " Case -13870 To -13860: pinyin ="Shao " Case -13859 To -13848: pinyin ="She " Case -13847 To -13832: pinyin ="Shen " Case -13831 To -13659: pinyin ="Sheng " Case -13658 To -13612: pinyin ="Shi " Case -13611 To -13602: pinyin ="Shou " Case -13601 To -13407: pinyin ="Shu " Case -13406 To -13405: pinyin ="Shua " Case -13404 To -13401: pinyin ="Shuai " Case -13400 To -13399: pinyin ="Shuan " Case -13398 To -13396: pinyin ="Shuang " Case -13395 To -13392: pinyin ="Shui " Case -13391 To -13388: pinyin ="Shun " Case -13387 To -13384: pinyin ="Shuo " Case -13383 To -13368: pinyin ="Si " Case -13367 To -13360: pinyin ="Song " Case -13359 To -13357: pinyin ="Sou " Case -13356 To -13344: pinyin ="Su " Case -13343 To -13341: pinyin ="Suan " Case -13340 To -13330: pinyin ="Sui "Case -13326 To -13319: pinyin ="Suo " Case -13318 To -13148: pinyin ="Ta " Case -13147 To -13139: pinyin ="Tai " Case -13138 To -13121: pinyin ="Tan " Case -13120 To -13108: pinyin ="Tang " Case -13107 To -13097: pinyin ="Tao " Case -13096 To -13096: pinyin ="Te " Case -13095 To -13092: pinyin ="Teng " Case -13091 To -13077: pinyin ="Ti " Case -13076 To -13069: pinyin ="Tian " Case -13068 To -13064: pinyin ="Tiao " Case -13063 To -13061: pinyin ="Tie "Case -13060 To -12889: pinyin ="Ting " Case -12888 To -12876: pinyin ="T ong " Case -12875 To -12872: pinyin ="T ou " Case -12871 To -12861: pinyin ="Tu " Case -12860 To -12859: pinyin ="Tuan " Case -12858 To -12853: pinyin ="Tui " Case -12852 To -12850: pinyin ="Tun " Case -12849 To -12839: pinyin ="Tuo " Case -12838 To -12832: pinyin ="Wa " Case -12831 To -12830: pinyin ="Wai " Case -12829 To -12813: pinyin ="Wan " Case -12812 To -12803: pinyin ="Wang " Case -12802 To -12608: pinyin ="Wei " Case -12607 To -12598: pinyin ="Wen " Case -12597 To -12595: pinyin ="Weng " Case -12594 To -12586: pinyin ="Wo "Case -12556 To -12360: pinyin ="Xi " Case -12359 To -12347: pinyin ="Xia " Case -12346 To -12321: pinyin ="Xian " Case -12320 To -12301: pinyin ="Xiang " Case -12300 To -12121: pinyin ="Xiao " Case -12120 To -12100: pinyin ="Xie " Case -12099 To -12090: pinyin ="Xin " Case -12089 To -12075: pinyin ="Xing " Case -12074 To -12068: pinyin ="Xiong " Case -12067 To -12059: pinyin ="Xiu " Case -12058 To -12040: pinyin ="Xu " Case -12039 To -11868: pinyin ="Xuan " Case -11867 To -11862: pinyin ="Xue " Case -11861 To -11848: pinyin ="Xun " Case -11847 To -11832: pinyin ="Ya " Case -11831 To -11799: pinyin ="Yan " Case -11798 To -11782: pinyin ="Yang " Case -11781 To -11605: pinyin ="Yao " Case -11604 To -11590: pinyin ="Ye " Case -11589 To -11537: pinyin ="Yi " Case -11536 To -11359: pinyin ="Yin " Case -11358 To -11341: pinyin ="Ying " Case -11340 To -11340: pinyin ="Yo " Case -11339 To -11325: pinyin ="Yong " Case -11324 To -11304: pinyin ="You " Case -11303 To -11098: pinyin ="Yu " Case -11097 To -11078: pinyin ="Yuan " Case -11077 To -11068: pinyin ="Yue " Case -11067 To -11056: pinyin ="Yun "Case -11052 To -11046: pinyin ="Zai " Case -11045 To -11042: pinyin ="Zan " Case -11041 To -11039: pinyin ="Zang " Case -11038 To -11025: pinyin ="Zao " Case -11024 To -11021: pinyin ="Ze " Case -11020 To -11020: pinyin ="Zei " Case -11019 To -11019: pinyin ="Zen " Case -11018 To -11015: pinyin ="Zeng " Case -11014 To -10839: pinyin ="Zha " Case -10838 To -10833: pinyin ="Zhai " Case -10832 To -10816: pinyin ="Zhan " Case -10815 To -10801: pinyin ="Zhang " Case -10800 To -10791: pinyin ="Zhao " Case -10790 To -10781: pinyin ="Zhe " Case -10780 To -10765: pinyin ="Zhen " Case -10764 To -10588: pinyin ="Zheng " Case -10587 To -10545: pinyin ="Zhi " Case -10544 To -10534: pinyin ="Zhong " Case -10533 To -10520: pinyin ="Zhou " Case -10519 To -10332: pinyin ="Zhu " Case -10331 To -10330: pinyin ="Zhua " Case -10329 To -10329: pinyin ="Zhuai " Case -10328 To -10323: pinyin ="Zhuan " Case -10322 To -10316: pinyin ="Zhuang " Case -10315 To -10310: pinyin ="Zhui " Case -10309 To -10308: pinyin ="Zhun " Case -10307 To -10297: pinyin ="Zhuo " Case -10296 To -10282: pinyin ="Zi " Case -10281 To-10275: pinyin ="Zong "Case -10274 To -10271: pinyin ="Zou " Case -10270 To -10263: pinyin ="Zu " Case -10262 To -10261: pinyin ="Zuan " Case -10260 To -10257: pinyin ="Zui " Case -10256 To -10255: pinyin ="Zun " Case -10254 To -10254: pinyin ="Zuo " Case Else: pinyin = pEnd SelectEnd FunctionFunction getpy(str)For i = 1 To Len(str)getpy = getpy & pinyin(Mid(str, i, 1)) Next iEnd Function。
excel 表格将汉字名字转换为汉语拼音

excel 表格将汉字名字,转换为汉语拼音excel 表格将汉字名字,转换为汉语拼音,除婵、婷、妍、倩、奕、嫦、冼、钰、炜、泉、楠、佼等部分字不能转换外,大部可以用此方法转换的。
打开excel 添加个模块Function PinYin(Hz As String)Dim PinMa As StringDim MyPinMa As VariantDim Temp As Integer, i As Integer, j As IntegerPinMa = "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,200 32,bi,20026,bian,20002,biao,19990,bie,19986,bin,19982,bing,19976,bo,19805,bu,19 784,"PinMa = PinMa &"ca,19775,cai,19774,can,19763,cang,19756,cao,19751,ce,19746,ceng,19741,cha,1973 9,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,19288,chuang,1928 1,chui,19275,chun,19270,chuo,19263,ci,19261,cong,19249,cou,19243,cu,19242,cuan, 19238,cui,19235,cun,19227,cuo,19224,"PinMa = PinMa &"da,19218,dai,19212,dan,19038,dang,19023,dao,19018,de,19006,deng,19003,di,18996 ,dian,18977,diao,18961,die,18952,ding,18783,diu,18774,dong,18773,dou,18763,du,1 8756,duan,18741,dui,18735,dun,18731,duo,18722,"PinMa = PinMa & "e,18710,en,18697,er,18696,"PinMa = PinMa &"fa,18526,fan,18518,fang,18501,fei,18490,fen,18478,feng,18463,fo,18448,fou,1844 7,fu,18446,"PinMa = PinMa &"ga,18239,gai,18237,gan,18231,gang,18220,gao,18211,ge,18201,gei,18184,gen,18183 ,geng,18181,gong,18012,gou,17997,gu,17988,gua,17970,guai,17964,guan,17961,guang ,17950,gui,17947,gun,17931,guo,17928,"PinMa = PinMa &"ha,17922,hai,17759,han,17752,hang,17733,hao,17730,he,17721,hei,17703,hen,17701,heng,17697,hong,17692,hou,17683,hu,17676,hua,17496,huai,17487,huan,17482,huang ,17468,hui,17454,hun,17433,huo,17427,"PinMa = PinMa &"ji,17417,jia,17202,jian,17185,jiang,16983,jiao,16970,jie,16942,jin,16915,jing, 16733,jiong,16708,jiu,16706,ju,16689,juan,16664,jue,16657,jun,16647,"PinMa = PinMa &"ka,16474,kai,16470,kan,16465,kang,16459,kao,16452,ke,16448,ken,16433,keng,1642 9,kong,16427,kou,16423,ku,16419,kua,16412,kuai,16407,kuan,16403,kuang,16401,kui ,16393,kun,16220,kuo,16216,"PinMa = PinMa &"la,16212,lai,16205,lan,16202,lang,16187,lao,16180,le,16171,lei,16169,leng,1615 8,li,16155,lia,15959,lian,15958,liang,15944,liao,15933,lie,15920,lin,15915,ling ,15903,liu,15889,long,15878,lou,15707,lu,15701,lv,15681,luan,15667,lue,15661,lu n,15659,luo,15652,"PinMa = PinMa &"ma,15640,mai,15631,man,15625,mang,15454,mao,15448,me,15436,mei,15435,men,15419 ,meng,15416,mi,15408,mian,15394,miao,15385,mie,15377,min,15375,ming,15369,miu,1 5363,mo,15362,mou,15183,mu,15180,"PinMa = PinMa &"na,15165,nai,15158,nan,15153,nang,15150,nao,15149,ne,15144,nei,15143,nen,15141 ,neng,15140,ni,15139,nian,15128,niang,15121,niao,15119,nie,15117,nin,15110,ning ,15109,niu,14941,nong,14937,nu,14933,nv,14930,nuan,14929,nue,14928,nuo,14926," PinMa = PinMa & "o,14922,ou,14921,"PinMa = PinMa &"pa,14914,pai,14908,pan,14902,pang,14894,pao,14889,pei,14882,pen,14873,peng,148 71,pi,14857,pian,14678,piao,14674,pie,14670,pin,14668,ping,14663,po,14654,pu,14 645,"PinMa = PinMa &"qi,14630,qia,14594,qian,14429,qiang,14407,qiao,14399,qie,14384,qin,14379,qing, 14368,qiong,14355,qiu,14353,qu,14345,quan,14170,que,14159,qun,14151,"PinMa = PinMa &"ran,14149,rang,14145,rao,14140,re,14137,ren,14135,reng,14125,ri,14123,rong,141 22,rou,14112,ru,14109,ruan,14099,rui,14097,run,14094,ruo,14092,"PinMa = PinMa &"sa,14090,sai,14087,san,14083,sang,13917,sao,13914,se,13910,sen,13907,seng,1390 6,sha,13905,shai,13896,shan,13894,shang,13878,shao,13870,she,13859,shen,13847,s heng,13831,shi,13658,shou,13611,shu,13601,shua,13406,shuai,13404,shuan,13400,sh uang,13398,shui,13395,shun,13391,shuo,13387,si,13383,song,13367,sou,13359,su,13 356,suan,13343,sui,13340,sun,13329,suo,13326,"PinMa = PinMa &"ta,13318,tai,13147,tan,13138,tang,13120,tao,13107,te,13096,teng,13095,ti,13091 ,tian,13076,tiao,13068,tie,13063,ting,13060,tong,12888,tou,12875,tu,12871,tuan, 12860,tui,12858,tun,12852,tuo,12849,"PinMa = PinMa &"wa,12838,wai,12831,wan,12829,wang,12812,wei,12802,wen,12607,weng,12597,wo,1259 4,wu,12585,"PinMa = PinMa &"xi,12556,xia,12359,xian,12346,xiang,12320,xiao,12300,xie,12120,xin,12099,xing, 12089,xiong,12074,xiu,12067,xu,12058,xuan,12039,xue,11867,xun,11861,"PinMa = PinMa &"ya,11847,yan,11831,yang,11798,yao,11781,ye,11604,yi,11589,yin,11536,ying,11358 ,yo,11340,yong,11339,you,11324,yu,11303,yuan,11097,yue,11077,yun,11067," PinMa = PinMa &"za,11055,zai,11052,zan,11045,zang,11041,zao,11038,ze,11024,zei,11020,zen,11019 ,zeng,11018,zha,11014,zhai,10838,zhan,10832,zhang,10815,zhao,10800,zhe,10790,zh en,10780,zheng,10764,zhi,10587,zhong,10544,zhou,10533,zhu,10519,zhua,10331,zhua i,10329,zhuan,10328,zhuang,10322,zhui,10315,zhun,10309,zhuo,10307,zi,10296,zong ,10281,zou,10274,zu,10270,zuan,10262,zui,10260,zun,10256,zuo,10254"MyPinMa = Split(PinMa, ",")For i = 1 To Len(Hz)Temp = Asc(Mid(Hz, i, 1))If Temp < 0 ThenTemp = Abs(Temp)For j = 791 To 1 Step -2If Temp <= Val(MyPinMa(j)) ThenPinYin = PinYin & MyPinMa(j - 1) & " "Exit ForEnd IfNextEnd IfNextPinYin = Trim(PinYin)End Function以上拼音码表是从网上一些工具源文伯中获得,未全部验证其准确性,但愿不会有错吧!至于算法就是根据汉字ASC码与码表进行比对,有点难看.使用中发现上边码表所获仅限于GB2312-80 I 级汉字然后再任意单元格输入=pinyin(A1)就把A1中的汉字转换成拼音了。
- 1、下载文档前请自行甄别文档内容的完整性,平台不提供额外的编辑、内容补充、找答案等附加服务。
- 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
- 3、如文档侵犯您的权益,请联系客服反馈,我们会尽快为您处理(人工客服工作时间:9:00-18:30)。
Excel自定义函数方法:1.启动Excel 2003(其它版本请仿照操作),打开相应的工作表;2.执行“工具→宏→Visual Basic编辑器”命令(或者直接按“Alt+F11”组合键),进入Visual Basic编辑状态;3.执行“插入→模块”命令,插入一个新模块。
再双击插入的模块,进入模块代码编辑状态;4.将代码输入其中;5.代码输入完成后,关闭Visual Basic编辑窗口,返回Excel编辑状态;6.自定义函数就可以用了,如:选中D2单元格,输入公式:=getpy(A2)。
有极个别的汉字不能转换,手动就可以了!很方便了。
Function pinyin(p As String) As Stringi = Asc(p)Select Case iCase -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 -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 -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 -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: pinyin = "ju " Case -16664 To -16658: pinyin = "juan " Case -16657 To -16648: pinyin = "jue " Case -16647 To -16475: pinyin = "jun " Case -16474 To -16471: pinyin = "ka " Case -16470 To -16466: pinyin = "kai " Case -16465 To -16460: pinyin = "kan " Case -16459 To -16453: pinyin = "kang " Case -16452 To -16449: pinyin = "kao " Case -16448 To -16434: pinyin = "ke " Case -16433 To -16430: pinyin = "ken " Case -16429 To -16428: pinyin = "keng " Case -16427 To -16424: pinyin = "kong " Case -16423 To -16420: pinyin = "kou " Case -16419 To -16413: pinyin = "ku " Case -16412 To -16408: pinyin = "kua " Case -16407 To -16404: pinyin = "kuai " Case -16403 To -16402: pinyin = "kuan " Case -16401 To -16394: pinyin = "kuang " Case -16393 To -16221: pinyin = "kui " Case -16220 To -16217: pinyin = "kun " Case -16216 To -16213: pinyin = "kuo " Case -16212 To -16206: pinyin = "la " Case -16205 To -16203: pinyin = "lai " Case -16202 To -16188: pinyin = "lan " Case -16187 To -16181: pinyin = "lang " Case -16180 To -16172: pinyin = "lao " Case -16171 To -16170: pinyin = "le " Case -16169 To -16159: pinyin = "lei " Case -16158 To -16156: pinyin = "leng " Case -16155 To -15960: pinyin = "li " Case -15959 To -15959: pinyin = "lia " Case -15958 To -15945: pinyin = "lian " Case -15944 To -15934: pinyin = "liang " Case -15933 To -15921: pinyin = "liao " Case -15920 To -15916: pinyin = "lie " Case -15915 To -15904: pinyin = "lin "Case -15889 To -15879: pinyin = "liu " Case -15878 To -15708: pinyin = "long " Case -15707 To -15702: pinyin = "lou " Case -15701 To -15682: pinyin = "lu " Case -15681 To -15668: pinyin = "lv " Case -15667 To -15662: pinyin = "luan " Case -15661 To -15660: pinyin = "lue " Case -15659 To -15653: pinyin = "lun " Case -15652 To -15641: pinyin = "luo " Case -15640 To -15632: pinyin = "ma " Case -15631 To -15626: pinyin = "mai " Case -15625 To -15455: pinyin = "man " Case -15454 To -15449: pinyin = "mang " Case -15448 To -15437: pinyin = "mao " Case -15436 To -15436: pinyin = "me " Case -15435 To -15420: pinyin = "mei " Case -15419 To -15417: pinyin = "men " Case -15416 To -15409: pinyin = "meng " Case -15408 To -15395: pinyin = "mi " Case -15394 To -15386: pinyin = "mian " Case -15385 To -15378: pinyin = "miao " Case -15377 To -15376: pinyin = "mie " Case -15375 To -15370: pinyin = "min " Case -15369 To -15364: pinyin = "ming " Case -15363 To -15363: pinyin = "miu " Case -15362 To -15184: pinyin = "mo " Case -15183 To -15181: pinyin = "mou " Case -15180 To -15166: pinyin = "mu " Case -15165 To -15159: pinyin = "na " Case -15158 To -15154: pinyin = "nai " Case -15153 To -15151: pinyin = "nan " Case -15150 To -15150: pinyin = "nang " Case -15149 To -15145: pinyin = "nao " Case -15144 To -15144: pinyin = "ne " Case -15143 To -15142: pinyin = "nei " Case -15141 To -15141: pinyin = "nen " Case -15140 To -15140: pinyin = "neng " Case -15139 To -15129: pinyin = "ni " Case -15128 To -15122: pinyin = "nian " Case -15121 To -15120: pinyin = "niang " Case -15119 To -15118: pinyin = "niao " Case -15117 To -15111: pinyin = "nie " Case -15110 To -15110: pinyin = "nin "Case -14941 To -14938: pinyin = "niu " Case -14937 To -14934: pinyin = "nong " Case -14933 To -14931: pinyin = "nu " Case -14930 To -14930: pinyin = "nv " Case -14929 To -14929: pinyin = "nuan " Case -14928 To -14927: pinyin = "nue " Case -14926 To -14923: pinyin = "nuo " Case -14922 To -14922: pinyin = "o " Case -14921 To -14915: pinyin = "ou " Case -14914 To -14909: pinyin = "pa " Case -14908 To -14903: pinyin = "pai " Case -14902 To -14895: pinyin = "pan " Case -14894 To -14890: pinyin = "pang " Case -14889 To -14883: pinyin = "pao " Case -14882 To -14874: pinyin = "pei " Case -14873 To -14872: pinyin = "pen " Case -14871 To -14858: pinyin = "peng " Case -14857 To -14679: pinyin = "pi " Case -14678 To -14675: pinyin = "pian " Case -14674 To -14671: pinyin = "piao " Case -14670 To -14669: pinyin = "pie " Case -14668 To -14664: pinyin = "pin " Case -14663 To -14655: pinyin = "ping " Case -14654 To -14646: pinyin = "po " Case -14645 To -14631: pinyin = "pu " Case -14630 To -14595: pinyin = "qi " Case -14594 To -14430: pinyin = "qia " Case -14429 To -14408: pinyin = "qian " Case -14407 To -14400: pinyin = "qiang " Case -14399 To -14385: pinyin = "qiao " Case -14384 To -14380: pinyin = "qie " Case -14379 To -14369: pinyin = "qin " Case -14368 To -14356: pinyin = "qing " Case -14355 To -14354: pinyin = "qiong " Case -14353 To -14346: pinyin = "qiu " Case -14345 To -14171: pinyin = "qu " Case -14170 To -14160: pinyin = "quan " Case -14159 To -14152: pinyin = "que " Case -14151 To -14150: pinyin = "qun " Case -14149 To -14146: pinyin = "ran " Case -14145 To -14141: pinyin = "rang " Case -14140 To -14138: pinyin = "rao " Case -14137 To -14136: pinyin = "re "Case -14125 To -14124: pinyin = "reng " Case -14123 To -14123: pinyin = "ri " Case -14122 To -14113: pinyin = "rong " Case -14112 To -14110: pinyin = "rou " Case -14109 To -14100: pinyin = "ru " Case -14099 To -14098: pinyin = "ruan " Case -14097 To -14095: pinyin = "rui " Case -14094 To -14093: pinyin = "run " Case -14092 To -14091: pinyin = "ruo " Case -14090 To -14088: pinyin = "sa " Case -14087 To -14084: pinyin = "sai " Case -14083 To -13918: pinyin = "san " Case -13917 To -13915: pinyin = "sang " Case -13914 To -13911: pinyin = "sao " Case -13910 To -13908: pinyin = "se " Case -13907 To -13907: pinyin = "sen " Case -13906 To -13906: pinyin = "seng " Case -13905 To -13897: pinyin = "sha " Case -13896 To -13895: pinyin = "shai " Case -13894 To -13879: pinyin = "shan " Case -13878 To -13871: pinyin = "shang " Case -13870 To -13860: pinyin = "shao " Case -13859 To -13848: pinyin = "she " Case -13847 To -13832: pinyin = "shen " Case -13831 To -13659: pinyin = "sheng " Case -13658 To -13612: pinyin = "shi " Case -13611 To -13602: pinyin = "shou " Case -13601 To -13407: pinyin = "shu " Case -13406 To -13405: pinyin = "shua " Case -13404 To -13401: pinyin = "shuai " Case -13400 To -13399: pinyin = "shuan " Case -13398 To -13396: pinyin = "shuang " Case -13395 To -13392: pinyin = "shui " Case -13391 To -13388: pinyin = "shun " Case -13387 To -13384: pinyin = "shuo " Case -13383 To -13368: pinyin = "si " Case -13367 To -13360: pinyin = "song " Case -13359 To -13357: pinyin = "sou " Case -13356 To -13344: pinyin = "su " Case -13343 To -13341: pinyin = "suan " Case -13340 To -13330: pinyin = "sui " Case -13329 To -13327: pinyin = "sun " Case -13326 To -13319: pinyin = "suo "Case -13147 To -13139: pinyin = "tai " Case -13138 To -13121: pinyin = "tan " Case -13120 To -13108: pinyin = "tang " Case -13107 To -13097: pinyin = "tao " Case -13096 To -13096: pinyin = "te " Case -13095 To -13092: pinyin = "teng " Case -13091 To -13077: pinyin = "ti " Case -13076 To -13069: pinyin = "tian " Case -13068 To -13064: pinyin = "tiao " Case -13063 To -13061: pinyin = "tie " Case -13060 To -12889: pinyin = "ting " Case -12888 To -12876: pinyin = "tong " Case -12875 To -12872: pinyin = "tou " Case -12871 To -12861: pinyin = "tu " Case -12860 To -12859: pinyin = "tuan " Case -12858 To -12853: pinyin = "tui " Case -12852 To -12850: pinyin = "tun " Case -12849 To -12839: pinyin = "tuo " Case -12838 To -12832: pinyin = "wa " Case -12831 To -12830: pinyin = "wai " Case -12829 To -12813: pinyin = "wan " Case -12812 To -12803: pinyin = "wang " Case -12802 To -12608: pinyin = "wei " Case -12607 To -12598: pinyin = "wen " Case -12597 To -12595: pinyin = "weng " Case -12594 To -12586: pinyin = "wo " Case -12585 To -12557: pinyin = "wu " Case -12556 To -12360: pinyin = "xi " Case -12359 To -12347: pinyin = "xia " Case -12346 To -12321: pinyin = "xian " Case -12320 To -12301: pinyin = "xiang " Case -12300 To -12121: pinyin = "xiao " Case -12120 To -12100: pinyin = "xie " Case -12099 To -12090: pinyin = "xin " Case -12089 To -12075: pinyin = "xing " Case -12074 To -12068: pinyin = "xiong " Case -12067 To -12059: pinyin = "xiu " Case -12058 To -12040: pinyin = "xu " Case -12039 To -11868: pinyin = "xuan " Case -11867 To -11862: pinyin = "xue " Case -11861 To -11848: pinyin = "xun " Case -11847 To -11832: pinyin = "ya " Case -11831 To -11799: pinyin = "yan "Case -11781 To -11605: pinyin = "yao " Case -11604 To -11590: pinyin = "ye " Case -11589 To -11537: pinyin = "yi " Case -11536 To -11359: pinyin = "yin " Case -11358 To -11341: pinyin = "ying " Case -11340 To -11340: pinyin = "yo " Case -11339 To -11325: pinyin = "yong " Case -11324 To -11304: pinyin = "you " Case -11303 To -11098: pinyin = "yu " Case -11097 To -11078: pinyin = "yuan " Case -11077 To -11068: pinyin = "yue " Case -11067 To -11056: pinyin = "yun " Case -11055 To -11053: pinyin = "za " Case -11052 To -11046: pinyin = "zai " Case -11045 To -11042: pinyin = "zan " Case -11041 To -11039: pinyin = "zang " Case -11038 To -11025: pinyin = "zao " Case -11024 To -11021: pinyin = "ze " Case -11020 To -11020: pinyin = "zei " Case -11019 To -11019: pinyin = "zen " Case -11018 To -11015: pinyin = "zeng " Case -11014 To -10839: pinyin = "zha " Case -10838 To -10833: pinyin = "zhai " Case -10832 To -10816: pinyin = "zhan " Case -10815 To -10801: pinyin = "zhang " Case -10800 To -10791: pinyin = "zhao " Case -10790 To -10781: pinyin = "zhe " Case -10780 To -10765: pinyin = "zhen " Case -10764 To -10588: pinyin = "zheng " Case -10587 To -10545: pinyin = "zhi " Case -10544 To -10534: pinyin = "zhong " Case -10533 To -10520: pinyin = "zhou " Case -10519 To -10332: pinyin = "zhu " Case -10331 To -10330: pinyin = "zhua " Case -10329 To -10329: pinyin = "zhuai " Case -10328 To -10323: pinyin = "zhuan " Case -10322 To -10316: pinyin = "zhuang " Case -10315 To -10310: pinyin = "zhui " Case -10309 To -10308: pinyin = "zhun " Case -10307 To -10297: pinyin = "zhuo " Case -10296 To -10282: pinyin = "zi " Case -10281 To -10275: pinyin = "zong " Case -10274 To -10271: pinyin = "zou "Case -10262 To -10261: pinyin = "zuan "Case -10260 To -10257: pinyin = "zui "Case -10256 To -10255: pinyin = "zun "Case -10254 To -10254: pinyin = "zuo "Case Else: pinyin = pEnd SelectEnd FunctionFunction getpy(str)For i = 1 To Len(str)getpy = getpy & pinyin(Mid(str, i, 1))Next iEnd Function只需要在Excel中使用=getpy(列)使用公式,去掉拼音之间的空格假设你的这个数据在A1单元格,在B1单元格输入:=SUBSTITUTE(A1," ","")。