Si usted itera con las filas en orden reversa y las suprime de la parte inferior encima de usted no tienen que preocuparse de su índice que está apagado. algo como el siguiente trabajaría…
Submarino privado CommandButton1_Click ()
Para I = ActiveCell.SpecialCells (xlLastCell). Fila a 1 paso -1
Si células (I, 3) = “Test1/Test2/Test3” entonces
Filas (I). Cancelación
Terminar si
Después I
Submarino del extremo