Counter to delete a row
Hi Chris,
It is unnecessary to select a row in order to delete it. Normally, when
deleting rows, it is easier to start at the bottom and work up.
Perhaps try something like:
'=============
Public Sub Tester001()
Dim i As Long
Const startRow As Long = 2
Const endRow As Long = 100
For i = endRow To startRow Step -1
If Cells(i, "A").Value 10 Then
Rows(i).Delete
End If
Next i
End Sub
'<<=============
---
Regards,
Norman
"ChrisM" wrote in message
...
I have a macro which deletes row 6 from my worksheet.
eg "Rows("6:6").Select"
However I want to amend this code so that instead of deleting row 6 I
want
to delete the row number equal to a counter value that I have defined.
When I come to a row I want to delete, what value do I put in the code
"Rows("?:?").Select" to delete the row number to the value of the counter.
thanks for your help
|