View Single Post
  #3   Report Post  
Posted to microsoft.public.excel.programming
Tom Ogilvy Tom Ogilvy is offline
external usenet poster
 
Posts: 6,953
Default Next available row

You can have your code check it for you. Assume it can be determined from
entries in column 1 on each sheet.

Sub getLastrows()
for each sh in Activeworkbook.worksheets
set rng = sh.cells(rows.count,1).End(xlup)(2)
msgbox sh.name & ": next empty row is " & rng.row
Next
End sub

--
Regards,
Tom Ogilvy

"Sandy" wrote:

I have a workbook with 6 worksheets - all the worksheets are related to the
same part numbers but each contains different information. The number of rows
on each worsheet varies based on the data requirements. Each data table
begins at cell A1 on the respective sheet.

I import a file to update these data on the various sheets but sometimes I
encounter a new part number that needs to be added to one or more sheets.
Presently I go to each sheet to get the row count so I know where the next
empty row is.

Is there another way to do this without going to each sheet?

Thanks