Macro to delete selection of data if cell is certain value

I have a list of product transactions on sheet 1 (over 17000) listed by product code.

On sheet two i have a VLookup formula that looks up the value of the product code i enter into a cell, and returns the first transaction type for that product code. (Either 'AI' for adjustment in, or 'GO' for goods out).

I need the number of each product sold before we did a stock take. If the first transaction was a AI it means that it was stock taken before we sold any, if the first transaction was GO it means we sold some before it had been stock taken, and needs to be added back into the system.

So if the first reading on a product code was an AI, all transactions for that code can be deleted, if the first transaction was a GO I need to count how many we sold before the AI, and input back into stock.

Is there any way i can enter a product code, and if the first reading (as shown by the Vlookup) is equal to AI then all records of that product code are deleted?


There are over 3000 products and I really dont want to have to go through each one manually. Maybe I'm going to have to, just thought i'd give it a go here first before I did.


All help would be greatly appreciated.

Rogerj99