Comment initialiser 2 combobox

Bonsoir à tous,

Sur mon fichier de stock, dans le UserForm "Articles", j'ai une combobox initialisée avec le code suivant :

Sub Init_Cbb()
Dim j As Long

  With Me.Cbb_article_lot  'Permet de sélectionner un n° de LOT qui correspond à un fournisseur
    .Clear
    For j = 2 To Ws_Fournisseurs.Range("A" & Rows.Count).End(xlUp).Row
      .AddItem Ws_Fournisseurs.Range("A" & j)
    Next j
  End With

End Sub

Je souhaiterai en initialiser une deuxième me permettant de sélectionner et d'ajouter un usage (Ménage, vestiaire, atelier,...)

mais je ne trouve pas comment faire.

Je pense qu'il faut au préalable désigner les 2 combobox dans Private Sub UserForm_Initialize() mais je n'ai rien trouvé.

Si quelqu'un pouvait m'expliquer, merci beaucoup.

Merci beaucoup pour votre aide.

Bonne soirée à tous.

Bonjour

Joins ton fichier et on pourra sûrement te proposer quelque chose .

Bye!

Bonsoir gmb,

voici le fichier, merci pour ton aide.

Je me suis trompé, la deuxième combobox que je souhaite initialiser est celle pour l'usage du produit.

Bonsoir à tous,

Je me suis un peu emmêlé les pinceaux hier.

Ma deuxième Combobox est bien initialisée, juste que je n'avais pas mis les bonnes références aux bonnes feuilles du fichier.

Je suis désolé d'avoir "polluer" le forum avec un problème qui n'en était pas un.

Bonne soirée à tous.