delete rows when column has specific word(s)

The code you have works too, but need few tweaking.

Sub Macro1()

  Dim FoundIt As Range
  Dim Rng As Range
  Dim SearchWord As String
  
    SearchWord = "ABC"
    Set Rng = Columns("H:H")  'This is column where the code searches
    
      Set FoundIt = Rng.Find(What:=SearchWord, _
                             After:=Rng.Cells(1, 1), _
                             LookIn:=xlValues, _
                             LookAt:=xlWhole, _
                             SearchOrder:=xlByRows, _
                             SearchDirection:=xlNext, _
                             MatchCase:=False)
                             
      If Not FoundIt Is Nothing Then
         'Set FoundIt = FoundIt.Resize(Rowsize:=5) ' if the aim is to delete entire row, no need for this line, but it may  not be 
         FoundIt.EntireRow.Delete
      End If
         
End Sub