excel 如何提取汉字首字母

 答：如果用函数公式来做，需要汉字和拼音的对照表才行。这个问题，有大神推荐使用自定义函数，并且编写一段VBA代码来搞定。 操作步骤：打开VBE编辑器，插入模块，输入以下代码，返回工作表，B1单元格输入公式：=getpy(A1)，下拉复制。记得把文件格式存为XLSM，也就是启用宏的工作簿，否则有自定义函数的文件打开的时候会出现#NAME错误。代码如下：Functionpinyin(pAsString)AsStringi=Asc(p)