Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

UF - Récupérer la valeur d'un combobox

Créer une discussion

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 !

S'inscrire
L

La braise

XLDnaute Occasionnel
Bonjour à Tous,

J'ai un UF avec plusieurs Combobox.

Ce que je souhaite :
- lors que l'on modifie un combobox (celui avec un nom), récupérer la valeur du combobox pour effectuer des Vlookup (dans un onglet du fichier) permettant de rapatrier différentes infos et les afficher dans le UF.

J'ai essayé en utilisant l'option : Private Sub ComboBox1_Change()
où j'ai indiqué :
Nom = UF_02.ComboBox1.Text
Puis
Unload me pour fermer l'UF
et
macro_2 pour aller effectuer les vlookup dans un Sub

La macro_2 est censée :
effectuer les Vlookup,
affecter les résultats à des variables publiques,
relancer le même UF mais cette fois en ajoutant les infos rappatriées.

Mon code Macro_2 :
Sheets("SoldeNom").Select
Set BaseB = Range("A3:B" & ActiveSheet.UsedRange.Rows.Count)
Solde = Application.WorksheetFunction.VLookup(Nom, BaseB, 2, 0)
Uf_02.show

(dans l'UF j'ai un code Private Sub UserForm_Initialize qui charge les variables publiques)

Mais voilà... ça ne marche pas... 😡

je pense avoir identifié un premier pbm via un "msgbox Nom" dans la macro_2 qui est vide.
Conclusion : le code dans Private Sub ComboBox1_Change() ne fonctionne pas pusiqu'il ne me rapatrie pas la valeur modifié du combobox.

Est-ce possible de récupérer ce type d'info (la valeur "changée" suite modif. utilisateur dans combobox) d'un UF?
et comment? 😀

Est-ce possible d'écrire le calcul vlookup comme je l'ai fait c'est à dire :
Solde = Application.WorksheetFunction.VLookup(Nom, BaseB, 2, 0) ?

Je sais que j'aurais pu tout faire dans l'UF mais cela me semble plus compliqué.

Merci d'avance pour votre aide.

😀😀😀
 
Dernière édition:
Trier par date Trier par votes
Re : UF - Récupérer la valeur d'un combobox

Bonsoir La braise,

Difficile, sans fichier, de t'aiguiller ... Je dirais bien que ta variable "Nom" n'est peut-être pas reconnue, mais il y tant d'explications possibles et imaginables, qu'on risque de procéder par essais/erreurs ... pendant longtemps!
Avec un extrait de ton fichier, on devrait y voir plus clair (et tant pis si tu penses que ce n'est pas un chef d'oeuvre, au stade actuel ... 😛)
 
Vote positif 0 Vote négatif
Re : UF - Récupérer la valeur d'un combobox

bonsoir,
Sans fichier...
Pourquoi ne pas utiliser la méthode Find
Outre qu'elles doivent être Public, les variables doivent être déclarées dans un modules standard pour être recuperables dans n'importe quel module
A+
kjin
 
Vote positif 0 Vote négatif
Re : UF - Récupérer la valeur d'un combobox

Re-,

Je joins un fichier exemple (simple) de mon pbm.

Ici le vlookup fonctionne bien (??? mais soit !) mais maintenant c'est la valeur initiale du nom qui n'apparait plus...

Ex. Lancer la macro Test, sélectionner un nom dans la liste, l'UF s'affiche bien avec la valeur "VLookup-ée" mais c'est le nom qui n'apparait plus... 🙁


Si quelqu'un a la solution pour actualiser le champ info1 directement dans l'UF, je suis ultra preneur.

D'avance merci pour votre aide.

😀
 

Pièces jointes

Dernière édition:
Vote positif 0 Vote négatif
Re : UF - Récupérer la valeur d'un combobox

re-bonsoir,

dans ton exemple, je ne comprends pas pourquoi tu "décharges" ton Usf, après avoir sélectionné un élément dans ta liste: en effet, quand tu le ré-affiches juste après, tu repasses par le
Code: 
Userform_Initialize()
qui regarnit la liste comme la première fois.
La piste de kjin à propos de l'utilisation de Find est sans doute la plus judicieuse et serait à mettre en oeuvre dans ton
Code: 
Private Sub ComboBox1_Change()
 
Vote positif 0 Vote négatif
Re : UF - Récupérer la valeur d'un combobox

re-,

kjin, merci beaucoup pour ton fichier c'est exactement ce que je cherchais.

