Excel如何设置打印一次单元格内容变一次

Excel设置打印一次单元格内容变一次的步骤:

sheet1中,已经设置好了打印区域。要求每打印一次,单元格B2中的日期就增加一天。

Alt+F11,打开VBE,双击sheet1工作表,以确认后续的代码是在sheet1中执行。

步骤阅读

复制如下代码到右侧的空白区域,然后按F5执行代码即可实现每打印一张,B2的日期增加一天。

Sub m()

For i = 1 To 100

ActiveSheet.PrintOut copies:=1

Cells(2, 2) = Cells(2, 2) + i

Next

End Sub

代码详解:

1.Sub m()——这是宏名,无需理会;

2.For i = 1 To 100——这是控制打印次数,后面的100就是打印的页数,可以通过更改这个数值,来控制打印多少页;

3.ActiveSheet.PrintOut copies:=1——这是打印当前页的代码,无需理会;

4.Cells(2, 2) = Cells(2, 2) + i——这里的Cells(2,2)就是单元格B2,其中第一个2是行数,第二个2是列数,更改这两个数值,就可以控制让哪个单元格的数值变动;

5.Next——继续循环,无需理会;

6.End Sub——结束宏,无需理会。

AI助手