KutoolsforOffice — 一套方案,五大工具。事半功倍。

如何在 Excel 中自动生成发票编号?

作者Kelly修改日期

在 Excel 中生成发票编号往往颇具挑战:由于发票编号必须具备唯一性和连续性,手动输入极易出错,例如遗漏上次使用的编号或意外重复使用编号。这不仅可能导致发票追踪混乱、数据失准,甚至还会引发记账错误或合规风险。通过在 Excel 中自动创建发票编号,不仅能节省时间,更能确保整个开票流程的准确性与一致性。

本文介绍了三种在 Excel 中生成自动发票编号的实用方法,每种方案各具优势,适用于不同场景,助您轻松简化工作流程、有效减少错误。


在 Excel 中添加自动发票编号生成器

本方案利用 VBA 实现每次打开指定工作簿时自动递增发票编号,适用于在单一文件中创建并跟踪发票的场景。但若关闭前未保存,或同时在多个工作簿中操作,则存在编号重复的风险。以下为包含详细步骤与重要提示的完整指南。

1. 首先打开您用于发票的工作簿,或在开始时新建一个。

2. 选择一个空白单元格用于存储发票起始编号,例如在单元格 D2 中输入起始发票编号(如)100000)。该单元格将作为生成发票编号的参考依据。

3. 按 Alt+F11 打开 Microsoft Visual Basic for Applications 窗口。在 VBAProject 窗格(通常位于左侧)中,展开当前工作簿列表,双击 ThisWorkbook 即可打开其代码窗口。(注:例如,如果您的文件名为 Book 1,请在 VBAProject (Book 1) 下找到 ThisWorkbook。)

4. 将以下 VBA 代码复制并粘贴到弹出的代码窗口中。

VBA:发票编号生成器

Private Sub Workbook_Open()
Range("D2").Value = Range("D2").Value + 1
End Sub

注:请务必根据 第 2 步 中选定的起始数字单元格位置,调整代码中的 D2.

将代码插入到 ThisWorkbook 模块中

5. 如果您希望创建更高级或更易读的发票编号(例如添加日期、公司名称或随机元素),可使用 Excel 公式,而非仅依赖整数。以下是部分常用公式及其效果:

编号公式发票编号
1="CompanyName"&TEXT(TODAY(),"yymmdd")&D2CompanyName141209100000
2="CompanyName"&TEXT(TODAY(),"0")& D2CompanyName41982100000
3="CompanyName"&TEXT(NOW(),"MMDDHHMMSS")& D2CompanyName1209095819100000
4="CompanyName"&TEXT(NOW(),"0")& D2CompanyName41982100000
5="CompanyName"&RANDBETWEEN(100000,999999)& D2CompanyName448685100000

实用技巧:
(1)若起始数字所在的单元格位置不同,请将上述公式中的 D2 替换为实际单元格。
(2)请将 CompanyName 替换为您所在组织或企业的名称,或其他所需前缀。
(3)在需要显示发票编号的单元格中输入公式,然后按 Enter,即可自动生成发票编号。
(4)如需批量生成,只需拖动填充柄,即可快速复制公式并创建多个唯一发票编号。

注意事项与提醒:
- 请确保在 Excel 设置中启用宏,否则 VBA 代码将无法运行。
- 每次关闭前务必保存工作簿,以免下次发票编号未能正确更新而产生重复。
- 将起始编号单元格存放于隐藏或受保护的工作表中,可进一步降低意外编辑的风险。

6. 为保留宏功能并避免设置丢失,请将工作簿另存为启用宏的文件。
A. 在 Excel 2013 或更高版本中:单击文件 > 保存(或)另存为)> 计算机 > 浏览
B. 在 Excel 2007 或 2010 中:单击文件菜单或 Office 按钮,然后选择保存(或)另存为)。

7. 在另存为对话框中,请执行以下操作:

将文件另存为 Excel 启用宏的工作簿格式

(1)在文件名框中输入或选择一个文件名。
(2)在指定保存格式下拉列表中选择 Excel 启用宏的工作簿(*.xlsm)
(3)确定文件的存储位置。
(4)单击保存,立即完成操作!

设置完成后,每次打开发票工作簿时,发票编号都会自动递增 1. 为确保编号顺序准确、避免重复或重置,请务必在每次操作后保存工作簿。此方法最适合单个工作簿使用;若需在多个文件中操作或由多位用户协同处理,请考虑以下替代方案。

故障排除:若出现宏安全警告,请检查 Excel 的信任中心设置,确保已允许宏运行。若发票编号未按预期递增,请确认代码位置正确,且所引用的单元格与实际需求一致。


使用 KTE 的插入序列号功能添加发票编号

虽然上述 VBA 方法在专用工作簿中效果良好,但在需要跨不同文件生成唯一连续发票编号或与同事共享流程时可能受限。为获得更高灵活性和易用性,建议使用 Kutools for Excel插入序列号功能。该方法可在多个工作簿间无缝运行,即使您在关闭前忘记保存文件也能避免编号重复——这是基础 VBA 方案常见的缺陷。

Kutools for Excel 提供 300 多项高级功能,简化复杂任务,提升创造力与效率。集成 AI 能力,Kutools 精准自动化任务,让数据管理变得轻松自如。Kutools for Excel 的详细信息……         免费试用……

