pb de menu déroulant dans Excel

pb de menu déroulant dans Excel - VB/VBA/VBS - Programmation

Marsh Posté le 16-09-2004 à 10:17:34    

Bonjour,  
 
Je débute en VBA/ Excel et depuis hier je bute sur un truc qui je suis sure est simple mais que je n'arrive pas surmonter...
 
J'ai fais une mini base Excel en feuill3 qui a cette tete la:
 
Nom      code adherent Numéro adhérent
-------|--------------|---------------
dupont   04510          12345678910
durant   02500          10987654321
 
Mon problème est de récupérer ces valeurs dans une autre feuille.
 
J'ai mis un menu déroulant grace à la barre d'outil formulaire, je lui ai affecté la zone de valeurs correpondant aux noms. Le but est de récupéré les valeurs d'une ligne en fonction du nom choisi dans le menu déroulant.
 
Par exemple si je selectionne "dupont" dans on menu déroulant, je voudrai récupérer les valeurs "04510" et "12345678910" dans d'autre cellules.
 
Je n'arrive pas à definir mon menu déroulant en VBA, ni a lui demander ce que je veux faire...
 
Quelqu'un peut m'aider SVP?
 
Merci Bcp

Reply

Marsh Posté le 16-09-2004 à 10:17:34   

Reply

Marsh Posté le 16-09-2004 à 11:40:33    

Hello,
 
Il y a peut-être plus simple en utilisant un contrôle (liste déroulante) issu du menu <Outil> <Validation...> choisir pour l'autorisation "liste" et spécifier ta colonne contenant les noms.
Dans les cellules où tu veux récupérer les autres valeurs, utilise la fonction RECHERCHEH (cf aide d'Excel)
 
et voilà
 
@+

Reply

Marsh Posté le 16-09-2004 à 11:56:48    

Salut,
 
Avec une liste déroulante de la barre d'outils "Formulaire", tu n'as pas besoin de VBA.
 
Dans la liste, tu désignes une plage de noms (par exemple A2 jusqu'à A60 dans la feuille 3) et une cellule liée.
Cette cellule liée te donnera le numéro du nom sélectionné dans la plage.
Supposons que la cellule liée soit en A1 de la feuille 1, pour avoir le reste des infos, il suffit d'une formule INDEX, comme ceci :
en A5  
=INDEX(Feuil3!A2:A60;Feuil1!$A$1)
en B5
=INDEX(Feuil3!B2:B60;Feuil1!$A$1)
en C5
=INDEX(Feuil3!C2:C60;Feuil1!$A$1)
etc...
 
A+
Horry
 

Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed