Question

Excel宏代码怎么添加循环！求高手帮忙！！

能不能录制个宏或者修改下代码，可以循环打印（点下一个，然后点打印......如此循环）很多份出来，求高手帮忙！！！！！





Answer 1

Private Sub.....
[f4]=[f4 ]+1
calculate
sheets("申请表").printout
End sub

这个代码 修改下就好了,上一个 下一个 就都不用要了，直接打印 所有的:

Private Sub.....
 [f4]=[f4 ]+1
calculate
sheets("申请表").printout
End sub

追问

不是这样啊 我点下一个 表上的信息会变成下一个人的 我想一次打很多出来

追答

我再说一遍：

commandbutton3 的按钮代码 改成如下: 点击打印就 一次打印所有的

Private Sub commandbutton3_Click()
 [f4]=[f4 ]+1
calculate
sheets("申请表").printout
End sub

追问

但是就打了一张纸啊

追答

写错了

写错了
Private Sub commandbutton3_Click()
 for i=1 to 100 '总份数100份， 可修改，数量自己修改
  [f4]=[f4 ]+1
 calculate
  sheets("申请表").printout
next
End sub