Execel 中文转拼音英文字母
实现原理
使用VB宏函数实现
实际效果
某些字有点不完美,但是在觉大多数情况下是可用的
宏函数
Function PinYin(Hz As String)
Dim PinMa As String
Dim MyPinMa As Variant
Dim Temp As Integer, i As Integer, j As Integer
PinMa = "a,20319,ai,20317,a...
原创
2019-06-20 09:11:37 ·
1390 阅读 ·
1 评论