Home |
Search |
Today's Posts |
#1
|
|||
|
|||
Incrementing Cell Numbers
All:
I have created an excel "Workorder" form for our employees to write in what machine they are working on, what parts they used, and how long they spent on the repair... The problem... I need to print out hundreds of these forms for the men to use, and each copy of the form needs to have an unique number. Is there a way to program a cell to automatically increment by 1 every time it is printed? Again, I need to print hundreds at a time, and I need them to automatically increment by 1. TIA, Lance |
#2
|
|||
|
|||
Place this in ThisWorkbook module:
Private Sub Workbook_BeforePrint(Cancel As Boolean) With Sheets("Sheet1") .[A1].Value = .[A1].Value + 1 End With End Sub --- HTH Jason Atlanta, GA -----Original Message----- All: I have created an excel "Workorder" form for our employees to write in what machine they are working on, what parts they used, and how long they spent on the repair... The problem... I need to print out hundreds of these forms for the men to use, and each copy of the form needs to have an unique number. Is there a way to program a cell to automatically increment by 1 every time it is printed? Again, I need to print hundreds at a time, and I need them to automatically increment by 1. TIA, Lance . |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
how to create a variable column in cell reference | Excel Worksheet Functions | |||
create a cell that accumulates, numbers from another cell... | Excel Discussion (Misc queries) | |||
How can I write in a text in a cell using numbers and the letters. | Excel Discussion (Misc queries) | |||
CAN I ADD NUMBERS IN ONE CELL | Excel Worksheet Functions | |||
16 DIGIT NUMBERS IN CELL WITHOUT LAST DIGIT BEING A ZERO | Excel Worksheet Functions |