Excel表格怎么设置点击一下或打印一次表格内的数字自动加一个数，如1234 打印后自动变成1235

发布网友 发布时间：2022-04-24 14:13

我来回答

共4个回答

热心网友 时间：2023-10-15 21:32

1、打开一个excel表格。

2、在表格中的第一列和第二列分别输入1、3。

3、鼠标在第一个单元格中，点击鼠标左键不放，拖动到第二个单元格中，然后松开鼠标。

4、然后鼠标放在第二个单元格的右下角处，当鼠标指针变成一个加号的时候，按住鼠标左键不放，往下拖动。

5、此时，鼠标拖动过的单元格内，都会自动从上至下依次加2填入单元格内。

热心网友 时间：2023-10-15 21:32

　　假设编码在G1单元格，使用下面代码可实现打印和自动编码递增。
　　按ALT+F11打开VBA窗口，插入一个模块，把下面代码复制进去。
　　回到excel窗口，按“视图－工具栏”，点“窗体”，调出“窗体”工具栏，在上面选一个按钮，添加到表格上，并指定宏为“打印”。
　　使用时，每点击一下添加的按钮，就会打印一次，并使编号自动加一。

Sub 打印()
ActiveWindow.SelectedSheets.PrintOut
s = Val(Range("g1"))
s = s + 1
Range("g1") = "'" & Right("0000" & s, 5)
End Sub

热心网友 时间：2023-10-15 21:33

同时按Alt和F11，出来VB界面，在左上窗口找到Thisworkbook，双击它，在右边窗口粘贴如下代码：
Private Sub Workbook_BeforePrint(Cancel As Boolean)
Sheets("Sheet1").Range("A2") = Sheets("Sheet1").Range("A2") + 1
End Sub

把粗体字换成实际的工作表名字和单号所在单元格。回到Excel中，点打印的时候，它自动先单号加1，然后打印。

热心网友 时间：2023-10-15 21:34

EXCEL中选则视图-------页眉页脚设置