Alimenter des combobox par 2 ListBox

Bonjour, Voila mon problème, j'ai une ListBox renommé LtxboxArticle qui contiens mes articles haut à droite ,et LtxboxLibelle qui contiens mes libelles (Txt1 à Txt10) pour que lorsque je clic sur la LtxboxArticle qu' elle alimente le tableau (LIBELLES) en haut au milieu , avais vous une soluce. merci

capture d ecran 2021 09 15 114201
'Nbarticle  Cbarticle
Private Sub LtxboxArticle_Click()
  'Les variables
  Dim NumLigne As Integer
  Dim Nbligne As Integer

  'Affectation des variables
  NumLigne = Me.LtxboxArticle.ListIndex 'trouve le n° de ligne sélectionné
  Nbligne = Me.LtxboxArticle.ListCount  'trouve le Nb d'enregistrement dans la listbox (LtxboxArticle)

  Me.Nbarticle.Value = Nbligne

  Me.Cbarticle.Value = Me.LtxboxArticle.Column(0, NumLigne)

End Sub
'l'affichage des libelles   avec  Lb_Clic
'Nbarticle  Cbarticle
Private Sub LtxboxLibelle_Click()
  'Les variables
  Dim NumLigne As Integer
  Dim Nbligne As Integer

  'Affectation des variables
  NumLigne = Me.LtxboxLibelle.ListIndex 'trouve le n° de ligne sélectionné
  Nbligne = Me.LtxboxLibelle.ListCount  'trouve le Nb d'enregistrement dans la listbox (LtxboxArticle)

  Me.Nbarticle.Value = Nbligne

  Me.Txt1.Value = Me.LtxboxLibelle.Column(2, NumLigne)
  Me.Txt2.Value = Me.LtxboxLibelle.Column(3, NumLigne)
  Me.Txt3.Value = Me.LtxboxLibelle.Column(4, NumLigne)
  Me.Txt4.Value = Me.LtxboxLibelle.Column(5, NumLigne)
  Me.Txt5.Value = Me.LtxboxLibelle.Column(6, NumLigne)
  Me.Txt6.Value = Me.LtxboxLibelle.Column(7, NumLigne)
  Me.Txt7.Value = Me.LtxboxLibelle.Column(8, NumLigne)
  Me.Txt8.Value = Me.LtxboxLibelle.Column(9, NumLigne)
  Me.Txt9.Value = Me.LtxboxLibelle.Column(10, NumLigne)
  Me.Txt10.Value = Me.LtxboxLibelle.Column(11, NumLigne)

Bonjour,

a priori, si j'ai bien compris, c'est réalisable ...

Il faudrait certaines précisions, mais dans un premier temps il parait indispensable de pouvoir mener des tests sur le classeur.

A+

Merci je viens de changer de manip et cela marche mais il m'indique la ligne des titres de mon tableau j'ai bien mis la ligne que débute mes articles

ex :ligne 3 les titres, ligne 4 =mes articles j'ai mis la ligne 4 normal enfin je cherche le blem merci

Avec une telle description et sans classeur, il m'est impossible de vous aider....

Bonne suite

Rechercher des sujets similaires à "alimenter combobox listbox"