Recopie de valeur d'une CBO dans une cellule

Fermé
DMT17570 Messages postés 47 Date d'inscription vendredi 19 octobre 2018 Statut Membre Dernière intervention 1 novembre 2021 - 2 déc. 2019 à 19:37
DMT17570 Messages postés 47 Date d'inscription vendredi 19 octobre 2018 Statut Membre Dernière intervention 1 novembre 2021 - 4 déc. 2019 à 11:50
Bonsoir à tous,

Je viens vers vous pour un petit problème que je n'arrive pas à résoudre, j'explique :
Dans un classeur, j'ai un onglet "Menu" avec plusieurs boutons.
J'ai un bouton "Extraction" qui m'ouvre une CBO (sur l'onglet "Menu") :

Dans cette CBO, je rentre un âge mini et un âge maxi (tirées de deux listes) que je voudrais (ces deux valeurs) placer dans une autre feuille "Données" dans les cellules correspondantes ; L7 et M7 respectivement.
Ces valeurs servent ensuite à l'extraction des tranches d'âges correspondant aux données rentrées dans une autre feuille, mais ça, je sais m'en débrouiller.

Merci de vos suggestions VBA.

Bonne soirée à tous, DMT





Configuration: Windows / Chrome 78.0.3904.108

5 réponses

cs_Le Pivert Messages postés 7903 Date d'inscription jeudi 13 septembre 2007 Statut Contributeur Dernière intervention 11 mars 2024 728
2 déc. 2019 à 19:48
Bonjour,

voir récupérer la valeur de l'item sélectionné

https://silkyroad.developpez.com/VBA/ControlesUserForm/#LII-F

ensuite pour :

placer dans une autre feuille "Données" dans les cellules correspondantes ; L7 et M7

Sheets("Données").Range("L7").Value = valeur de l'item sélectionné



Voilà
0
DMT17570 Messages postés 47 Date d'inscription vendredi 19 octobre 2018 Statut Membre Dernière intervention 1 novembre 2021 2
2 déc. 2019 à 20:10
Bonsoir Le Pivert,

Merci de ta réponse, mais j'ai du mal avec le lien, je ne comprends pas très bien la manip ...

Pardon, je ne suis pas un pro du VBA et j'ai encore beaucoup à apprendre ...

Les données sont rentrées avec les deux listes (OK), ce que je n'arrive pas à faire, c'est d'affecter les données sélectionnées dans les deux cellules L7 et M7. Il y a un truc qui m'échappe ...
0
cs_Le Pivert Messages postés 7903 Date d'inscription jeudi 13 septembre 2007 Statut Contributeur Dernière intervention 11 mars 2024 728
3 déc. 2019 à 07:52
j'ai du mal avec le lien, je ne comprends pas très bien la manip .

Dans le lien il y a cette rubrique dans laquelle tu as ta réponse à:

affecter les données sélectionnées

Récupérer le contenu de l'item sélectionné.
La procédure renvoie une chaîne vide si rien n'est affiché dans le ComboBox


@+
0
cs_Le Pivert Messages postés 7903 Date d'inscription jeudi 13 septembre 2007 Statut Contributeur Dernière intervention 11 mars 2024 728
3 déc. 2019 à 10:52
Je ne comprends pas que tu ais des difficultés sur ce point.

Je t'ai répondu sur ce post il y a quelques temps et tu semblais maîtriser vba

https://forums.commentcamarche.net/forum/affich-36262356-copier-coller-avec-une-combobox

@+
0
DMT17570 Messages postés 47 Date d'inscription vendredi 19 octobre 2018 Statut Membre Dernière intervention 1 novembre 2021 2
3 déc. 2019 à 18:33
Bonsoir Le Pivert,

Pardon, je rentre de réunion (depuis ce matin, dur dur)
C'est vrai que j'avais un peu le même pb, mais le temps est passé dessus et je mélange tout en ce moment, coup de fatigue sans doute.
Pourtant simple, copier deux valeurs du CBO et les placer dans deux cases d'une autre feuille ...
Ben non, je n'y arrive plus. Pas moyen d'écrire une ligne de code en ce moment je suis bloqué. Pour ça que j'appelle à l'aide.
Je reprendrai plus tard, tant pis.
Merci de ta patience.
Bonne soirée à toi.
DMT.
0
cs_Le Pivert Messages postés 7903 Date d'inscription jeudi 13 septembre 2007 Statut Contributeur Dernière intervention 11 mars 2024 728
3 déc. 2019 à 18:48
Comme ceci:

Sheets("Données").Range("L7").Value = ComboBox1.Value  'adapter nom ComboBox


@+ Le Pivert
0
DMT17570 Messages postés 47 Date d'inscription vendredi 19 octobre 2018 Statut Membre Dernière intervention 1 novembre 2021 2
3 déc. 2019 à 20:35
Bonsoir et merci ami,

Je teste demain et je te dis ce qu'il en est, ce soir, dodo, je suis crevé.

Merci à toi de m'aider.

A demain, DMT.
0

Vous n’avez pas trouvé la réponse que vous recherchez ?

Posez votre question
DMT17570 Messages postés 47 Date d'inscription vendredi 19 octobre 2018 Statut Membre Dernière intervention 1 novembre 2021 2
4 déc. 2019 à 11:50
Bonjour Le Pivert,

Après une bonne nuitée de repos, reprise dans la matinée ... Ben, ça tourne parfaitement !

Sans s’énerver et en comprenant ce que l'on écrit, les problèmes sont bien moins nombreux ...

Je te remercie infiniment de ta patience à mon égard. Très bonne journée à toi, et à plus pour une autre question peut-être.

DMT
0