跳至主要内容

Excel公式:缩写单词或名称

Author: Sun Last Modified: 2025-05-07

在本教程中,提供了一些公式来从单元格中的每个单词提取首字母,如下图所示。此外,还解释了这些公式在Excel中的工作原理。
doc abbreviate words 1

在Office 365和Excel 2019中

TEXTJOIN函数是Office 365和Excel 2019中的一个新函数,可以用来提取每个单词的所有首字母。

通用公式:

TEXTJOIN("",1,IF(ISNUMBER(MATCH(CODE(MID(text,ROW(INDIRECT("1:"&LEN(text))),1)),ROW(INDIRECT("63:90")),0)),MID(text,ROW(INDIRECT("1:"&LEN(text))),1),""))

参数

Text:您想要缩写的文本字符串。

此公式的工作原理

假设您想从单元格A1中提取首字母,请在单元格B1中使用此公式。

=TEXTJOIN("",1,IF(ISNUMBER(MATCH(CODE(MID(A1,ROW(INDIRECT("1:"&LEN(A1))),1)),ROW(INDIRECT("63:90")),0)),MID(A1,ROW(INDIRECT("1:"&LEN(A1))),1),""))

按下 Shift + Ctrl + Enter 键,每个单词的所有首字母将被提取出来。
doc abbreviate words 2

说明

1. TEXTJOIN函数用于通过分隔符连接文本值。

2. MIDROWINDIRECTLEN函数用于将文本字符串转换为字母数组。例如,假设

=MID(A1,ROW(INDIRECT("1:"&LEN(A1))),1)

按下 Shift + Ctrl + Enter

返回一个字母数组

A,p,p,l,e,P,i,e

然后这个数组被传递到CODE函数中,该函数输出一个数字ASCII代码数组,每个字母对应一个代码。

3. ROW(INDIRECT("63:90") 对应于所有大写字母A-Z的ASCII代码。

4. ISNUMBER、IF和MATCH函数用于过滤结果以进行最终文本连接。

备注:

1. 如果文本字符串中没有大写字母,此公式将返回空白。

2. 此公式将提取所有大写字母。
doc abbreviate words 3

在Office 2016或更早版本中

如果您使用的是Excel 2016或更早版本,您可以使用TRIM函数。

通用公式:

TRIM(LEFT(Text,1)&MID(Text,FIND(" ",Text&" ")+1,1)&MID(Text,FIND("*",SUBSTITUTE(Text&" "," ","*",2))+1,1))

参数

Text:您要提取每个单词首字母的文本字符串。

此公式的工作原理

假设您想从单元格A1中提取首字母,请在单元格B1中使用此公式。

=TRIM(LEFT(A1,1)&MID(A1,FIND(" ",A1&" ")+1,1)&MID(A1,FIND("*",SUBSTITUTE(A1&" "," ","*",2))+1,1))

按下 Enter 键,单元格A1中每个单词的所有首字母都被提取出来。
doc abbreviate words 4

说明

1. TRIM函数删除文本字符串中的所有多余空格。

2. LEFT(A1,1) 提取文本字符串的第一个字母。

3. MID(A1,FIND(" ",A1&" ")+1,1) 提取由空格分隔的第二个单词的第一个字母。

4. MID(A1,FIND("*",SUBSTITUTE(A1&" "," ","*",2))+1,1)) 提取由空格分隔的第三个单词的第一个字母。

备注:

1. 此公式仅适用于单元格中包含三个或更少单词的情况。

2. 您可以更改公式中的“ ”为空格以外的其他分隔符。

3. 此公式提取首字母时大小写不敏感,如果您希望公式始终返回大写字母,可以在公式中添加UPPER函数。

=UPPER(TRIM(LEFT(A1,1)&MID(A1,FIND(" ",A1&" ")+1,1)&MID(A1,FIND("*",SUBSTITUTE(A1&" "," ","*",2))+1,1)))

示例文件

doc sample点击下载示例文件


相关公式


最佳的办公生产力工具

Kutools for Excel - 助您脱颖而出

🤖 Kutools AI 助手:基于以下功能彻底改变数据分析方式:智能执行   |  生成代码  |  创建自定义公式  |  分析数据并生成图表  |  调用Kutools函数
热门功能查找、高亮或标记重复项  |  删除空行  |  合并列或单元格而不丢失数据  |  四舍五入无需公式 ...
超级VLookup多条件  |  多值  |  跨多个工作表  |  模糊查找...
高级下拉列表简易下拉列表  |  级联下拉列表  |  多选下拉列表...
列管理器添加指定数量的列  |  移动列  |  切换隐藏列的可见状态  比较列以 选择相同和不同的单元格 ...
精选功能网格聚焦  |  设计视图  |  增强编辑栏  |  工作簿与工作表管理器 | 资源库(自动文本)  |  日期提取  |  合并数据  |  加密/解密单元格  |  按列表发送电子邮件  |  超级筛选  |  特殊筛选(筛选粗体/斜体/删除线...) ...
排名前15的工具集12个 文本 工具添加文本删除特定字符 ...)  |  50多种 图表 类型甘特图 ...)  |  40多种实用 公式基于生日计算年龄 ...)  |  19个 插入 工具插入二维码从路径插入图片 ...)  |  12个 转换 工具小写金额转大写汇率转换 ...)  |  7个 合并与拆分 工具高级合并行分割Excel单元格 ...)  |  ... 还有更多

Kutools for Excel拥有超过300种功能,确保您需要的功能只需一键即可实现...


Office Tab - 在Microsoft Office(包括Excel)中启用标签式阅读和编辑

  • 一秒内切换数十个打开的文档!
  • 每天为您减少数百次鼠标点击,告别鼠标手。
  • 在查看和编辑多个文档时,您的工作效率将提高50%。
  • 为Office(包括Excel)带来高效的标签页,就像Chrome、Edge和Firefox一样。