Excel教你认字-自定义函数实现汉字转拼音
在日常工作或生活,时尔会碰到一些不认识的汉字。像昮、卆、剚、沝等等,当我们碰到这些不认识的字时,我们或百度、或GOOGLE,有的办公室【OL】可能也会用WORD拼音指南功能。

但surda经常需要处理报表、分析数字比较偏好MS Excel,一直想是否可以利用Excel反查汉字的拼音?需要如何调用拼音库?……word拼音指南可以做到将汉字转成拼音,什么原理?GOOLGE才知道,Word的拼音指南能够将汉字转成拼音全是倚仗微软拼音的帮助, 微软拼音2.0以上版本都提供了汉字到拼音的转换功能。微软拼音MSIME.China类中的IFELanguage接口具体实现了汉字、拼音转换功能…..
于是乎不停的搜索,居然找到了某高人VBA编写的现成类模块(HzToPy-Class)。下载测试了一下,功能何其强大,见下Demo.

| 函数原型如下: | |||
| 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”),默认只显示首字母 |
点此下载此类模块。(代码请按ALT+F11查看)
真的是太好用了,非常感谢啊,找到这样好的网站真是幸福哦,赶紧收藏了!