Displayed Collumns and Rows

J

John Tripp

I would like to find the actual rows displayed in the
activesheet. Any code examples would be greatly
appreciated.

Thanks
 
J

John Wilson

John,

Try these:

ActiveWindow.VisibleRange.Rows.Count
ActiveWindow.VisibleRange.Columns.Count

John
 
R

Ron de Bruin

Not sure if I understand you?

Excel 97 and up have 65536 rows

' rows in sheet
MsgBox Rows.Count

' this count the rows in the usedrange(a1:till the last cell)
' is not always correct
MsgBox ActiveSheet.UsedRange.Rows.Count

Or the CurrentRegion
MsgBox Range("A1").CurrentRegion.Rows.Count

Or do you mean visible rows??
MsgBox Columns("A:A").SpecialCells(xlCellTypeVisible).Cells.Count
 
Top