Bonjour,
Après compilation de plusieurs fichiers excel en un seul, j'aimerais supprimer certaines lignes. La ligne doit être supprimée si les cellules des colonnes M, N et O sont vides, alors j'ai tenté le code que voici :
Sub Delete()
Dim i As Integer
With ThisWorkbook.Sheets("D221_hors_zone")
For i = .Range("M" & "N" & "O" & .Rows.Count).End(xlUp).Row To 2 Step -1
If .Range("M" & "N" & "O" & i).Value = "" Then
Rows(i).Delete
End If
Next i
End With
MsgBox ("task complete!!!")
End Sub
Mais il ne fonctionne pas, quelqu'un saurait-il me dire ce qui bloque ?
Je vous remercie par avance.