How do I get a cell to increment during printing

[Brian]

I am trying to print a form with incrementing numbers in a cell when I print.

 

[Fred Smith]

You'll need to provide more information.

Do you want it to increment with every line? Every page? Every time you
print?

Regardless, you'll probably need a macro to achieve what you want. If a
macro solution is acceptable, post to .programming to get the best response.

Regards,
Fred.

 

[Gord Dibben]

Same form multiple copies?

http://www.rondebruin.nl/print.htm#same


Gord Dibben MS Excel MVP

 

[Brian]

Fred,

What I am doing is creating a Purchase Order Form and I want to increment
the Purchase Order number when I print multiple forms.

I found this macro on the net but it keeps giving me a syntax error:
Sub PrintJobSheet()

startjob = InputBox('Enter the first job number to be printed')

endjob = InputBox('Enter the last job number to be printed')

For thisjob = startjob To endjob

Range(F5).Select

ActiveCell.FormulaR1C1 = thisjobActiveWindow.SelectedSheets.PrintOut

Next

End Sub

Let me know what I need to do.

Thanks,
Brian

 

[Gord Dibben]

Multiple copies of the same blank form?

http://www.rondebruin.nl/print.htm#same


Gord Dibben MS Excel MVP