Sanırım şunlar işini görür.
www.excel.web.tredit: Bu kodu denedim oluyor. diğerleri sadece hücre içeriğini siliyor, bu ise satırı siliyor.
Sub SATIRSİL()
For X = [A65526].End(3).Row TO 2 Step -1
If Cells(X, 1) Like "*Bafra*" Then
Rows(X).Delete
End If
Next
End Sub
Bafra yazan yere silmek istediğin kelimeyi yazacaksın.