VBA for deleting rows not based on criteria

Hello,

I have data that is produced every week and added to a data sheet, this holds all the data for the year, I need to remove data rows that do not matched 4 customers (column G) and keep the rest of the row data specific to those customers, at present it is done manually and not very efficient.

Is there a way of removing this using VBA?

The 4 customers are "BURHILL";"CSA";"COSC" & "DEBE".

I have attached a worksheet that illustrates what I mean the highlighted rows are the ones to be deleted and rows that are required need to be moved up so there a no gaps?

thanks reg