Thread: ID numbers
View Single Post
  #3   Report Post  
Posted to microsoft.public.excel.programming
pikus pikus is offline
external usenet poster
 
Posts: 1
Default ID numbers

lrow = ActiveSheet.UsedRange.Row - 1 +
ActiveSheet.UsedRange.Rows.Count

For x = 1 To lrow
ActiveSheet.Cells(x, 1).Value = x
Next x

How's that? - Piku

--
Message posted from http://www.ExcelForum.com