自动提取中文拼音首字母的格式表
查找函数之Vlookup(取汉字首位字母)
vlookup应用实例精确匹配查询之基本运用精确查找是vlookup 最基本也是最常用的功能,对于数据量大的查找,其速度比菜单中的查找还快。
设置vlookup 第四精确查找适用于文本,也适用于数值;但对数值查找时须注意格式一致,否则会出错数值近似匹配查询之基本运用近似匹配查找通常情况下用于累进数值的查找。
此时第四个参数省略,或为true,或为非0数值。
(EXCEL中0等同FA注意公式中第四个参数省略,或为true,或为非0数值。
并且查找的第一列必须升序排列,否则不会返回期望的结果(需要注意的是此时不一定返回错误)。
试着输入5000,你会发现税率为20%,应是15%(由条件指定),虽然对最后计算结果没有影响。
以返回文本近似匹配查询之基本运用对于文本,一般不使用近似匹配查找(非模糊查找)。
并非文本不能用于近似查找,主要是没有太多用途。
除了下面这个例子:这个例子利用文本近似匹配查找汉字的第一个拼音字母由于EXCEL中汉字字符是按拼音排序的,因此汉字字符比较时的大小与拼音同序左边的表是根据汉字拼音首字母排列,并取各字母的临界点汉字字符(该字母的通过将“家”与表中字符比较后,找到比“家”小的最大值“J这个例子一般用于姓名的缩写,而上面的公式只找第一个字符,因此需要修改这个公式取得前三个汉字字符的拼音字母。
使用MID依次取出字符后由Vlookup查使用该例关键是【表三】的建立;同理,如果要查找汉字的完整拼音,可以建立但这个方法并不一直正确,由于多音字及文字大小排序与其拼音不完全一致的原区别查询结果的空白与0值依次序返回同一查询结果的多列内容当查询某个结果的多列内容,并要依次取出,可使用column()函数作为index_num参数column()函数返回公式所在列的列号,当公式复制时,会随单元格的移动相应改变lookup_value参数使用混合引用,如$B96。
即对列标绝对引用(列标前加$)、行号相对引用上面公式只要输入C96中的公式,然后向右、向下复制就可以。
excel:汉字拼音首字母提取
方法一:VBA自定义函数"=hztopy()"下面是一个VBA自定义函数,工具->宏->Visual Basic编辑器->,插入模块,在VBA编辑器里面->插入->模块->贴入下述代码,(按ALT+F11,插入模块,在右面窗口中粘贴下面代码)那么,比如在A3中有"进退两难",则在B3中输入"=hztopy(A3)",则会得到"JTLN"。
不过此法有时候也会出错,比如"皓、鑫、婷、雯、奕"等,就无法提取汉字拼音首字母。
Function hztopy(hzpy As String) As StringDim hzstring As String, pystring As StringDim hzpysum As Integer, hzi As Integer, hzpyhex As Integerhzstring = Trim(hzpy)hzpysum = Len(Trim(hzstring))pystring = ""For hzi = 1 To hzpysumhzpyhex = "&H" + Hex(Asc(Mid(hzstring, hzi, 1)))Select Case hzpyhexCase &HB0A1 To &HB0C4: pystring = pystring + "A"Case &HB0C5 To &HB2C0: pystring = pystring + "B"Case &HB2C1 To &HB4ED: pystring = pystring + "C"Case &HB4EE To &HB6E9: pystring = pystring + "D"Case &HB6EA To &HB7A1: pystring = pystring + "E"Case &HB7A2 To &HB8C0: pystring = pystring + "F"Case &HB8C1 To &HB9FD: pystring = pystring + "G"Case &HB9FE To &HBBF6: pystring = pystring + "H"Case &HBBF7 To &HBFA5: pystring = pystring + "J"Case &HBFA6 To &HC0AB: pystring = pystring + "K"Case &HC0AC To &HC2E7: pystring = pystring + "L"Case &HC2E8 To &HC4C2: pystring = pystring + "M"Case &HC4C3 To &HC5B5: pystring = pystring + "N"Case &HC5B6 To &HC5BD: pystring = pystring + "O"Case &HC5BE To &HC6D9: pystring = pystring + "P"Case &HC6DA To &HC8BA: pystring = pystring + "Q"Case &HC8BB To &HC8F5: pystring = pystring + "R"Case &HC8F6 To &HCBF9: pystring = pystring + "S"Case &HCBFA To &HCDD9: pystring = pystring + "T"Case &HEDC5: pystring = pystring + "T"Case &HCDDA To &HCEF3: pystring = pystring + "W"Case &HCEF4 To &HD1B8: pystring = pystring + "X"Case &HD1B9 To &HD4D0: pystring = pystring + "Y"Case &HD4D1 To &HD7F9: pystring = pystring + "Z"Case Elsepystring = pystring + Mid(hzstring, hzi, 1)End SelectNexthztopy = pystringEnd Function方法二:VBA自定义函数"=getpy()"下面是一个VBA自定义函数,工具->宏->Visual Basic编辑器->,插入模块,在VBA编辑器里面->插入->模块->贴入上述代码,那么。
excel获得汉字首字母的方法
在日常工作和学习中,我们经常需要对文本进行处理和分析,尤其是对于中文文本。
在处理中文文本时,有时会遇到需要将汉字转换为拼音的需求。
而在Excel中,获得汉字的首字母则成为了一个常见的需求。
那么,如何在Excel中获得汉字的首字母呢?我们可以利用Excel内置的函数来实现这一目标。
在Excel中,可以使用VB脚本编写一个自定义函数来获取汉字的首字母。
具体步骤如下:1. 打开Excel表格,按下ALT + F11,打开VB编辑器。
2. 在VB编辑器中,插入一个新模块。
3. 在新模块中输入以下VB脚本代码:```vbFunction GetFirstLetter(str As String) As StringDim pinyin As StringDim i As IntegerDim ch As Stringpinyin = ""For i = 1 To Len(str)ch = Mid(str, i, 1)pinyin = pinyin &Left(Application.WorksheetFunction.Phonetic(ch), 1)Next iGetFirstLetter = pinyinEnd Function```4. 编译保存后,返回Excel表格界面。
5. 在需要获取汉字首字母的单元格中输入`=GetFirstLetter(A1)`,其中A1为需要转换的汉字所在的单元格。
6. 按下Enter键,即可在目标单元格中获取到相应汉字的首字母。
通过上述方法,我们可以轻松地在Excel中获得汉字的首字母,而且可以将这个函数在多个单元格中批量应用,提高工作效率。
除了使用VB脚本自定义函数外,我们还可以借助Excel内置的函数来实现汉字首字母的获取。
在Excel中,有一个叫做UNICODE的函数,可以返回指定字符的Unicode编码。
而对于汉字来说,其首字母的Unicode编码可以作为其拼音的首字母。
提取汉字首拼字母
-12860, -12858, -12852, -12849, -12838, -12831, -12829, -12812, -12802, -12607, -12597, -12594, -12585,
-12556, -12359, -12346,
-16452, -16448, -16433, -16429, -16427, -16423, -16419, -16412, -16407, -16403, -16401, -16393, -16220,
-16216, -16212, -16205,
-16202, -16187, -16180, -16171, -16169, -16158, -16155, -15959, -15958, -15944, -15933, -15920, -15915,
-10329, -10328, -10322, -10315, -10309, -10307, -10296, -10281, -10274, -10270, -10262, -10260, -10256,
-10254
};
private static string[] pystr = new string[]
"huo", "ji", "jia", "jian",
"jiang", "jiao", "jie", "jin", "jing", "jiong", "jiu", "ju", "juan", "jue", "jun", "ka", "kai", "kan",
汉语拼音音节索引表格模板(很漂亮的完整版)
guan官
guang光
gui规
gun棍
guo锅
H
ha哈
hai孩
han含
hang杭
hao蒿
he喝
hei黑
hen痕
heng恒
hm嗽
hng哼
hong烘
hou喉
hu呼
hua花
huai怀
huan欢
huang荒
hui灰
hun昏
huo活
J
ji机
jia家
jian尖
jiang江
jiao交
jie街
jin今
jing京
jiong迥
jiu究
ju居
juan捐
jue决
jun军
K
ka咖
kai开
kan刊
kang康
kao考
ke科
kei克
ken肯
keng坑
kong空
kou抠
ku枯
kua夸
kuai快
kuan宽
kuang筐
kui亏
kun昆
kuo阔
L
la拉
lai来
lan兰
lang狼
lao捞
le勒
lei类
leng冷
li里
lia俩
lian连
nan男
nang囊
nao闹
ne讷
nei内
nen嫩
neng能
ng嗯
ni泥
nian年
niang娘
niao鸟
nie捏
nin您
ning宁
niu牛
nong农
nou耨(锄草)
nu奴
nu女
nuan暖
nue虐
提取单元格汉字首字母
提取单元格汉字首字母在处理 Excel 表格数据时,有时需要将单元格中的汉字转换为汉字拼音的首字母,以便进行后续的数据分析和处理。
本文将介绍如何使用 Excel 中的函数和工具来提取单元格汉字首字母,并分析其适用范围和注意事项。
一、使用 LEFT 函数提取单个汉字的首字母Excel 中的 LEFT 函数用于从文本字符串的左侧提取指定长度的字符。
结合汉字拼音的特点,可以使用 LEFT 函数提取汉字的首字母。
例如,假设 A1 单元格中为“中国”,则可以使用以下公式提取其首字母:=LEFT(A1,1)这个公式的含义是从单元格 A1 左侧提取 1 个字符,即“中”的首字母,“结果为“Z”。
需要注意的是,该方法只能提取单个汉字的首字母,多个汉字则无法处理。
二、使用 VBA 宏提取多个汉字的首字母如果需要提取多个汉字的首字母,可以使用 Excel 的 VBA 宏来实现。
下面是一段实现该功能的 VBA 代码:Sub ChineseFirstLetter()Dim str As String, result As Stringstr = Selection.ValueFor i = 1 To Len(str)result = result &Left(LCase(Application.WorksheetFunction.Substitute(Application.Transpose(Split(Trim (str(i, 1)), " ")), " ", "")), 1)Next iSelection.Value = UCase(result)End Sub该宏的作用是将选定区域中的汉字转换为首字母,并将结果替换原单元格中的内容。
需要注意的是,该宏需要在 Excel 中启用宏功能,并将其保存为一个新的模块。
三、使用 PinYin 工具包提取多个汉字的首字母使用 VBA 宏虽然能够实现多个汉字首字母的提取,但对于不熟悉 VBA 编程的用户来说,会存在一定的难度。
excel:汉字拼音首字母提取
方法一:VBA自定义函数"=hztopy()"下面是一个VBA自定义函数,工具->宏->Visual Basic编辑器->,插入模块,在VBA编辑器里面->插入->模块->贴入下述代码,(按ALT+F11,插入模块,在右面窗口中粘贴下面代码)那么,比如在A3中有"进退两难",则在B3中输入"=hztopy(A3)",则会得到"JTLN"。
不过此法有时候也会出错,比如"皓、鑫、婷、雯、奕"等,就无法提取汉字拼音首字母。
Function hztopy(hzpy As String) As StringDim hzstring As String, pystring As StringDim hzpysum As Integer, hzi As Integer, hzpyhex As Integerhzstring = Trim(hzpy)hzpysum = Len(Trim(hzstring))pystring = ""For hzi = 1 To hzpysumhzpyhex = "&H" + Hex(Asc(Mid(hzstring, hzi, 1)))Select Case hzpyhexCase &HB0A1 To &HB0C4: pystring = pystring + "A"Case &HB0C5 To &HB2C0: pystring = pystring + "B"Case &HB2C1 To &HB4ED: pystring = pystring + "C"Case &HB4EE To &HB6E9: pystring = pystring + "D"Case &HB6EA To &HB7A1: pystring = pystring + "E"Case &HB7A2 To &HB8C0: pystring = pystring + "F"Case &HB8C1 To &HB9FD: pystring = pystring + "G"Case &HB9FE To &HBBF6: pystring = pystring + "H"Case &HBBF7 To &HBFA5: pystring = pystring + "J"Case &HBFA6 To &HC0AB: pystring = pystring + "K"Case &HC0AC To &HC2E7: pystring = pystring + "L"Case &HC2E8 To &HC4C2: pystring = pystring + "M"Case &HC4C3 To &HC5B5: pystring = pystring + "N"Case &HC5B6 To &HC5BD: pystring = pystring + "O"Case &HC5BE To &HC6D9: pystring = pystring + "P"Case &HC6DA To &HC8BA: pystring = pystring + "Q"Case &HC8BB To &HC8F5: pystring = pystring + "R"Case &HC8F6 To &HCBF9: pystring = pystring + "S"Case &HCBFA To &HCDD9: pystring = pystring + "T"Case &HEDC5: pystring = pystring + "T"Case &HCDDA To &HCEF3: pystring = pystring + "W"Case &HCEF4 To &HD1B8: pystring = pystring + "X"Case &HD1B9 To &HD4D0: pystring = pystring + "Y"Case &HD4D1 To &HD7F9: pystring = pystring + "Z"Case Elsepystring = pystring + Mid(hzstring, hzi, 1)End SelectNexthztopy = pystringEnd Function方法二:VBA自定义函数"=getpy()"下面是一个VBA自定义函数,工具->宏->Visual Basic编辑器->,插入模块,在VBA编辑器里面->插入->模块->贴入上述代码,那么。
提取汉字的首字母
else if (@tmp>=0xD4D1 and @tmp<=0xD7F9)
Set @PY = @PY + 'Z'
else
Set @PY = @PY + UPPER(@HZS)
Set @Index = @Index+1
end /* while循环结束 */
Declare @HZS varchar(2)
Declare @Index int
Set @Index = 1
Set @Len = Len(@HZ)
Set @PY = ''
While @Index<=@Len
Begin
Set @HZS = Substring(@HZ,@Index,1)
return @PY
end
Set @PY = @PY + 'Q'
else if (@tmp>=0xC8BB and @tmp<=0xC8F5)
Set @PY = @PY + 'R'
else if (@tmp>=0xC8F6 and @tmp<=0xCBF9)
Set @PY = @PY + 'S'
else if (@tmp>=0xCBFA and @tmp<=0xCDD9)
Set @PY = @PY + 'T'
else if (@tmp>=0xCDDA and @tmp<=0xCEF3)
Set @PY = @PY + 'W'
excel提取汉语简拼
excel提取汉语简拼汉语简拼是一种将汉字通过拼音字母来表示的拼音输入法。
在Excel中,我们可以使用一些方法来提取汉语简拼,并利用这些拼音来命名或分类数据,提高数据的整理和查找效率。
我们可以使用Excel的函数来提取汉字的拼音首字母。
在Excel中,有一个函数叫做“LEFT”,它可以提取文本字符串的左边指定长度的字符。
我们可以利用这个函数,将汉字转换成拼音首字母。
例如,如果我们要提取汉字“汉”的拼音首字母,我们可以使用以下公式:=LEFT(拼音函数, 1)其中,“拼音函数”代表一个将汉字转换成拼音的函数,可以使用Excel的内置函数“=PINYIN(汉字)”来实现。
将这个公式应用到一个指定的单元格,就可以得到汉字的拼音首字母。
我们可以利用提取出的汉语简拼来命名或分类数据。
在Excel中,我们可以通过选择数据范围,然后点击“格式”->“条件格式”->“新建规则”,来为数据添加颜色标记。
我们可以根据汉语简拼的首字母来设置不同的颜色,以便在查找和整理数据时更加方便。
例如,我们可以将所有以“H”开头的汉字单元格标记为红色,以“Y”开头的汉字单元格标记为黄色,以此类推。
我们还可以利用提取出的汉语简拼来进行数据的筛选和排序。
在Excel中,我们可以使用“筛选”功能来快速筛选符合条件的数据。
我们可以选择一个数据范围,然后点击“数据”->“筛选”,在弹出的筛选窗口中选择“文本筛选”,然后选择“以...开头”或“以...结尾”的条件,输入汉语简拼的首字母,即可筛选出符合条件的数据。
类似地,我们还可以使用“排序”功能来按照汉语简拼的首字母对数据进行排序,以便更加方便地查找和整理数据。
利用Excel提取汉语简拼可以提高数据整理和查找的效率。
通过将汉字转换成拼音首字母,并将其用于命名、分类、标记、筛选和排序数据,我们可以更加方便地处理和管理大量的汉字数据。
这种方法不仅简单易用,而且能够节省我们大量的时间和精力,提高工作效率。
EXCEL如何提取汉字首字母
方法/步骤1.首先,打开Excel,同时按下Alt+F11键,打开VBE界面,如下图所示。
在VBE界面中,单击图片中所示的左上角空白处,选择“插入“,”模块“。
2.此时,就插入了一个模块,后面的代码就要放到这个模块中,保证右侧空白区域是模块代码的编辑区(最保险的做法是双击模块),然后执行下一步操作。
3.将下面的代码全部复制粘贴到空白区域。
Function pinyin(p As String) As Stringi = Asc(p)Select Case iCase -20319 To -20284: pinyin = "A"Case -20283 To -19776: pinyin = "B"Case -19775 To -19219: pinyin = "C"Case -19218 To -18711: pinyin = "D"Case -18710 To -18527: pinyin = "E"Case -18526 To -18240: pinyin = "F"Case -18239 To -17923: pinyin = "G"Case -17922 To -17418: pinyin = "H"Case -17417 To -16475: pinyin = "J"Case -16474 To -16213: pinyin = "K"Case -16212 To -15641: pinyin = "L"Case -15640 To -15166: pinyin = "M"Case -15165 To -14923: pinyin = "N"Case -14922 To -14915: pinyin = "O"Case -14914 To -14631: pinyin = "P"Case -14630 To -14150: pinyin = "Q"Case -14149 To -14091: pinyin = "R"Case -14090 To -13319: pinyin = "S"Case -13318 To -12839: pinyin = "T" Case -12838 To -12557: pinyin = "W" Case -12556 To -11848: pinyin = "X" Case -11847 To -11056: pinyin = "Y" Case -11055 To -2050: pinyin = "Z" Case Else: pinyin = pEnd SelectEnd FunctionFunction getpy(str)For i = 1 To Len(str)getpy = getpy& pinyin(Mid(str, i, 1)) Next iEnd Function4.然后关闭这个新界面,返回Excel,就可以像Excel自带的函数一样使用这个自定义的Getpy函数了,它只有一个参数,参数可以直接指定单元格,也可以直接输入字符。
