Dante Amor respondió:
Utiliza la siguiente macro: Sub eliminar() 'Por.DAM Dim f As New Collection Sheets("Hoja1").Select For i = 1 To Range("A" & Rows.Count).End(xlUp).Row If UCase(Cells(i, "M")) = "BAJA" Then f.Add i End If Next For i = f.Count To 1 Step -1...
Macro VBA eliminar filas según valor de una celda para Excel