Created automatically sequence numbers
Tom explained in an earlier post that i = 2 means A2
If you want A1 to be included change the 2 to 1
Gord Dibben MS Excel MVP
On Thu, 14 Jun 2007 14:15:00 -0700, maperalia
wrote:
Tom;
Thnaks for your quick response.
I typed the 7047.001 in the cell "A1" and run the macro and it is doing
nothing. Do I missing something?
Maperalia
"Tom Ogilvy" wrote:
Sub AddNumbers()
Dim i as Long, j as long
i = 2
j = 7047
do while cells(i,2) < ""
cells(i,1) = j + .001
j = j + 1
i = i + 1
Loop
End Sub
--
Regards,
Tom Ogilvy
"maperalia" wrote:
How can I create an automatically sequernce numbers?.
The program I have create an automatically database from the column "B" to
column "N". However, everytime I have the data written I have to type the
serial number on the correspond column "A". I wonder if I can add a statement
to write automatically the serial number in the column "A". This number will
start from 7047.001 so next one will be 7048.001, 7049.001 and so on.
Thanks in advance.
Maperalia
|