USERFORM : combobox + textbox

[ianis]

Bonjour à tous,

Je débute dans le VBA Excel et sollicite de votre aide pour effectuer la chose suivante dans un userform :

Lorsque je sélectionne un article à l'aide de la combobox, je souhaiterais faire apparaître dans chaque textbox son prix unitaire, son Prix unitaire en euros H.T après négociation, le Gain unitaire en euros H.T et le Nbre d'unités achetées annuellement. Idem pour les autres articles sélectionnés.
Ci-joint, fichier.

Cordialement.

 

[Dranreb]

Bonsoir.

Private Sub Cboarticle_Change()
Dim TDon()
If Cboarticle.MatchFound Then
   TDon = Feuil1.[C14:G14].Offset(Cboarticle.ListIndex).Value
   TextBox2.Text = TDon(1, 1)
   TextBox3.Text = TDon(1, 2)
'  etc.
   End If
End Sub

 

[ianis]

Bonjour Dranred,

Je vous en remercie infiniment.

Cordialment.

Ianis