Discussion :

[Raf38690]

Bonjour,

J'ai besoin de supprimer une ligne dans une zone de liste.

J'ai donc comme code :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
 
 Me.lbxfonction.RowSourceType = "Liste Valeurs"
 Me.lbxfonction.RemoveItem (Me.lbxfonction.Column(0, i))

mais j'ai cette erreur qui apparait.

Erreur d'exécution '5' :
Argument ou appel de procédure incorrect

J'ai aussi essayer ce code :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
 
 Me.lbxfonction.RowSourceType = "Liste Valeurs"
 Me.lbxfonction.RemoveItem (i)

et j'ai aussi une erreur

Erreur d'exécution '6013' :
Impossible de supprimer cet element : "1" introuvable dans la liste

Quelqu'un aurait t'il une idée ?

Cordialement

Raf38690

[asteroide26]

Avec ton code

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
 Me.lbxfonction.RowSourceType = "Liste Valeurs"
 Me.lbxfonction.RemoveItem (i)

ré-essaye en enlevant les parenthèses autour de ton i
parce que dans ton message, il t'indique que la valeur qu'il prend est un String donc il cherche le texte "1" parmis les valeurs de ta liste (tu peux voir ça par les " " )

Cdt,
Asteroide

[Jeannot45]

Pour compléter le message d'asteroide26, tu peux convertir ton index en numérique par la fonction CInt(). Ta syntaxe devient alors :

Code VBA :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
 Me.lbxfonction.RowSourceType = "Liste Valeurs"
 Me.lbxfonction.RemoveItem (CInt(i))