Se volessi cancellare in contemporanea anche le le righe contenti "CA" , "GE" ecc...

come lo debbo modificare?

Ho provato così.. ma non funzia..

Sub eliminaMI()

For Each cella In Selection.Cells
If InStr(1, cella.Value, "MI,CA,GE") <> 0 Then
'elimina riga
cella.EntireRow.Delete

End If
Next


End Sub

GRAZIE!