If you put something in Column B, just put this formula in column A and copied down

=IF(B1<>"",TEXT(ROWS($B$1:B1),"000"),"")

Azumi