excel学习库-Excel使用VAB代码建立宏控件，每打印一次自动递增一次编号

案例：每点击打印按钮，打印完毕后，编号输入框数值自动递增1次操作： 1.在excel内I2为数字变化单元格，数值格式为：'000，数值前面加个'号 2.sheet1表名上右键查看代码输入： Sub 打印()ActiveWindow.SelectedSheets.PrintOuts = Val(Range("I2"))s = s + 1Range("I2") = "'" & Right("00000000" & s, 8)End Sub 注： "I2"指定的变化单元格， s = s + 1指的是递增1次 ("00000000" & s, 8)中的"00000000" 指的是八位数值编码，8为变化数位为8位，这个根据实际情况改为("0000" & s, 5)也可以代码输入完毕后，另存为excel启用宏的工作簿，即：Microsoft Excel 启用宏的工作表 (.xlsm)格式

3.打开Microsoft Excel 启用宏的工作表 (.xlsm)，可以建立控件

首先打开表格，视图工具栏处点击右键-自定义功能区，红色标注处：开发工具处√，确认，在工具栏就可以看到开发工具一栏了

开发工具-插入-表单控件选择红色标注：按钮（窗体控件），在指定需要的位置画个合适的按钮框后，出现指定宏，第二排 sheet1.打印，选中确定。把出现的按钮4更为文字为打印。然后选择打印按钮就可以进行打印了，每打印一次I2的编号自动会增加一次。

一	二	三	四	五	六	日
						1
2	3	4	5	6	7	8
9	10	11	12	13	14	15
16	17	18	19	20	21	22
23	24	25	26	27	28	29
30	31

excel学习库

excel表格_excel函数公式大全_execl从入门到精通

Excel使用VAB代码建立宏控件，每打印一次自动递增一次编号2024-04-11 12:34:55