printing special numbers!

[Marc.paternotte]

Hee, i have a problem.
I like to print a file that has a number that changes every time that i
print the file.
How kan i make this posible.

P.s. the file is a list.
Every menber in the company can use this page to ask materials.
To order this materials en to now withs material for who, i need every time
a different (unique) number.

Thansk in advange

[Chip Pearson]

If you store the number in a cell, say A1, you can use the
BeforePrint event procedure to increment the number each time the
workbook is printed. E.g., put the following code in the
ThisWorkbook code module.

Private Sub Workbook_BeforePrint(Cancel As Boolean)
Range("A1").Value = Range("A1").Value + 1
End Sub


--
Cordially,
Chip Pearson
Microsoft MVP - Excel
Pearson Software Consulting, LLC
www.cpearson.com





"Marc.paternotte" <marc.paternotte@edpnet.be> wrote in message
news:448c6f0f$0$15789$14726298@news.sunsite.dk...
> Hee, i have a problem.
> I like to print a file that has a number that changes every
> time that i
> print the file.
> How kan i make this posible.
>
> P.s. the file is a list.
> Every menber in the company can use this page to ask materials.
> To order this materials en to now withs material for who, i
> need every time
> a different (unique) number.
>
> Thansk in advange
>