recherche d'une valeur suite à un choix dans combobox

  • Initiateur de la discussion Initiateur de la discussion DURY
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

DURY

XLDnaute Nouveau
bonjour,

dans le fichier joins je viens choisir mon client puis mon produit au travers de combobox, je souhaiterais que les valeurs salon, gamme, famille techno et N° d'outillage s'affiche dans les textbox en dessous mais je n'y arrive point.
merci pour votre aide.
 

Pièces jointes

Bonjour,
j'apporte quelques précision à la question:
Dans un premier je renseigne mon combobox choix CLIENT en analysant la liste:
Code :
Code:
Private Sub UserForm_Initialize()
  TextBox1.Value = Date
  Set MonDico = CreateObject("Scripting.Dictionary")
  temp = [CLIENT]
  For i = 1 To UBound(temp, 1)
  If Not MonDico.Exists(temp(i, 1)) Then MonDico.Add temp(i, 1), temp(i, 1)
  Next i
  Me.List_CLIENT.List = MonDico.items
End Sub


Par la suite,
je générè la liste du combobox choix PRODUIT :

Code:
Private Sub List_CLIENT_Change()
  d = Application.Match(Me.List_CLIENT, [CLIENT], 0)
  Me.PRODUIT.Clear
  For i = d To d + Application.CountIf([CLIENT], Me.List_CLIENT) - 1
    Me.PRODUIT.AddItem Range("Produit")(i)
  Next i
End Sub

Ensuite je veux renseigner dans le textbox SALON au changement de PRODUIT la valeur issue de la ligne PRODUIT colonne SALON de la feuille "CLIENT-PRODUIT"

Code :
Code:
Private Sub PRODUIT_Change()
Dim S As String
Dim Q As Range
S = Me.PRODUIT.Value
???
End Sub
et c'est là que je coince...
Merci pour votre aide
 
Bonsoir DURY, le forum,
Je n’ai pas très bien suivi ta méthode de programmation. Tu trouveras ci-joint une solution à finaliser pour tes besoins.
Pour les Combobox liées, tu peux également suivre les excellents conseils de Dranreb (Tu cliques sur Rechercher / Plus. Dans Mots-Clés, tu inscris « combobox liées ». Et enfin tu cliques sur Forum Excel / Rechercher).
Cordialement,
Bernard
 

Pièces jointes

- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

Réponses
47
Affichages
4 K
Retour