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

[kevindu63]

Bonjour,

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

sur la ligne

 .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.

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]

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

 

[vgendron]

j'avais pas percuté que les deux combo étaient liés

voir PJ
si tu selectionnes la Ref, le nom est automatiquement sélectionné dans l'autre combo.. et vice versa

 

[kevindu63]

j'avais pas percuté que les deux combo étaient liés

voir PJ
si tu selectionnes la Ref, le nom est automatiquement sélectionné dans l'autre combo.. et vice versa

A super vraiment merci beaucoup je ne m'en serais pas sorti tous seul en plus tu va trop vite milles merci