it's not "Rpw",but "Row"
"Jerry Dyben" wrote in message
...
From Microsoft training on Loops. Copied the following Do While Loop:
Sub CountRows()
x=ActiveCell.Rpw
y=ActiveCell.Column
z=0
Do While Cells(x,y).Value < ""
x=x+1
z=z+1
Loop
MsgBox "There are "& z &" rows in the current range."
End Sub
Microsoft Visual Basic flaged MsgBox in red and stated, "Expected:end of
statement"
What is wrong?
|