excel汉字转拼音函数
@匡波2662：在excel中如何用函数将一串文字转为一串拼音首写音字母? -
籍阅17341674236…… 打开Excel->工具->宏->Viaual Basic编辑器 在弹出来的窗口中对着VBAproject点右键->插入->模块 下面会出现一个名为＂模块1＂,点击在右边的空白栏中粘贴以下内容: Function getpychar(char) tmp = 65536 + Asc(char) If (tmp >= 45217 And ...
@匡波2662：Excel中如何根据汉字在后面的单元格中显示拼音啊? -
籍阅17341674236…… 函数原型如下: HzToPy(Hz As String, Optional Sep As String = ＂＂, Optional ShowNotation As Boolean = True, Optional ShowInitialOnly As Boolean, Optional ShowOnlyOneChar As Boolean = True) As String 参数名 参数类型 说明 第1个参数 ...
@匡波2662：EXCEL中把汉字转为拼音如何操作 -
籍阅17341674236…… 第一步:创建自定义函数.代码如下:Function pinyin(p As String) As Stringi = Asc(p)Select Case iCase -20319 To -20318: pinyin = ＂a ＂省略(因有字数限制)Case -10254 To -10254: pinyin = ＂zuo ＂Case Else: pinyin = pEnd SelectEnd ...
@匡波2662：Excel 如何设置 把汉字变成 拼音的格式 -
籍阅17341674236…… <p>用自定义函数与EXCEL函数结合,如图,如附件.记得加载宏;</p> =SUBSTITUTE(SUBSTITUTE(Getpy(A1),MID(Getpy(A1),1,FIND(＂ ＂,Getpy(A1))),＂＂),＂ ＂,＂＂) & ＂ ＂ & MID(Getpy(A1),1,FIND(＂ ＂,Getpy(A1)))<p></p> <p> </p>
@匡波2662：您好!请问excel中如何将文本转换成拼音缩写 -
籍阅17341674236…… 步骤如下: 1.ALt+F11,打开VBE界面,左上角空白处,点击右键,插入模块 2.在模块的空白处,粘贴上如下代码: Function pinyin(p As String) As String i = Asc(p) Select Case i Case -20319 To -20284: pinyin = ＂A＂ Case -20283 To -19776:...
@匡波2662：Excel如何将汉字转成拼音 -
籍阅17341674236…… EXCEL没发现在有这个功能.WORD倒是有给文字加拼音.操作方法如下:1、选中需要加拼音的汉字;2、选择格式菜单——中文版式——拼音指南;3、在拼音指南窗口,可以设置字体、字号、对齐方式等等;4、设置完成后,点确定.
@匡波2662：怎样能使EXCEL里的汉字变成拼音啊? -
籍阅17341674236…… 应用举例 目标汉字: 汉字转拼音举例 1 显示用空格分开的拼音 公式: =HzToPy($b$19,＂ ＂) 结果: hàn zì zhuǎn pīn yīn jǔ lì 2 显示用空格分开的拼音,同时不显示注音符号 公式: =HzToPy($b$19,＂ ＂,false) 结果: han zi zhuan pin yin ju ...
@匡波2662：如何应用Excel函数把汉字换成拼音首字母 这个问题 不知道在B1怎么输入这个公式 求救qq365297902 -
籍阅17341674236…… 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＂}) 回车.
@匡波2662：如何在excel中把汉字转换成拼音 -
籍阅17341674236…… 在Word里 用拼音指南 把拼音加上 2003sp3 版本的有这个自动加上的功能…… 然后粘贴到 excel 中 用 PHONETIC 函数 提取……如果不喜欢这样的格式 那么逆序搜索一下 有人使用 VBA来提取的……无声调的 汉语拼音(类似英文的写法)……
@匡波2662：excel简拼如何生成 急~~ -
籍阅17341674236…… 函数解决:Public Function PY(TT As String) As Variant '自定义函数,目的:把一组汉字变为一组汉字拼音的第一个字母. PY = ＂＂ For i = 1 To Len(TT) temp = Asc(Mid$(TT, i, 1)) If temp > 255 Or temp PY = PY & pinyin(Mid$(TT, i, 1)) '转化为拼...
籍阅17341674236…… 打开Excel->工具->宏->Viaual Basic编辑器 在弹出来的窗口中对着VBAproject点右键->插入->模块 下面会出现一个名为＂模块1＂,点击在右边的空白栏中粘贴以下内容: Function getpychar(char) tmp = 65536 + Asc(char) If (tmp >= 45217 And ...
@匡波2662：Excel中如何根据汉字在后面的单元格中显示拼音啊? -
籍阅17341674236…… 函数原型如下: HzToPy(Hz As String, Optional Sep As String = ＂＂, Optional ShowNotation As Boolean = True, Optional ShowInitialOnly As Boolean, Optional ShowOnlyOneChar As Boolean = True) As String 参数名 参数类型 说明 第1个参数 ...
@匡波2662：EXCEL中把汉字转为拼音如何操作 -
籍阅17341674236…… 第一步:创建自定义函数.代码如下:Function pinyin(p As String) As Stringi = Asc(p)Select Case iCase -20319 To -20318: pinyin = ＂a ＂省略(因有字数限制)Case -10254 To -10254: pinyin = ＂zuo ＂Case Else: pinyin = pEnd SelectEnd ...
@匡波2662：Excel 如何设置 把汉字变成 拼音的格式 -
籍阅17341674236…… <p>用自定义函数与EXCEL函数结合,如图,如附件.记得加载宏;</p> =SUBSTITUTE(SUBSTITUTE(Getpy(A1),MID(Getpy(A1),1,FIND(＂ ＂,Getpy(A1))),＂＂),＂ ＂,＂＂) & ＂ ＂ & MID(Getpy(A1),1,FIND(＂ ＂,Getpy(A1)))<p></p> <p> </p>
@匡波2662：您好!请问excel中如何将文本转换成拼音缩写 -
籍阅17341674236…… 步骤如下: 1.ALt+F11,打开VBE界面,左上角空白处,点击右键,插入模块 2.在模块的空白处,粘贴上如下代码: Function pinyin(p As String) As String i = Asc(p) Select Case i Case -20319 To -20284: pinyin = ＂A＂ Case -20283 To -19776:...
@匡波2662：Excel如何将汉字转成拼音 -
籍阅17341674236…… EXCEL没发现在有这个功能.WORD倒是有给文字加拼音.操作方法如下:1、选中需要加拼音的汉字;2、选择格式菜单——中文版式——拼音指南;3、在拼音指南窗口,可以设置字体、字号、对齐方式等等;4、设置完成后,点确定.
@匡波2662：怎样能使EXCEL里的汉字变成拼音啊? -
籍阅17341674236…… 应用举例 目标汉字: 汉字转拼音举例 1 显示用空格分开的拼音 公式: =HzToPy($b$19,＂ ＂) 结果: hàn zì zhuǎn pīn yīn jǔ lì 2 显示用空格分开的拼音,同时不显示注音符号 公式: =HzToPy($b$19,＂ ＂,false) 结果: han zi zhuan pin yin ju ...
@匡波2662：如何应用Excel函数把汉字换成拼音首字母 这个问题 不知道在B1怎么输入这个公式 求救qq365297902 -
籍阅17341674236…… 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＂}) 回车.
@匡波2662：如何在excel中把汉字转换成拼音 -
籍阅17341674236…… 在Word里 用拼音指南 把拼音加上 2003sp3 版本的有这个自动加上的功能…… 然后粘贴到 excel 中 用 PHONETIC 函数 提取……如果不喜欢这样的格式 那么逆序搜索一下 有人使用 VBA来提取的……无声调的 汉语拼音(类似英文的写法)……
@匡波2662：excel简拼如何生成 急~~ -
籍阅17341674236…… 函数解决:Public Function PY(TT As String) As Variant '自定义函数,目的:把一组汉字变为一组汉字拼音的第一个字母. PY = ＂＂ For i = 1 To Len(TT) temp = Asc(Mid$(TT, i, 1)) If temp > 255 Or temp PY = PY & pinyin(Mid$(TT, i, 1)) '转化为拼...
