Hi JPriest

Which example do you use?

Try this first :

Here is a filter example
In this Example "G1" is the header cell.

If your header start in G4 then change the range to G4:G15000

Sub Delete_with_Autofilter()
   Dim DeleteValue As String
   Dim rng As Range

   DeleteValue = "no"
   ' This will delete the rows with "no" in the Range("G1:G15000")
   With ActiveSheet
       .Range("G1:G15000").AutoFilter Field:=1, Criteria1:=DeleteValue
       With ActiveSheet.AutoFilter.Range
           On Error Resume Next
           Set rng = .Offset(1, 0).Resize(.Rows.Count - 1, 1) _
                     .SpecialCells(xlCellTypeVisible)
           On Error GoTo 0
           If Not rng Is Nothing Then rng.EntireRow.Delete

       End With
       .AutoFilterMode = False
   End With
End Sub