J'aurais plusieurs questions :

- Pourquoi mettre le caption du label13(destination) à "" au début?

- Pourquoi mettre un exit sub? Au cas où l'utilisateur consulte la liste et ne sélectionne rien?

- Pourquoi ajouter un Cstr ?

En réalité, mon fichier est plus complexe que le fichier exemple.
La recherche s'effectue sur un Tableau croisé dynamique issu de la base.

Il suffit - je pense - que je définisse les valeurs du combobox non pas dans base mais sur le Tableau croisé dynamique (et du coup me simplifier le pbm du tri des valeurs 😉) et éviter la recherchev.

Merci pour ta réponse.
et encore merci pour ton aide! 😀
 
Vote positif 0 Vote négatif
Re : UF - Récupérer la valeur d'un combobox

re-,

La solution d'utiliser le n° de l'index de la valeur du combobox est parfaite si la base est figée.

Malheureusement, l'exemple est volontairement simpliste.

Dans la réalité ma base sert à créer des tableaux croisés dynamiques sur lesquels je fais les rechercheV.

Évidement (...) des noms présents dans la liste globale ne sont pas forcement présents dans les différents tableaux croisés dynamiques, donc j'ai besoin d'utiliser les recherchev et la fonction : si la recherche ne donne rien afficher ceci.

Dans l'idée :
Si(recherchev(Nom, Base, 1,0)=Nom,recherchev(Nom, Base, 2,0),non)

Est-ce possible?

D'avance merci pour votre aide.

😀
 
Vote positif 0 Vote négatif
Re : UF - Récupérer la valeur d'un combobox

re-, Kjin,

Je te rassure, aucun reproche sur ton fichier 😀 Bien au contraire!
La technique me plait beaucoup et je l'ai mis en pratique.

Il se trouve que l'exemple que j'avais envoyé est trop simpliste par rapport à mon problème.

Ci-joint un nouveau fichier plus cohérent avec mon besoin.

Par rapport au 1er fichier j'ai ajouté un onglet 'données' qui concerne certains clients mais pas tous :
- d'où l'impossibilité de faire pointer la liste du combobox dessus (car tous les clients ne sont pas dedans)

J'ai ajouté un onglet 'Feuil2' qui contient le Tableau croisé dont la base est l'onglet 'données'.

Ce dont j'ai besoin :
- la liste du combobox pointe sur tous les clients de l'onglet 'Clients'
= cela fonctionne déjà parfaitement

- afficher dans l'UF le résultat du calcul :
BAse = plage du TCD sur l'onglet 'Feuil2'
Si(recherchev(Nom, Base, 1,0)=Nom,recherchev(Nom, Base, 2,0),"Absent")
= si le Nom est bien dans le TCD, afficher la valeur de la 2ème colonne sinon afficher "Absent".

J'espère avoir été plus clair.

D'avance merci à tous pour votre aide.

😀
 

Pièces jointes

Dernière édition:
Vote positif 0 Vote négatif
Re : UF - Récupérer la valeur d'un combobox

Bonjour le fil, bonjour le forum,

J'ai rapidement parcouru ce fil sans prendre le temps de tout lire et donc je risque de dire des bêtises. Comme ce ne sera ni la première ni la dernière fois je ne m'affole pas...

Quand je rencontre ce genre de problème, d'alimenter une Combobox et que je veux par la suite retrouver la donnée dans le tableau, j'utilise l'astuce suivante. J'attribue à la Combobox 2 colonnes (0 et 1) avec la propriété ColumnCount = 2. Je masque la seconde colonne avec la propriété ColumnWitdhs = ;0pt. Et j'alimente ensuite la ComboBox avec la donnée dans la colonne 0 et je récupère le numéro de ligne dans la colonne 1 (masquée). Ensuite, si je sélectionne une donnée dans cette ComboBox, je peux rapidement la localiser (sans faire de recherche) dans le tableau en récupérant le numéro de ligne de la donnée placé dans la seconde colonne de la ComboBox.

J'espère que c'est suffisamment clair et pas trop hors sujet... Un exemple aurait été plus parlant et si, La Braise, cette idée t'intéresse et peut convenir à ton problème, je te ferai.
 
Vote positif 0 Vote négatif
Re : UF - Récupérer la valeur d'un combobox

Re- le Fil, Robert,

Robert,
Ta solution est très intéressante et je te redemanderai le moment venu l'exemple si gentiment proposé mais je pense que dans le cas présent cela ne fonctionnera pas car :

