如何在 Excel 中创建带有文本的递增编号,或将递增编号嵌入文本中?
在 Excel 中,生成递增数字序列是一项基础操作,尤其适用于数据整理或创建唯一标识符。虽然自动填充柄能轻松生成连续的独立数字,却无法直接将递增数字与文本字符串结合(例如一步生成“User 001”、“User 002”等)。这一限制会让创建自定义用户名、邮箱地址、产品编码或包含固定文本与顺序编号的发票号等任务变得繁琐。本教程将介绍几种在 Excel 中将递增数字与文本字符串结合的方法,涵盖从经典公式、VBA 高级自动化,到用户友好的专用工具。
常见场景包括:批量生成唯一标签项、创建系统化命名的邮件列表,或为产品追踪生成序列号。每种解决方案各具优势——无论是易用性、自动化程度、数字位置的灵活性,还是对大型数据集的适用性。

在 Excel 中通过公式实现文本与递增数字结合
使用 Kutools for Excel 实现文本与递增数字结合
VBA 宏:在文本中或文本内创建递增数字
在 Excel 中通过公式实现文本与递增数字结合
Excel 的内置公式提供了一种将文本与递增数字直接结合的便捷方法。当您的序列具有固定的数字与文本位置结构,且需要完全透明地掌握标识符的构成方式时,此方案尤为适用。
1. 请按以下方式准备您的工作表:

2. 在 D2 单元格中输入以下公式,然后按 Enter 即可应用:
=$A$2&TEXT(B2,"000")&$C$2
公式返回结果后,请拖动 D2 单元格的填充柄向下填充 D 列其余单元格。每个单元格将依次显示组合后的文本与递增数字,例如“User 001@localdomain.com”、“User 002@localdomain.com”等,如下所示:

注意事项与技巧:
$A$2 和 $C$2)可在向下复制公式时保持文本元素固定。此方法透明度高,适用于结构清晰的数据,但通常需为每个组件手动添加辅助列。此外,若您的文本与数字拆分位置逐行变化,该方法可能还需额外调整。
使用 Kutools for Excel 实现文本与递增数字结合
如果您经常需要生成递增文本标识符,并偏好图形界面,或希望拥有更多动态选项(如灵活的前缀/后缀、自定义递增值,或保存设置以便重复使用),Kutools for Excel 提供了名为插入序列号的专用功能。借助此工具,您只需几次点击即可轻松创建复杂的编号方案,无需设置公式。
1. 在 Excel 功能区上,依次转到 Kutools > 插入 > 插入序列号……,如下所示:

2. 在插入序列号对话框中,单击新建即可展开更多设置选项。配置方法如下:

3. 选择要插入带文本的递增数字的单元格区域,然后单击填充范围,所选区域将立即填充自定义编号,生成“User 001@localdomain.com”、“User 002@localdomain.com”……等结果。

