In B1: =IF(A1<"",1,"")
B2: =IF(A2<"",MAX($B$1:OFFSET(B2,-1,0))+1,"")

and copy B2 down

--
HTH

Bob Phillips

(remove nothere from email address if mailing direct)

"V" wrote in message
...
I want sequential numbering, however, the content contains blank rows.
Plus
every time I add a row e.g. in the middle, then I have to re-number the
rest
of the list. Is there a quicker way to do this?