Excel 请问如何提取中文拼音第一个字母

1、单击菜单栏的“开发工具”，”Visual Basic“编辑器，Visual Basic编辑器 2、执行“插入→模块”命令，在模块代码编辑区输入下列代码：Function pinyin(p As String) As String i = Asc(p)Select Case i Case -20319 To -20284: pinyin = "A"Case -20283 To -19776: pinyin = "B"Case -...