其他注意事项:在 Kutools 中创建并保存编号模板后,即可快速重复使用,甚至跨多个工作簿。若上次生成的编号为 30,下次使用该序列时,编号将自动从 31 继续——避免重复编号或处理大型数据集时尤为实用!
此方法特别推荐给经常处理序列数据、希望在点选界面中兼顾效率与灵活性,并需为重复性批量任务保存模板的用户。若您需要超出前缀/后缀范围的高级位置定制,自动化脚本可能更为合适(详见下文)。
如果您想免费试用(30 天)此工具,请点击此处下载,然后按照上述步骤操作即可。
使用 Kutools for Excel 实现文本与递增数字结合
VBA 宏:在文本中或文本内创建递增数字
如果您需要最大程度的控制——例如将递增数字插入文本字符串的任意位置、即时生成复杂标识符,或一次性对多行执行此操作——VBA 宏所提供的自动化与定制能力,是公式或加载项难以比拟的。VBA 尤其适合批量处理、自定义格式,以及需要将数字灵活嵌入字符串任意位置(不仅限于开头或结尾)的场景。
开始前,请务必将工作簿另存为启用宏的文件(.xlsm),以免丢失 VBA 代码。此外,建议先在数据副本上测试宏,避免意外修改原始内容。
如何使用宏:
1. 打开工作簿,单击 Excel 功能区上的开发工具>Visual Basic。(如果未显示“开发工具”选项卡,请通过“文件”>“选项”>“自定义功能区”启用。)
2. 在 Microsoft Visual Basic for Applications 编辑器窗口中,单击插入 > 模块,将以下代码复制粘贴到空白模块中:
Sub InsertIncrementNumberIntoText()
Dim cell As Range
Dim rng As Range
Dim startNum As Long
Dim increment As Long
Dim pattern As String
Dim position As Variant
Dim currentNum As Long
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set rng = Application.Selection
Set rng = Application.InputBox("Select the range to apply incremented text.", xTitleId, rng.Address, Type:=8)
startNum = Application.InputBox("Enter the starting number:", xTitleId, 1, Type:=1)
increment = Application.InputBox("Enter the increment between numbers:", xTitleId, 1, Type:=1)
pattern = Application.InputBox("Enter the pattern (use {n} to mark the insertion point, e.g. 'User{n}@local.com'):", xTitleId, "User{n}@local.com", Type:=2)
currentNum = startNum
If rng Is Nothing Then Exit Sub
For Each cell In rng
cell.Value = Replace(pattern, "{n}", currentNum)
currentNum = currentNum + increment
Next
End Sub 3. 要执行宏,请单击
按钮或按 F5. 随后将弹出对话框,引导您选择目标区域、设置起始数字、选择递增值,并定义所需的文本模式(例如,使用 )ID-{n}-LIST 在自定义文本段之间嵌入递增数字)。
- 您可以在模式中的任意位置(文本前、后或内部)插入“{n}”,灵活自定义递增数字的显示位置。
- 确认后,每个选中的单元格将按照您选定的模式和间隔,自动填充对应的递增标识符。
- 只需重新运行宏,并按需指定新参数,即可将其应用于新区域。
- 如果操作有误,请使用撤销功能(Ctrl+Z),或再次运行宏。
故障排除与技巧:
{n}的任何模式。不含此标记的模式将按字面填充,因此运行前请仔细检查您的模式。此方案尤其适用于高级场景,例如在文件名中嵌入数字、一次性跨多行生成模式化 ID,以及自动化复杂的顺序命名方案。
最佳办公效率工具
| 🤖 | KUTOOLS AI 助手:基于以下内容革新数据分析:智能执行 | 生成代码| 创建自定义公式 | 数据分析及生成图表| 调用 Kutools Functions…… |
| 热门功能:查找、高亮或标记重复项 | 删除空白行 | 合并列或单元格且不丢失数据 | 不使用公式的四舍五入…… | |
| 高级 LOOKUP:多条件 VLookup | 多值 VLookup | 跨多工作表 VLookup | 模糊查找…… | |
| 高级下拉列表:快速创建下拉列表 | 级联下拉列表 | 多选下拉列表…… | |
| 列管理器:添加指定数量的列|移动列|切换隐藏列的可见性状态|比较区域与列…… | |
| 特色功能:网格聚焦 | 设计视图 |增强编辑栏 | 工作簿和表管理器 | 资源库(自动文本)| 日期提取 | 汇总工作表 | 加密/解密单元格 | 按列表发送邮件 | 超级筛选 | 特殊筛选(筛选粗体单元格/斜体/删除线……) ...... | |
| 精选 15 工具集:12 文本工具(添加文本,删除特定字符,……)| 50+ 图表 类型(甘特图,……)| 40+ 实用公式(基于生日计算年龄,……)| 19 插入工具(插入二维码,从路径插入图片,……)| 12 转换工具(小写金额转大写,汇率转换,……)| 7 合并和拆分工具(高级合并行,分割单元格,……)|……更多 |
使用 Kutools for Excel 大幅提升您的 Excel 技能,体验前所未有的高效。Kutools for Excel 提供 300 多项高级功能,助您提升生产力、节省时间。立即点击此处,获取您最需要的功能……
Office Tab 为 Office 带来标签式界面,让您的工作更轻松
- 在 Word、Excel、PowerPoint、Publisher、Access、Visio 和 Project 中启用标签式编辑和阅读。
- 在同一个窗口的新标签页中打开并创建多个文档,而非在新窗口中。
- 将您的工作效率提升 50%,每天减少数百次鼠标点击!
所有 Kutools 插件,一个安装程序
Kutools for Office 套件捆绑了适用于 Excel、Word、Outlook 和 PowerPoint 的插件以及 Office Tab Pro,非常适合需要跨多个 Office 应用高效协作的团队。
- 一体化套件— Excel、Word、Outlook 和 PowerPoint 插件 + Office Tab Pro
- 一个安装程序,一个许可证— 几分钟内完成设置(支持 MSI)
- 协同效果更佳— 在多个 Office 应用中实现高效协同
- 30 天全功能试用— 无需注册,无需信用卡
- 超值之选— 比单独购买插件更省钱