thank you guys for your help,
Private Sub UserForm_Initialize()
g = Application.WorksheetFunction.CountA(Range("A:A"))
a = Cells(g, 1)
Label1.Caption = a + 1
End Sub
works fine for a number list, but my list for example looks like,
P011110
P011111
P011112
P01111... so on
is it possable to make this work with a letter at the start of the list
or if i put the P on its own in column A, can this then be made to work
on column B on the 11110 part, iv tryed this myself but cant seem to
get it to work with column B ?
Thanks Clare.
--
clarefoxly
------------------------------------------------------------------------
clarefoxly's Profile:
http://www.excelforum.com/member.php...o&userid=24183
View this thread:
http://www.excelforum.com/showthread...hreadid=384541