deleting 2 rows

[Tomek]

Hello,

I wonder how to delete 2 rows if there is zero value in the first row?
I know how to delete one row with zero value but I do not know how to
delete to rows.
There are many rows with values. If there is a row with zero value I want
to delete the row with zero value and next row with whatever value.
I have several thousands rows.

example
A
1
5
0 DELETE
2 DELETE
2
2
0 DELETE
5 DELETE

Thank you very much in advance for help

Tomek

 

[Tom Ogilvy]

Use the resize method

activecell.Resize(2).EntireRow.delete

 

[Tomek]

Dnia Sat, 29 Jan 2005 12:18:50 -0500, Tom Ogilvy napisa³(a):

Use the resize method

activecell.Resize(2).EntireRow.delete

Thank you very much , it really works!

Tomek