Progressive numbering of Excel worksheets

  • Thread starter Thread starter Guest
  • Start date Start date
G

Guest

Is it possible to print multiple copies of an Excel worksheet with progressive
numbers
 
This macro might help

Sub Macro1()
Application.ScreenUpdating = False

For j = 1 To 5
ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True
Range("E20") = Range("E20") + 1
Next j

Application.ScreenUpdating = True
End Sub

best wishes
 
This macro might help

Sub Macro1()
Application.ScreenUpdating = False

For j = 1 To 5
ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True
Range("E20") = Range("E20") + 1
Next j

Application.ScreenUpdating = True
End Sub

best wishes
 
You must log in or register to reply here.

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Similar Threads

VLOOKUP formula for multiple worksheets 4
Excel Copy cells from one worksheet to another workseet - increment row & do again 0
Vlookup with changing columns 2
Rundll Error 0
copy numbers progressively 5
Recalculating when an Excel sheet gets the focus from outside Excel 10
Counting multiple memberships 1
How do you determine a total number of worksheet entries? 4

Back
Top