月度归档: 2021 年 3 月

2 篇文章

Excel添加汉字转换成拼音
Excel添加汉字转换成拼音   将以下代码放入模块: Function pinyin(p As String) As String i = Asc(p) Select Case i Case -20319 To -20318: pinyin = "a" Case -20317 To -20305: pinyin = "ai" Case …