Supprimer une ligne selon valeur combobox

[dar0609]

Bonjour à tous,

J'ai un pb que je n'arrive à solutionner depuis hier, alors je vous demande de l'aide. En effet depuis hier j'essaye de supprimer une ligne d'un onglet selon la valeur d'un combobox de mon userform mais ça marche pas, et je ne vois vraiment pas pourquoi. Ci-dessous le bout de code qui pose problème et je vous joins également le fichier, merci d'avance.

Dim l As Integer

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

 

[Pierrot93]

Re : Supprimer une ligne selon valeur combobox

Bonjour,

modifie peut déjà ceci :

For l = Sheets("EnCours").Range("A:A").End(xlUp).Row To 2 Step -1

par :

For l = Sheets("EnCours").Range("A65536").End(xlUp).Row To 2 Step -1

bon après midi
@+

 

[dar0609]

Re : Supprimer une ligne selon valeur combobox

Super Pierrot ça marche!!!
Dis moi pourquoi cela ne marchait pas avec "A:A"? L'écriture n'est pas correcte ou cela signifie-t-il autre chose?

 

[Pierrot93]

Re : Supprimer une ligne selon valeur combobox

Re,

Sheets("EnCours").Range("A:A").End(xlUp).Row

cette instruction renvoie 1...

 

[dar0609]

Re : Supprimer une ligne selon valeur combobox

ok merci jl'utilise jms mais j'avais vu ça qqpart jpensais ke ça marchait ossi. Merci encore bonne journée