Suppression de lignes

dar0609

XLDnaute Nouveau
Bonsoir à tous,

J'essaye de supprimer une ligne selon une valeur enregistrée dans une combobox, cependant toute la macro fonctionne à part la suppression. Ci-dessous le bout de code me permettant de la supprimer qui ne fait rien. Quelqu'un aurait une idée?

Dim l As Integer
With Sheets("EnCours")

For l = Range("A:A").End(xlUp).Row To 2 Step -1
If Cells(l, 1).Value = "combobox2" Then
Rows(l).Delete
End If
Next
End With
 

Pierrot93

XLDnaute Barbatruc
Re : Suppression de lignes

Bonsoir,

si nom d'une combo, enlève les guillemets :
Code:
If Cells(l, 1).Value = combobox2 Then

peut être lieu de préciser le conteneur si code pas exécuter dans le même module :
Code:
If Cells(l, 1).Value = UserForm1.combobox2 Then
bonne soirée
@+

Edition : bonjour Eric:)
 

Discussions similaires

Statistiques des forums

Discussions
312 810
Messages
2 092 304
Membres
105 346
dernier inscrit
yanikala