VBA Search for string "Test" in Column B. Delete row wherever found.

[MikeL]

Hello,
Search for string "Test" in Column B. Delete the row if string is found.

 

[mrshl9898]

VBA Delete Entire Row if Contains Certain Text

I've searched on here, but every code I put in gives me an error back. Data in column D, If any of the cells contains "Record Only" I need it to delete the entire row. Thanks

www.mrexcel.com

Sub test()
With ActiveSheet
    .AutoFilterMode = False
    With Range("B1", Range("B" & Rows.Count).End(xlUp))
        .AutoFilter 1, "*Test*"
        On Error Resume Next
        .Offset(1).SpecialCells(12).EntireRow.Delete
    End With
    .AutoFilterMode = False
End With
End Sub

 

[MikeL]

VBA Delete Entire Row if Contains Certain Text

I've searched on here, but every code I put in gives me an error back. Data in column D, If any of the cells contains "Record Only" I need it to delete the entire row. Thanks

www.mrexcel.com

Sub test()
With ActiveSheet
    .AutoFilterMode = False
    With Range("B1", Range("B" & Rows.Count).End(xlUp))
        .AutoFilter 1, "*Test*"
        On Error Resume Next
        .Offset(1).SpecialCells(12).EntireRow.Delete
    End With
    .AutoFilterMode = False
End With
End Sub

That works. .Thanks!