macro to delete rows where payments offset sales

[bwaite87]

Hey all,
I need some help making a macro.
Please see the attached sample workbook.
Column G is sales, and H is payments received.
I would like to have a macro that will delete all rows where the payment offsets the invoices above it. So you can see what I mean, I’ve highlighted all cells that offset each other in blue. So once I run the macro I would like all those rows to be gone.
Can anyone help me out with this?

my normal range is usually around A1:I3000

Book1.xlsm

[xladept]

Hi BWaite,

Try this:

Please Login or Register  to view this content.

Directions for running the routine(s) just supplied

Copy the code to the clipboard

Open your Workbook

Save your Workbook or Another Workbook designated for Macros as Macro_Enabled

Press ALT + F11 to open the Visual Basic Editor.

Select “Module” from the Insert menu

Type "Option Explicit" then paste the code under it

With the cursor between Sub and End Sub press F5 (F8 to Single Step)

OR

Press ALT + Q to close the code window.

Press ALT + F8 then double click on the macro name

[bwaite87]

wow it worked, thanks!
One more question, how would I make this work if my data started in row 7 (headers are in row 7).
Blank space is above. Sorry, it's important, should have made it that way in my sample

[xladept]

Hi BWaite,

I changed the program a little - to answer your question:

Please Login or Register  to view this content.

[bwaite87]

Ah, so that's what r means.
Thanks so much XLAdept

[xladept]

You're welcome! Don't forget to incorporate the updated line

Please Login or Register  to view this content.

in your copy!