VBA count number of cells
Hi
Do not use Rows as a variable, it's already used in VBA.
Is ActiveCell always in row 1, otherwise you may wish to subtract
ActiveCell.Row from the result below.
Look at this:
Dim Target as Range
Dim RowCount as Integer
Set Target = ActiveCell
Do While Not (IsEmpty(Target))
RowCount = Target.Row
Set Target = Target.Offset(1, 0)
Loop
'or
RowCount = ActiveCell.End(xlDown).Row
Regards,
Per
"filip" skrev i meddelelsen
...
I am counting number of cells i have to iterate with next piece of code:
Dim rows
Do While Not (IsEmpty(ActiveCell))
rows = ActiveCell.Row
ActiveCell.Offset(1, 0).Select
Loop
is it possible to do the same without selecting?
|