Printing sheets with consecutive numbers in a cell?

[Jeff]

I would like to know how to print Excel sheets with a
numbering system. I have a material requisition sheet.
Would be great to print these with each having it's own
number. I know it's easy to do in the header or footer,
but would like to do this in a cell.

Thanks for your reply,

Jeff

 

[Paul B]

Jeff, if this is a sheet you fill out and then clear to use again you could
use something like this in the this workbook code

Private Sub Workbook_BeforePrint(Cancel As Boolean)
Sheet1.[A1] = Sheet1.[A1].Value + 1
End Sub


--
Paul B
Always backup your data before trying something new
Using Excel 2000 & 97
Please post any response to the newsgroups so others can benefit from it
** remove news from my email address to reply by email **

 

[JMay]

Paul - How could you incorporate "Page Number: " into this code?

Jeff, if this is a sheet you fill out and then clear to use again you could
use something like this in the this workbook code

Private Sub Workbook_BeforePrint(Cancel As Boolean)
Sheet1.[A1] = Sheet1.[A1].Value + 1
End Sub


--
Paul B
Always backup your data before trying something new
Using Excel 2000 & 97
Please post any response to the newsgroups so others can benefit from it
** remove news from my email address to reply by email **

I would like to know how to print Excel sheets with a
numbering system. I have a material requisition sheet.
Would be great to print these with each having it's own
number. I know it's easy to do in the header or footer,
but would like to do this in a cell.

Thanks for your reply,

Jeff

 

[Thomas]

Sheet1.[A1] = "Page Number: " & Sheet1.[A1].Value + 1

Paul - How could you incorporate "Page Number: " into this code?

Jeff, if this is a sheet you fill out and then clear to use again you could
use something like this in the this workbook code

Private Sub Workbook_BeforePrint(Cancel As Boolean)
Sheet1.[A1] = Sheet1.[A1].Value + 1
End Sub


--
Paul B
Always backup your data before trying something new
Using Excel 2000 & 97
Please post any response to the newsgroups so others can benefit from it
** remove news from my email address to reply by email **

I would like to know how to print Excel sheets with a
numbering system. I have a material requisition sheet.
Would be great to print these with each having it's own
number. I know it's easy to do in the header or footer,
but would like to do this in a cell.

Thanks for your reply,

Jeff