Supprimer la ligne si les celules de colonnes

Résolu
katia -  
 katia -
Bonjour,

Pourriez-vous m'aider résoudre mon problème?

Il faut que ma macro supprime toute les lignes si les cellules des colonnes G et H sont vides.

Merci pour votre soutient


4 réponses

Mike-31 Messages postés 18407 Date d'inscription   Statut Contributeur Dernière intervention   5 135
 
Re,

Essaye avec ça

Sub sup_lig()
Dim DLig As Long, Lig As Long
With Sheets("Feuil1")
DLig = .Range("G" & Rows.Count).End(xlUp).Row
For Lig = DLig To 6 Step -1
If Application.WorksheetFunction.Sum(.Range("G" & Lig & ":H" & Lig)) = 0 Then
Range("G" & Lig).EntireRow.Delete
End If
Next Lig
End With
End Sub
1
Mike-31 Messages postés 18407 Date d'inscription   Statut Contributeur Dernière intervention   5 135
 
Salut,

il faut que les cellules G et H soient vides sur la même ligne pour supprimer la ligne ou tu veux supprimer les lignes si les cellule en G sont vides et supprimer les lignes des cellules en H vides
0
katia
 
Je veux supprimer la ligne si les cellules G et H de cette lignes sont vides.
0
katia
 
Mike,
C'est parfait!
Merci beaucoup pour ce code!
0