This is a cut and paste article from http://wordribbon.tips.net/T009540_Using_Sequential_Document_Serial_Numbers.html Using Sequential Document Serial Numbers by Allen Wyatt (last updated November 20, 2010) If you have a need to create serial numbers in your documents and they are very simple in nature, you can do so using a macro. This approach to serial numbers is great if your serial numbers are sequential (1, 2, 3, etc.) or regular in their incidence (3, 5, 7, etc.). To begin, you should enter the macro that will control the change of the serial number and the printing of your document. You can use the following macro: Sub MySerial() Dim rngSerialLocation As Range Dim intSerialNum As Integer Dim strSerialNum As String Dim docCurrent As Document Dim intNumCopies As Integer Dim intCount As Integer ' set ref to current active doc Set docCurrent = Application.ActiveDocument ' set ref to the bookmarked serial number Set rngSerialLocation =