excel怎么批量将汉字转换成拼音
excel怎么批量将汉字转换成拼音?下面2345软件大全小编给大家介绍下。
步骤
1、打开一张需要转换的Excel表格(如图所示，小编乱打的姓名，如有雷同，纯属巧合)
2、执行“工具→宏→Visual Basic编辑器”命令，或者直接按“Alt+F11”组合键，进入Visual Basic编辑状态。也就是图中所用的灰色的编辑界面
3、如图所示，点击“插入→模块”命令
4、插入一个新模块后，会看到如图所示的界面
5、由于字数限制，代码过多无法在这里输入，代码以TXT文本格式存在百度云盘中
下载链接: /s/1pLguxFd
然后将文本中的所有代码复制后，粘贴到“步骤4”中的空白处
6、代码粘贴完成后，直接关闭Visual Basic编辑窗口即可，返回到Excel编辑状态
7、这时自定义函数就可以使用用了，如：要把A列的第2行的内容转换成拼音，放在B列的第2个单元格，输入公式：=getpy(A2)，这里的A2，是指需要转换的汉子单元格的坐标，最后按“回车”即可
8、在通过下拉，批量实现多行的内容转换
PS:会有部分汉子无法转换只能手动转换了,代码的问题，可能是汉字太多无法全部识别吧，但是大部分转换成功后，其它个别的就好办多了，本实例也列出2个无法转换的汉字
注意事项
会有部分汉子无法转换只能手动转换了,代码的问题，可能是汉子太多无法全部识别吧，但是大部分转换成功后，其它个别的就好办多了
绛旓細1. 棣栧厛锛屽湪WPS Excel涓墦寮浣犻渶瑕佽浆鎹㈡嫾闊崇殑琛ㄦ牸銆2. 閫変腑鍖呭惈姹夊瓧鐨勫崟鍏冩牸鎴栧尯鍩熴備綘鍙互閫氳繃榧犳爣鐐瑰嚮骞舵嫋鎷芥潵閫夋嫨澶氫釜鍗曞厓鏍笺3. 鍦╓PS Excel鐨勮彍鍗曟爮涓紝鎵惧埌鈥滃紑濮嬧濋夐」鍗★紝骞剁偣鍑烩滄嫾闊虫寚鍗椻濇寜閽傝繖涓寜閽氬父浣嶄簬鈥滃瓧浣撯濈粍鐨勫彸涓嬭銆4. 鍦ㄥ脊鍑虹殑鈥滄嫾闊虫寚鍗椻濆璇濇涓紝浣犲彲浠ョ湅鍒伴夊畾鐨勬眽...
绛旓細1銆佹墦寮闇瑕佹暣鐞嗙殑琛ㄦ牸鏁版嵁,濡備笅鍥2銆佸揩鎹烽敭alt+f11,璋冨嚭瀹忚缃〉闈,閫夋嫨鎻掑叆涓殑妯″潡閫夐」3銆佸湪鍑虹幇鐨勬ā鍧楅潰鏉夸腑,瀹氫箟涓涓猤etpy鐨勬柟娉,灏嗗涓嬩唬鐮佺矘璐磋繘鍘籉unction pinyin(p As String) As Stringi = Asc(p)Select Case iCase -20319 To -20318: pinyin = a Case -20317 To -20305: pinyin = ai Case -...
绛旓細1銆侀鍏堟槸鎵撳紑Excel杞欢锛屽湪鍏朵腑娣诲姞涓浜姹夊瓧鍐呭锛屽涓嬪浘鎵绀 2銆佹帴涓嬫潵鍦–2鍗曞厓鏍艰緭鍏ュ叕寮廹etpy锛屾嫭鍙烽噷闈㈢殑鍙傛暟鏄眽瀛楃殑鍗曞厓鏍间綅缃紝濡備笅鍥炬墍绀 3銆佽緭鍏ュ畬鍏紡浠ュ悗鎸塃nter閿氨鍙互寰楀埌瀵瑰簲鐨勬眽瀛楁嫾闊充簡锛屽涓嬪浘鎵绀 4銆佹寜浣廋2鍗曞厓鏍煎彸涓嬭鍚戜笅鎷栨嫿灏卞彲浠ュ緱鍒版墍鏈夋眽瀛楃殑鎷奸煶浜嗭紝濡備笅鍥炬墍绀 宸ュ叿/鏉愭枡 ...
绛旓細浣跨敤鍑芥暟SUBSTITUTE锛氬彲浠ヤ娇鐢⊿UBSTITUTE鍑芥暟灏嗙壒瀹氱殑姹夊瓧鏇挎崲涓虹鍙銆備緥濡傦紝濡傛灉鎮ㄦ兂灏嗗崟鍏冩牸A1涓殑姹夊瓧鏇挎崲涓虹鍙凤紝鍙互浣跨敤浠ヤ笅鍏紡锛 =SUBSTITUTE(A1, "姹夊瓧", "绗﹀彿")浣跨敤鏉′欢鏍煎紡璁剧疆锛氭偍鍙互浣跨敤鏉′欢鏍煎紡璁剧疆锛屽皢鐗瑰畾鐨勬眽瀛楄浆鎹负绗﹀彿銆傞夋嫨鎮ㄦ兂瑕佽浆鎹㈢殑鍗曞厓鏍艰寖鍥达紝鐒跺悗鍦ㄢ滃紑濮嬧濋夐」鍗′腑閫夋嫨鈥滄潯浠...
绛旓細1銆侀鍏堝湪鑷繁鐢佃剳涓婏紝鎵撳紑Excel涓浠借〃鏍笺2銆佸湪鎵撳紑鐨勮〃鏍糄1鍗曞厓鏍间笂锛岃緭鍏ヨ浆鎷奸煶鐨勬眽瀛楋紝鐒跺悗鍦―2鍗曞厓鏍奸噷杈撳叆=getpy(A2)鍏紡銆傚洜涓哄鍚嶅湪A鍒椾笂锛屾墍浠ラ渶瑕佸紩鐢ㄥ崟鍏冩牸閫夋嫨A2銆3銆佽緭鍏ュ畬鍏紡閫変腑濂藉紩鐢ㄥ悕瀛楃殑鍗曞厓鏍间箣鍚庯紝鎸変笅纭畾閿湪D2鍗曞厓鏍煎氨鍙互鐪嬪埌濮撳悕宸茬粡杞崲鎴愭嫾闊充簡銆4銆佺劧鍚庨変腑D2鍗曞厓鏍...
绛旓細1銆侀鍏堟墦寮excel琛ㄦ牸锛屽湪閲岄潰杈撳叆涓浜涜嚜宸辫鎷奸煶鐨姹夊瓧锛屾湁浜涗汉灏辨槸鎯崇洿鎺ュ湪琛ㄦ牸涓緭鍏ユ嫾闊筹紝鐒跺悗鐐瑰嚮鍒楋紝鐐瑰嚮榧犳爣鍙抽敭锛岀劧鍚庨夋嫨澶嶅埗锛岃繖鏃跺欏氨澶嶅埗濂戒簡锛岀劧鍚庢墦寮word鏂囨。锛屽皢澶嶅埗鍐呭榛忚创杩涙潵鍗冲彲銆2銆佹帴鐫鐐瑰嚮寮濮嬪锛岀劧鍚庢壘鍒版嫾闊虫寚鍗楋紝濡傚浘鎵绀烘槸涓涓鏂囧瓧锛岃繕鏈夋嫾闊崇殑绗﹀彿锛岀洿鎺ョ偣鍑昏繖涓嵆鍙3銆佺劧鍚...
绛旓細浠婂ぉ锛岀郴缁熷皬缂栧氨涓哄ぇ瀹跺甫鏉excel2010灏嗘眽瀛楁壒閲忚浆鎹㈡垚鎷奸煶鏂规硶銆傛湁闇瑕佺殑鏈嬪弸浠紝鍙互涓璧风湅鐪嬨傛帹鑽愶細win1064浣嶅師鐗堜笅杞藉叿浣撳涓:1銆佹墦寮涓寮犻渶瑕佽浆鎹㈢殑Excel琛ㄦ牸锛堝鍥炬墍绀猴紝灏忕紪涔辨墦鐨勫鍚嶏紝濡傛湁闆峰悓锛岀函灞炲阀鍚堬級锛2銆佹墽琛屸滃伐鍏封啋瀹忊啋VisualBasic缂栬緫鍣ㄢ濆懡浠わ紝鎴栬呯洿鎺ユ寜鈥淎lt+F11鈥濈粍鍚堥敭锛岃繘鍏...
绛旓細1銆侀鍏堢敤office Excel 2007鎵撳紑鏂囨。锛涘鍥炬墍绀恒2銆佺劧鍚庨紶鏍囨爣瀹氬湪D2鍗曞厓鏍硷紝杈撳叆鍏紡鈥=getpy(C2)鈥濓紝鎸夊洖杞﹂敭纭锛涘鍥炬墍绀恒3銆佹垜浠氨鐪嬪埌濮撳悕涓鏍姹夎鎷奸煶灏辫嚜鍔ㄥ嚭鐜颁簡锛涘鍥炬墍绀恒4銆侀変腑D2鍗曞厓鏍硷紝榧犳爣鏀惧湪鍗曞厓鏍煎彸涓嬭,褰撳嚭鐜扳+鈥濆悗锛屽悜涓嬫嫋鍔ㄩ紶鏍囷紱濡傚浘鎵绀恒5銆佽繖鏍凤紝濮撳悕涓鏍忔墍鏈夌殑姹夊瓧閮...
绛旓細鎵撳紑闇瑕杞崲鐨excel琛ㄦ牸鍥1鍗曞嚮excel琛ㄦ牸鐨勪换鎰忎綅缃紝鐒跺悗鎸変笅ALT+F11锛岃繘鍏ヨ繖涓伆鑹茬殑缂栬緫鐣岄潰鍥2鎻掑叆--妯″潡鍥3鎵撳紑濡備笅鎵绀虹殑鐣岄潰銆傚浘4鎶婁笅闈㈢殑鍐呭澶嶅埗绮樿创鍒扮鍥涗釜姝ラ鎵撳紑鐨勭晫闈腑锛屽苟淇濆瓨锛屽弬鑰冧笅鍥炬搷浣溿侳unctionpinyin(pAsString)AsStringi=Asc(p)SelectCaseiCase-20319To-20318:pinyin=aCaseElse:...
绛旓細1銆佹墦寮鐢佃剳,鐒跺悗鎵撳紑闇瑕佺紪杈戠殑excel鏂囨。,寮濮嬮夐」鈥斺旀浛鎹㈤夐」;2銆佸湪鈥滄煡鎵惧唴瀹光濈殑杈撳叆妗嗚緭鍏ラ渶瑕佺殑鈥鏂囧瓧鍜屾暟瀛椻,鐒跺悗鐐瑰嚮鈥滄洿澶(M)鈥;3銆佸湪鈥滄牸寮忊濅腑閫夋嫨鍘熷瓧浣撴牸寮,鎵惧埌鈥滀笉鍚屽瓧浣撯濋夐」;4銆佹渶鍚庣偣鍑烩滀竴娆℃ф浛鎹负鈥,鍗冲彲瀹屾垚鎶奺xcel琛ㄦ牸涓殑鏂囧瓧鍜屾暟瀛椾竴娆℃ф浛鎹㈡垚涓嶅悓瀛椾綋銆備粎鍙傝 ...