L'onglet qui sert à définir la liste du combobox n'est pas le même où je veux faire la recherche.

Re-explication (+ clair j'espère... j'ai un peu de mal!)

- j'ai un onglet avec bcp de client (onglet qui sert à définir la liste du combobox)

- j'ai un autre onglet où pour certains clients (issu du 1er onglet) j'ai des donnés, du CA admettons. Certains clients existent sur le 1er onglet mais pas sur le 2ème.
A partir de ce 2ème onglet j'alimente un Tableau croisé dynamique qui me totalise le CA par client.

Ce que je veux c'est que :
quand je sélectionne dans l'UF un client existant dans le 1er onglet,
récupérer via un Vlookup dans le Tableau croisé dynamique (des clients ayant un CA) le CA de ce client et l'afficher dans un label.
(si pas de CA j'afficherais 0 ou "pas de CA").

J'espère avoir été plus clair.
😀

PS : le fichier de mon post de 12h40 illustre ce besoin.

D'avance merci à tous pour votre aide.
 
Vote positif 0 Vote négatif
Identifiez-vous ou inscrivez-vous pour participer.
Rejoins nos membres "Supporter XLD" et booste ton expérience Excel !
- 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

  • Question Question
Microsoft 365 Récupérer la liste d'un field d'une feuille dans combobox
Réponses
5
Affichages
146
xhudi69
F
  • Question Question
Microsoft 365 Récupérer l'userform parent d'un controle
2
Réponses
27
Affichages
839
Dranreb
H
  • Résolu(e)
XL 2021 Rétablir la valeur initiale d'une combobox
Réponses
7
Affichages
153
hyule
H
J
  • Question Question
XL 2021 activesheet.shapes suivant la valeur d'une cellule
Réponses
5
Affichages
142
JUAN45
J
A
  • Question Question
XL 2010 Filtrer un Combobox en VBA excel
2 3
Réponses
43
Affichages
946
Dranreb
D
  • Résolu(e)
Microsoft 365 Récupérer la valeur d'une cellule d'un autre fichier
Réponses
7
Affichages
329
Diane272727
D
  • Question Question
Microsoft 365 Récupérer le nom du combobox dès qu'il change de valeur
Réponses
2
Affichages
549
mromain
N
  • Résolu(e)
Microsoft 365 Remplir une ComboBox à 3 colonnes avec les données d'un TS
4 5 6
Réponses
78
Affichages
2 K
Dudu2
T
  • Résolu(e)
XL 2021 Incompatibilité de type avec un userform
2
Réponses
19
Affichages
932
Bernard38
  • Question Question
XL 2016 Aide pour userform (sujet clos)
Réponses
8
Affichages
556
tactic6
A
  • Question Question
XL 2021 Alimenter un second combobox et textbox après la selection d'un premier combobox
Réponses
1
Affichages
449
Oneida
S
  • Question Question
XL 2013 recherche intuitif semi automatique dans Combobox (trié et avec valeur unique) inseré en UserForm VBA
2
Réponses
18
Affichages
1 K
Sghaier Chafaa
S
  • Résolu(e)
XL 2013 probleme combobox listindex -1 même avec une valeur
2
Réponses
17
Affichages
867
TooFatBoy
EXCEL :: TCD :: SEGMENTS :: Identifier l'élément sélectionné dans le segment :: Modifier dynamiquement la valeur d'un segment :: VBA
Réponses
1
Affichages
281
oguruma
B
  • Question Question
Microsoft 365 Alimenter combobox et ajouter la valeur si non inscrit dans la liste
Réponses
5
Affichages
679
sousou
A
  • Résolu(e)
XL 2016 Alimentation d'un fichier selon données sélectionnées via une ComboBox
Réponses
3
Affichages
601
Aldonanou
A
S
  • Question Question
XL 2016 afficher plusieurs résultats dans un combobox
Réponses
5
Affichages
649
submarine22
S
  • Question Question
Microsoft 365 Conserver la valeur de ma variable pour l'utiliser dans un autre code
Réponses
3
Affichages
412
mapomme
M
  • Question Question
XL 2019 Assigner une valeur dans une combobox à partir du caption d'un button command
Réponses
8
Affichages
692
mallow2000
M
J
  • Question Question
XL 2021 Récupérer les donner d'un feuille définie dans le dossier actif selon les trois premier lettre
2
Réponses
24
Affichages
999
juju91
J
Menu
Connexion
S'inscrire
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…