首页

文章

EXCEL汉字转拼音怎么转

发布网友 发布时间:2022-04-19 12:32

我来回答

4个回答

热心网友 时间:2022-04-12 02:08

汉字转拼音的完美解决方案~
err...至少是比较完美
经测试在office xp,2003,2007通过。

'***************************************************************************
'*
'* MODULE NAME: HzToPy
'* AUTHOR & DATE: tt.t
'* 29 March 2007
'*
'* Usage: Function HzToPy(HzStr as String) as String
'* e.g. Msgbox HzToPy("奥斯") will display ao4si1 with mspy2.0
'*
'*
'* DESCRIPTION: 将中文字符串转换为拼音,就这些~
'* 有汉字得到拼音其实并不是我很关心的一个问题,只是发现已经公开
'* 的方法有很大的缺陷,但WORD却做得很好,因此才尝试解决这个问题。
'* 过程比我预期的要曲折的多,主要是VBA实在是一种很受*的语言。
'* 不过好在有Google和Olldbg,难题也仅仅是如何找到绕过*的途径,
'* 终于在5个小时内搞定了一切~
'* 时间比我预计的长了很多,因为我实在是不了解VBA,也不很熟悉OLE:"(
'* 不过好在一切都解决了~~终于从VBA小白成长了一些。
'* 其实VBA也是很强大的~
'*
'* Theory: 废话了好多还是说说原理吧,虽然不是每个人都很关心~
'* WORD的拼音向导能够将汉字转成拼音全是倚仗微软拼音的帮助,
'* 微软拼音2.0以上版本都提供了汉字到拼音的转换功能。
'* 微软拼音MSIME.China类中的IFELanguage接口具体实现了转换功能
'* 不过MSIME.China中没有提供IDispatch接口,VBA的CreateObject不支持
'* 调用这样的类,因此我们只好手工调用。CoCreateInstance可以创建类
'* 并获取IFELanguage接口,但我们无法直接调用,因为VBA不知道如何调用
'* IFELanguage接口的Method。这里困扰了我好久,原本希望能向其他语言那样
'* 声明接口结构,但VBA并不支持。万般无奈下只好在OLE相关DLL中寻找,期待能
'* 找到代理函数简介调用接口的Method。呵呵~功夫不负苦心人终于在OLEAUT32中
'* 找到了DispCallfunc。Google了一下,果然是我需要的。接口知道了,如何调用也
'* 清楚了,剩下的问题就是如何取得转换后的结果。IFELanguage.GetMorphResult会将
'* 转换的结果存在一个叫做tagMORRSLT的结构中,并返回指向tagMORRSLT的指针。
'* 新问题又来了,VBA不支持指针...sigh,为什么其他语言很容易实现的功能VBA用起来
'* 就这么烦呢~幸好VBA读取内存的*也好突破,只需调用ntdll的RtlMoveMemory。
'* 好了~一切*都已解除,HzToPy终于正常工作了~~
'* 说起来一切顺理成章,可是寻找解决方法的过*的很痛苦,不过VBA经验值大涨也算有所收获。
'* 下面就让代码来说话吧。
'*
'*
'***************************************************************************
关键字:汉字 注音 拼音 IFELanguage vba DispCallfunc OLE
在废话一下,用windows ime api也可以实现汉字到拼音,但是在WINPY.ime中有个bug,
而且在2000 sp4~xp sp2一直存在,就是必须要将winnt\system32\winpy.mb考到系统盘根目录下才行。
这个bug存在了如此长的时间,估计是MS有意为之,鄙视一下。第二次更新:2007.04.05
似乎大家更喜欢直接使用函数而不是DIY,那就提供一个完整的函数供大家使用了 〔详细说明请看文件〕
函数原型如下:
HzToPy(Hz As String, Optional Sep As String = "", Optional ShowNotation As Boolean = True,
Optional ShowInitialOnly As Boolean, Optional ShowOnlyOneChar As Boolean = True) As String

参数名 参数类型 说明
第1个参数 Hz 字符型 为汉字字符串
第2个参数 Sep 字符型,可选 设定拼音间隔字符,默认为空("")
第3个参数 ShowNotation 布尔型,可选 设定是否显示注音符号,默认显示
第4个参数 ShowInitialOnly 布尔型,可选 设定是否仅显示拼音首字,默认显示全部
第5个参数 ShowOnlyOneChar 布尔型,可选 设定是否仅显示拼音首字母("zh"显示为"z"),默认只显示首字母

应用举例
目标汉字: 汉字转拼音举例

1 显示用空格分开的拼音
公式: =HzToPy($b$19," ")
结果: hàn zì zhuǎn pīn yīn jǔ lì
2 显示用空格分开的拼音,同时不显示注音符号
公式: =HzToPy($b$19," ",false)
结果: han zi zhuan pin yin ju li
3 显示用空格分开的拼音,不显示注音符号,同时仅显示拼音的首字,并大写
公式: =HzToPy($b$19," ",false,true,false)
结果: H Z ZH P Y J L
4 显示用空格分开的拼音,不显示注音符号,同时仅显示拼音的首字母,并大写
公式: =HzToPy($b$19," ",false,true)
结果: H Z Z P Y J L 这里是第二次更新的文件:
参考:http://club.excelhome.net/thread-229924-1-1.html

