Excel VBA | 自动添加序列号

本文介绍如何使用Excel VBA自动添加序列号,避免手动填充的繁琐。通过VBA程序,无论是大量数据还是频繁增删行,都能一键完成序列号的更新。程序代码包括两种方案,一种基于错误处理,另一种根据B列数据自动生成。

摘要生成于 C知道 ,由 DeepSeek-R1 满血版支持, 前往体验 >

提示:程序代码是根据实际工作的需求编写的,仅供参考学习使用。


一、需要实现的功能 :自动添加序列号

操作软件:Microsoft Office Excel 2021
使用功能:Visual Basic(开发工具--visualbasic编辑器--新建模块)

​关于表格填充序列号的问题,虽然可以通过下拉填充柄来完成,但是如果表格的行数比较多,而且中间不断的添加和删除行,这时候去手动操作填充序列号会显得比较麻烦。

通过VBA程序可以一键完成,省时又省事。


二、程序代码

程序代码(一)

Sub 自动添加序列号()
    Dim i As Integer
    On Error GoTo Last
    i = InputBox
评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值