Solved: Finding last row of a column

[SeanJ]

I am pulling data from another workbook, and I need to know the last row of any worksheet in that workbook. There will be empty row before that last row. I need to find the total number of rows of a sheet.

[Bob Phillips]

Is it the last row in a particular column, or the last last row of all columns.

[SeanJ]

The column will always be D I am just want to find the last row of that column.

[Bob Phillips]

[vba]

With Worksheets("Sheet1")

LastRow = .Cells(.Rows.Count, "D").End(xlUp).Row
End With
[/vba]

[SeanJ]

Sorry did not work. I am posting a example workbook with data populating sheet1. The last row will always be moving on every sheet in different workbooks.

[SeanJ]

I got the answer Iwas looking for.

wbk.Sheets(I).Range("D65536").End(xlUp).Row

Thanks for the help.

[Aussiebear]

How does your solution do what you asked in your first post?

I am pulling data from another workbook, and I need to know the last row of any worksheet in that workbook. There will be empty row before that last row. I need to find the total number of rows of a sheet.

[mdmackillop]

I got the answer Iwas looking for.

wbk.Sheets(I).Range("D65536").End(xlUp).Row

Thanks for the help.

That is what the reply in Post 4 does, when suitably qualified as per your example, but it will also work in Excel 2007 which can have rows greater than 65536.