VBA code to delete rows based off of criteria in a column

[jrosen12]

Hello,

I am looking for a code that searches worksheet called Checks_Export in Column B, and any rows that DOES NOT have BHP in Column B are deleted

Thank you!

 

[Fluff]

Hi & welcome to MrExcel
How about

Sub FilterDelete()

   With Sheets("Checks_Export")
      If .AutoFilterMode Then .AutoFilterMode = False
      .Range("B:B").AutoFilter 1, "<>BHP"
      .AutoFilter.Range.Offset(1).EntireRow.Delete
      .AutoFilterMode = False
   End With
End Sub