Delete rows fi specific text

If I understand what you want... :

Sub DeleteRow()
    Set r = Range("A5:A200")
    For Each c In r
        If InStr(1, c.Value, "Input Values:", vbTextCompare) > 0 Or InStr(1, c.Value, "Carrier Selected: All Carriers", vbTextCompare) > 0 Or _
        InStr(1, c.Value, "Input Values:", vbTextCompare) > 0 Or InStr(1, c.Value, "Input Values:", vbTextCompare) > 0 Then
            c.Delete shift:=xlUp    ' Use this if you only want to delete the cell column A
            rows(c.row & ":" & c.row).Delete shift:=xlUp ' Use this if you want to delete the entire row
        End If
    Next c
    Set r = Range("B5:B200")
    For Each c In r
        If InStr(1, c.Value, "LOA", vbTextCompare) > 0 Or _
        InStr(1, c.Value, "LOB", vbTextCompare) > 0 Or _
        InStr(1, c.Value, "LOC", vbTextCompare) > 0 Or _
        InStr(1, c.Value, "LOD", vbTextCompare) > 0 Or _
        InStr(1, c.Value, "LOE", vbTextCompare) > 0 Or _
        InStr(1, c.Value, "LOF", vbTextCompare) > 0 Or _
        InStr(1, c.Value, "LOG", vbTextCompare) > 0 Or _
        InStr(1, c.Value, "LOH", vbTextCompare) > 0 Or _
        InStr(1, c.Value, "LOI", vbTextCompare) > 0 Or _
        InStr(1, c.Value, "OMT", vbTextCompare) > 0 Then
            c.Delete shift:=xlUp    ' Use this if you only want to delete the cell column B
            rows(c.row & ":" & c.row).Delete shift:=xlUp ' Use this if you want to delete the entire row
        End If
    Next c
End Sub