USEDRANGE

[ak]

I use this in VB to check the no. of row used in the activesheet:-

ActiveSheet.UsedRange.Rows.count

BUT if the first row is blank then the total no. of row will be minus by one.
How can the total no. of rows(including the first blank row) be counted?

[Norman Jones]

Hi AK,

Try:

'=============>>
Public Sub Tester()
Dim iCtr As Long

With ActiveSheet.UsedRange
iCtr = .Row + .Rows.Count - 1
End With

MsgBox iCtr

End Sub
'<<=============


---
Regards,
Norman



"ak" <[email protected]> wrote in message
news:[email protected]...
>I use this in VB to check the no. of row used in the activesheet:-
>
> ActiveSheet.UsedRange.Rows.count
>
> BUT if the first row is blank then the total no. of row will be minus by
> one.
> How can the total no. of rows(including the first blank row) be counted?