Formula to delete column if it doesn't match criteria

Okay I have been trying unsuccessfully to figure this out for the past 2 hours and need help!! I have a column of cells (Column I2:I1063) with zip codes in it and I want to keep the row if the zip code matches one on the list in a column B2:B100 on a separate sheet (Sheet1). Is this possible and if so how??????? Help please!!

Hi stekng1fan,

Using a helper column combined with a macro would take care of this pretty quickly. On the sheet with zip codes in column I (sheet2?), in J2 put the formula:

=IF(ISERROR(MATCH(I2,Sheet1!$B$2:$B$100,0)),"Error","")

Fill that down to J1063 (double-click on the lower-right corner of J2 and it will fill down to the last used row in column I automatically).

Right-click on the Sheet2 tab and choose View Code. Paste the following code into that window, then close the VB Editor window. Finally, press ALT+F8 to open the Macros window, select Sheet2.DeleteRows and click Run.

Please Login or Register  to view this content.

That should do it!

Based on the layout of your spreadsheet, in S2 put the formula:

=IF(ISERROR(MATCH(TEXT(I2,"@"),Sheet1!$B$2:$B$100,0)),"Error","")
Then adjust the code to:

Please Login or Register  to view this content.

That should leave about 65 rows based on example data provided.