excel提取汉字拼音首字母的VBA代码
摘要:
提取汉字拼音首字母的VBA代码:Option ExplicitFunction PY(TT As String) As Variant '自定义函数,目的:把一组汉字变为一组汉字拼音的第一个字母。Dim i%, temp$ PY = "" For i = 1 To Len(TT) temp = Asc(Mid$(TT, i, 1)) If temp > ... 阅读全文
posted @ 2016-05-23 17:08 大宝的博客 阅读(5399) 评论(0) 推荐(0)
浙公网安备 33010602011771号