[已解决]利用hanziku工作表中的汉字拼音库转成拼音？

gpgpgp111

   要达到的目的：利用hanziku工作表中的汉字拼音库，对sheet1中的任意列的汉字进行转换成拼音，格式如B3和B4。最好用VBA设成自定义函数形式，在这里先谢谢大神了！！！

最佳答案

月排行榜 / 总排行榜

ghostjiao

2014-7-4 13:32

{:10:}
请测试

跳转到最佳答案楼层

gpgpgp111

附件如下，请大神们帮忙了！

ghostjiao

{:10:}
请测试

baksy

函数解决：
B3单元格复制以下公式，下拉；
=INDEX(hanziku!$B:$B,MATCH("*"&LEFT(A3)&"*",hanziku!$A:$A,))&INDEX(hanziku!$B:$B,MATCH("*"&MID(A3,2,1)&"*",hanziku!$A:$A,))&IF(LEN(A3)=3,INDEX(hanziku!$B:$B,MATCH("*"&RIGHT(A3)&"*",hanziku!$A:$A,)),"")
复制B3单元格，粘贴到D3，下拉。

gpgpgp111

问题解决了，3楼自定义函数和4楼的公式都很好用，谢谢了

yangming27

baksy 发表于 2014-7-4 13:43
函数解决：
B3单元格复制以下公式，下拉；
=INDEX(hanziku!$B:$B,MATCH("*"&LEFT(A3)&"*",hanziku!$A:$A, ...

可不可以转换成小写？

simonleung

ghostjiao 发表于 2014-7-4 13:32
请测试

大神大神！ 能不能优化一下。我想名字和姓氏手指母大写。可以吗？
例如：西门吹雪 = XimenChuixue；郭富城 = GuoFucheng

zpy2

不错!顶!