XL 2019 Erreur Impossible de définir la propriété list. Le type ne correspond pas

kevindu63

XLDnaute Nouveau
Bonjour,

J'ai une erreur que je n'arrive pas a trouver malgré toute les recherches,

sur la ligne

VB:
 .List(memoire, 0) = Me.ListBox1

message: Erreur d'exécution 2147352571 (80020005):
Impossible de définir la propriété list. Le type ne correspond pas.

VB:
Private Sub CommandButton1_Click()
If Me.Txt_nombre <> "" And Me.cbx_type.ListIndex >= 0 Then

    With Me.List_order
     .AddItem
         .List(memoire, 1) = Me.Cbx_article1
         '.List(memoire, 2) = Me.Txt_nombre
         '.List(memoire, 0) = Me.Cbx_test
         .List(memoire, 0) = Me.ListBox1
         .List(memoire, 2) = Me.ListBox2
 
 
  End With
 
 memoire = memoire + 1
 Me.Cbx_article1 = ""
  Me.Cbx_test = ""
  Me.Txt_nombre = ""
  Me.ListBox1 = ""
  Me.ListBox2 = ""

End If
End Sub



Je vous remercie d'avance
 

kevindu63

XLDnaute Nouveau
Voila ce que ça donne
Vraiment super ton travail !! tu est trop fort

Tu peux me dire comment on fait pour que quand une référence et rentrer dans la combobox sa m'ajoute automatiquement le nom de l'article dans list_order pour que quand on fait une recherche dans Mouvement de stock la recherche soit plus simple soit par le biais de la référence soit par le nom de l'article

merci d'avance

PS désolé par tous mes questions
 

Discussions similaires

Réponses
3
Affichages
728
Réponses
17
Affichages
1 K

Statistiques des forums

Discussions
311 707
Messages
2 081 734
Membres
101 809
dernier inscrit
HADER2024