EXCEL 如何取汉字首拼（包括多音字首拼）
作者&投稿：干栋 （若有异议请与网页底部的电邮联系）
具体操作步骤如下：
1、首先，打开Excel，然后按Alt+F11快捷键打开Viaual Basic编辑器，点击工具栏插入-模块，如下图所示，然后进入下一步。
2、其次，把准备好的取拼音首字母大写专函数粘贴进来，关闭Viaual Basic编辑器，如下图所示，然后进入下一步。
3、接着，回到Excel界面，公示栏输入“=getpy(A1)&RIGHT(B1,2)&RIGHT(C1,2)”，其中“=getpy(A1)”为求A1单元格的拼音首字母大写，后面是求B1和C1单元格后两位，这时按下回车键执行，如下图所示，然后进入下一步。
4、最后，完成上述步骤后，就得到LDH6582的结果了，如下图所示。这样，问题就解决了。
具体操作步骤如下：
1、首先，打开Excel，然后按Alt+F11快捷键打开Viaual
Basic编辑器，点击工具栏插入-模块，如下图所示，然后进入下一步。
2、其次，把准备好的取拼音首字母大写专函数粘贴进来，关闭Viaual
Basic编辑器，如下图所示，然后进入下一步。
3、接着，回到Excel界面，公示栏输入“=getpy(A1)&RIGHT(B1,2)&RIGHT(C1,2)”，其中“=getpy(A1)”为求A1单元格的拼音首字母大写，后面是求B1和C1单元格后两位，这时按下回车键执行，如下图所示，然后进入下一步。
4、最后，完成上述步骤后，就得到LDH6582的结果了，如下图所示。这样，问题就解决了。
锻咽和胃： 在EXECL中 ,按ALT+F11,插入---模块 复制下列代码 : Function hztopy(hzpy As String) As String Dim hzstring As String, pystring As String Dim hzpysum As Integer, hzi As Integer, hzpyhex As Integer hzstring = Trim(hzpy) hzpysum = Len(Trim(...
湾里区19245274913： 在Excel里面怎么自动提取字段的第一个汉字的拼音首字母? - ？
锻咽和胃： A1: =LOOKUP(CODE(B1),45217+{0,36,544,1101,1609,1793,2080,2560,2902,3845,4107,4679,5154,5397,5405,5689,6170,6229,7001,7481,7763,8472,9264},{＂A＂,＂B＂,＂C＂,＂D＂,＂E＂,＂F＂,＂G＂,＂H＂,＂J＂,＂K＂,＂L＂,＂M＂,＂N＂,＂O＂,＂P＂,＂Q＂,＂R＂,＂S＂,＂T＂,＂W＂,＂X＂,＂Y＂,＂Z＂}) 这是看来的答案,你自己研究一下吧!
湾里区19245274913： excel 单元格中如何取前两个汉字 - ？
锻咽和胃： excel单元格中取前两个汉字,可通过MID函数实现. 方法步骤如下: 1、打开需要操作的EXCEL表格,在任意单元格中输入=MID(,然后点击选择需要提取前两个汉字的单元格作为数据目标来源. 2、继续在函数编辑框中输入1,2),然后回车完成函数编辑输入即可. 3、返回EXCEL表格可发现已成功在EXCEL中提取单元格的前两个汉字.
湾里区19245274913： EXCEL表中怎么取单列汉字的首字母,按百度方法做最后出不来结果 - ？
锻咽和胃： mⅰD(B2,1,1).试下这个字符串截取函数,应该可以达到你需要的效果.
湾里区19245274913： Excel如何用函数提取首字 - ？
锻咽和胃： G3=left(A3) 下拉即可
湾里区19245274913： EXCEL 怎么提取单元格汉字首字母 - ？
锻咽和胃： 仅仅提供中文进行提取汉字首字母?EXCEL还没有如此智能化的功能哦....
湾里区19245274913： 在excel中如何用函数将一串文字转为一串拼音首写音字母? - ？
锻咽和胃： 打开Excel->工具->宏->Viaual Basic编辑器 在弹出来的窗口中对着VBAproject点右键->插入->模块 下面会出现一个名为＂模块1＂,点击在右边的空白栏中粘贴以下内容:Function getpychar(char) tmp = 65536 + Asc(char) If (tmp >= 45217 And ...
湾里区19245274913： excel获取首字母拼音部分汉字出错(如下图)怎么解决 - ？
锻咽和胃： 你这代码不精确,用我这代码吧,非常准确: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 -19775 To -19219: pinyin = ＂C＂ Case -19218 ...
湾里区19245274913： 如何应用Excel函数把汉字换成拼音首字母 这个问题 不知道在B1怎么输入这个公式 求救qq365297902 - ？
锻咽和胃： B1输入=LOOKUP(CODE(A1),45217+{0,36,544,1101,1609,1793,2080,2560,2902,3845,4107,4679,5154,5397,5405,5689,6170,6229,7001,7481,7763,8472,9264},{＂A＂,＂B＂,＂C＂,＂D＂,＂E＂,＂F＂,＂G＂,＂H＂,＂J＂,＂K＂,＂L＂,＂M＂,＂N＂,＂O＂,＂P＂,＂Q＂,＂R＂,＂S＂,＂T＂,＂W＂,＂X＂,＂Y＂,＂Z＂}) 回车.
湾里区19245274913： Excel中如何提取某一列单元格中的汉字? - ？
锻咽和胃： 给你一个自定义函数代码:Public Function HZ(rang As String) As String Dim l As Integer Dim Str As String l = Len(rang) If l < 1 ThenHZ = ＂＂Exit Function End If On Error Resume Next For i = 1 To lIf Asc(Mid$(rang, i, 1)) < 0 Or Asc(Mid$(...
