XL 2010 comment puis-je configurer les trois champs à condition du comboBox1

[kahlouch]

bonjour
s'il vous plait

comment puis-je configurer les trois champs ( Corp, Catégorie, Indice)
lorsque je sélectionnez la fonction .... dans le ComboBox1
- le tableau de données dans la Feuil…. (Données)

 

[JBARBE]

Bonjour à tous,
La seule solution est d'attribuer des combo aux 3 champs !
En effet, Les données dans le ComboBox1 par rapport aux 3 TextBox sont trop ambigus pour être pris en compte !
Bonne journée !

 

[kahlouch]

Bonjour à tous,
La seule solution est d'attribuer des combo aux 3 champs !
En effet, Les données dans le ComboBox1 par rapport aux 3 TextBox sont trop ambigus pour être pris en compte !
Bonne journée !

bonjour
merci pour votre aide, mais
je veux afficher automatiquement
j'ai une formule, mais je ne peux pas le mettre correctement

 

[JM27]

Bonjour
si j'ai bien compris
en insérant cette procédure dans le module de l'usf

Private Sub ComboBox1_Change()
     With Sheets("données")
          Me.TextBox26 = .Cells(Me.ComboBox1.ListIndex + 2, 2)
          Me.TextBox5 = .Cells(Me.ComboBox1.ListIndex + 2, 3)
          Me.TextBox6 = .Cells(Me.ComboBox1.ListIndex + 2, 4)
     End With
End Sub

et en supprimant
dans
Private Sub UserForm_Initialize()
les lignes
'TextBox26.Text = Cells(2, 42)
'TextBox5.Text = Cells(2, 39)
'TextBox6.Text = Cells(2, 41)

et idem dans
Private Function My_text()

 

[kahlouch]

Bonjour
si j'ai bien compris
en insérant cette procédure dans le module de l'usf

Private Sub ComboBox1_Change()
     With Sheets("données")
          Me.TextBox26 = .Cells(Me.ComboBox1.ListIndex + 2, 2)
          Me.TextBox5 = .Cells(Me.ComboBox1.ListIndex + 2, 3)
          Me.TextBox6 = .Cells(Me.ComboBox1.ListIndex + 2, 4)
     End With
End Sub

et en supprimant
dans
Private Sub UserForm_Initialize()
les lignes
'TextBox26.Text = Cells(2, 42)
'TextBox5.Text = Cells(2, 39)
'TextBox6.Text = Cells(2, 41)

et idem dans
Private Function My_text()

bonjour
merci pour ton aide
beau travail