Salut David, Salur le forum
le code suivant devrais te convenir car il efface à partir de la ligne 11 toutes les lignes dont la colonne C est vide.
Attention c'est sans retour possible! Fais une copie de ton fichier avant de lancer la macro au cas où elle ne correspondrait pas à ce que tu veux.
le code :
Public Sub effac11()
Dim plage As String
plage = Range("A11:A" & Range("A65536").End(xlUp).Row).Address
For Each cel In Range(plage).Offset(0, 2)
If cel.Value = "" Then
cel.EntireRow.Delete
End If
Next cel
End Sub
À plus,
Robert