1. 单击您希望显示发票编号的单元格,然后依次点击 Kutools > 插入 > 插入序列号
单击此插入序列号功能并设置选项

2. 在“插入序列号”对话框中,单击新建,然后按以下方式自定义序列,轻松满足您的需求(参见上方图片):
(1)在序列名称中输入名称,例如发票编号
(2)将增量设为 1,确保编号连续不中断。
(3)可选:在前缀(可选)字段中添加公司名称或您偏好的文本。
(4)在开始数字中输入起始值,例如 100001.
(5)在位数中指定数字位数(例如,)6 可生成 000001 格式)。
(6)单击添加,即可保存新序列,方便日后随时调用。

提示:您可自定义后缀、调整数字位数,甚至为不同类型的发票或文档创建多个独立的编号方案。

3. 选中您的自定义序列后,单击填充范围,即可将下一个唯一编号直接插入所选单元格,然后单击关闭
单击填充范围以将数字填入单元格
无论您在哪个工作簿中操作,使用插入序列号功能都会自动插入序列中的下一个唯一编号——无需手动记录,大幅降低出错或重复的风险,尤其适用于团队协作或频繁数据录入场景。您可在此处了解更多

其他优势还包括对序列设置进行密码保护,以及为不同文档类型或部门预设可重复使用的格式。

Kutools for Excel——通过 300 多款必备工具全面增强 Excel 功能,助您工作更快速、更轻松,并借助 AI 功能实现更智能的数据处理与高效办公!立即获取


使用 Excel 公式自动创建发票编号

如需无需宏或插件的简易发票编号,Excel 公式可快速生成连续编号。此方法最适合一次性创建表格或日志中所需的简单发票编号列表,而非实现跨会话自动递增。

1. 单击您希望显示首个发票编号的单元格(例如 )A2),并输入以下公式,即可从 10000 开始生成序列:

=10000 + ROW()-2

2. 按 Enter,该单元格将显示第 2 行的发票编号 10000. 要生成后续编号,请向下拖动填充柄——每行递增 1,下一张发票编号即为 10001,再下一张为 10002,依此类推。

参数说明:10000 替换为您所需的起始数字。根据起始行调整 ROW()-2;例如,若从第 5 行开始,请使用 ROW()-5.

实用技巧:如需更个性化的发票编号,可尝试结合日期或前缀,例如:

="INV"&TEXT(TODAY(),"YYMMDD")&TEXT(ROW()-1,"000")

这将生成类似 INV 240614001、INV 240614002 等发票编号,请根据您的实际结构需求灵活调整。

注意:此方法适用于一次性批量生成连续编号,便于打印或导出,但重新打开文件时不会自动递增。


演示:使用 KTE 的插入序列号功能添加发票编号

 

 

在多个工作簿中插入唯一且连续的发票编号

在大多数情况下,基于工作表的公式或简单方法仅能在单个工作表或工作簿中生成发票编号。如果您需要为多个项目、部门或用户在不同工作簿中管理发票,则可能难以同步编号序列并避免重复。Kutools for Excel插入序列号功能专为此类场景设计,可轻松在多个文件和多位用户之间插入唯一且连续的发票编号。该功能集中管理编号逻辑,进一步降低复杂协作流程中的风险。

使用 Kutools 插入序列发票编号


最佳办公效率工具

🤖KUTOOLS AI 助手:基于以下内容革新数据分析:智能执行   |  生成代码|  创建自定义公式  |  数据分析及生成图表|  调用 Kutools Functions……
热门功能查找、高亮或标记重复项   |  删除空白行   |  合并列或单元格且不丢失数据   |  不使用公式的四舍五入……
高级 LOOKUP多条件 VLookup  |  多值 VLookup  |   跨多工作表 VLookup   |   模糊查找……
高级下拉列表快速创建下拉列表   |  级联下拉列表   |  多选下拉列表……
列管理器添加指定数量的列|移动列|切换隐藏列的可见性状态|比较区域与列……
特色功能网格聚焦   |  设计视图   |增强编辑栏   | 工作簿和表管理器   |  资源库(自动文本)|  日期提取   |  汇总工作表  |  加密/解密单元格   | 按列表发送邮件   |  超级筛选   |   特殊筛选(筛选粗体单元格/斜体/删除线……) ......
精选 15 工具集12 文本工具添加文本删除特定字符,……)|   50+ 图表 类型甘特图,……)|   40+ 实用公式基于生日计算年龄,……)|   19 插入工具插入二维码从路径插入图片,……)|   12 转换工具小写金额转大写汇率转换,……)|   7 合并和拆分工具高级合并行分割单元格,……)|……更多
在您的首选语言中使用 Kutools – 支持英语、西班牙语、德语、法语、中文及 40+ 种其他语言!

使用 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 应用高效协作的团队。

ExcelWordOutlookTabsPowerPoint
  • 一体化套件— Excel、Word、Outlook 和 PowerPoint 插件 + Office Tab Pro
  • 一个安装程序,一个许可证— 几分钟内完成设置(支持 MSI)
  • 协同效果更佳— 在多个 Office 应用中实现高效协同
  • 30 天全功能试用— 无需注册,无需信用卡
  • 超值之选— 比单独购买插件更省钱