热心网友 时间:2022-04-12 03:26

在word 和EXCEL中,都可以:
选中内容----格式---拼音指南

但,在EXCEL中,用起来不如word 中方便,可以在word中形成,再粘贴到别的地方,如粘贴到EXCEL中。

如(rú)何(hé)将(jiāng)EXCEL表(biǎo)格(gé)中(zhōng)的(de)汉(hàn)字(zì)转(zhuǎn)为(wéi)拼(pīn)音(yīn)
--------这是在word中形成的,但,在word 和EXCEL中,拼音在字的上面。

热心网友 时间:2022-04-12 05:00

没什么好办法啊,只有点小技巧,就是用替换把出现频率高的字换成拼音

热心网友 时间:2022-04-12 06:52

用VBA代码可以解决,留下你Q号,我帮你!
土地入股的定义 ups快递客服电话24小时 贷款记录在征信保留几年? 安徽徽商城有限公司公司简介 安徽省徽商集团新能源股份有限公司基本情况 安徽省徽商集团有限公司经营理念 2019哈尔滨煤气费怎么有税? 快手删除的作品如何恢复 体育理念体育理念 有关体育的格言和理念 什么是体育理念 万里挑一算彩礼还是见面礼 绿萝扦插多少天后发芽 绿萝扦插多久发芽 扦插绿萝多久发芽 炖牛排骨的做法和配料 网络诈骗定罪标准揭秘 “流水不争先”是什么意思? mc中钻石装备怎么做 为什么我的MC里的钻石块是这样的?我想要那种。是不是版本的问题?如果是... 带“偷儿”的诗句 “君不见巴丘古城如培塿”的出处是哪里 带“奈何”的诗句大全(229句) 里翁行()拼音版、注音及读音 带“不虑”的诗句 “鲁肃当年万人守”的出处是哪里 无尘防尘棚 进出口报关流程,越详细越好。谢谢大家指教。 双线桥不是看化合价升多少就标多少的吗?为什么CL2+2KI=2KCL+I2中I失... 出师表高锰酸钾有画面了吗 2021年幼儿园新学期致家长一封信 电脑屏幕一条黑线怎么办? 销售代理商销售代理商的特点 商业代理商业代理的特征 如何看微信有没有开通微众银行 为什么微众没有开户 微众银行怎么开户 微众银行APP开户流程是什么? 唐古拉山海拔唐古拉山海拔是多少 怎么看待取消跳广场舞的人的退休金 如何选购新鲜的蓝田水柿? 恭城水柿柿树作用 创维洗衣机使用教程 创维全自动洗衣机怎么使用 自动开门器 狗羊属相婚姻相配吗 3岁的小孩不会说话怎么办 3岁孩子不会说话,应该挂什么科? 3岁小孩不会说话正常吗 鹿茸炖乌鸡怎么做? 新型冠状肺炎吃什么药可以预防 冰箱上电后一直响 Excel 如何设置 把汉字变成 拼音的格式 EXCEL里面怎么将汉字转换成拼音 如何使用excel将汉字转换成拼音格式,求解 excel怎么文字将自动转换为拼音 excel姓名转换拼音公式 如何将EXCEL表格中的汉字转为拼音 excel表格怎么把汉字转换成拼音简码 怎样能使EXCEL里的汉字变成拼音啊? EXCEL中能否直接把中文转换成拼音? 如何在excel中把汉字转换成拼音 怎样把excel中的汉字转换成拼音 修复手机屏幕白边,除了用白边正液还可以用什么方法? 怎么操作使wps表格里出现最多数字的排在最前面? WPS表格排序出现这种情况 wps表格怎么把乱的数字排序 wps表格怎么排序成绩 怎么使用WPS的表格把表格中的数据从大到小排列? 新版WPS表格怎么设置数值的排序 WPS怎么在很多数字之间排序? wps中的表格数字排序怎么弄? EXCEL中把汉字转为拼音如何操作 EXCEL中怎么把汉字转成拼音? Excel里的汉字和拼音可以互换啦,掌握小技能轻松提高工作 excel表汉字生成拼音的方法 找个靠谱的excel汉字转换拼音方法? WPS、Excel中如何将中文姓名转换成汉语拼音 Excel中姓名转换大写拼音怎么转换 没有手机除边液手机该怎么去白边 qq如何设置离线留言 如何设置QQ离线留言 离线请留言 qq离线请留言怎么设置 QQ里显示有离线请留言和离线的状态,有什么不同的? 怎么修改QQ离线留言 qq离线咋个设置自己想设置的离线留言啊!~~ QQ2007正式版怎么改离线留言 如何在QQ上语音离线留言 怎么设置QQ离线留言 怎样让自己qq留言不让别人看见 QQ离线请留言,发信息能能发出去? 手机QQ怎么设置离线请留言
声明声明:本网页内容为用户发布,旨在传播知识,不代表本网认同其观点,若有侵权等问题请及时与本网联系,我们将在第一时间删除处理。E-MAIL:11247931@qq.com