Cellule avec liste déroulante

[mike13]

Bonjour le Forum,

Je sais créer une cellule avec liste déroulante mais ce que je cherche c'est créer une cellule qui a l'apparence d'une cellule normale mais dès qu'on y entre devient une cellule déroulante (avec la flèche à l'extérieur droit de la cellule)

Je pense que c'est pas compliqué mais je n'y suis pas arrivé.

Merci de votre aide.

Mike13

 

[ILoveZadig]

Re : Cellule avec liste déroulante

Bonjour mike13,

Tu parles bien de la liste déroulante en passant par le Menu Données => Validation puis Autoriser Liste?

Car pour moi, la liste n'apparait qu'à partir du moment où tu cliques dessus.

 

[mike13]

Re : Cellule avec liste déroulante

Bonjour,

Il s'agit bien d'une cellule normale qui change dès qu'on rentre dedans.
Il y a souvent que deux choix dans la liste proposée.

Mike13

 

[mike13]

Re : Cellule avec liste déroulante

Bonjour le Forum !!

Qui peut m'aider ?

Merci

Mike13

 

[mromain]

Re : Cellule avec liste déroulante

bonjour le fil,

mike13, que veux-tu exactement ?
si j'ai bien compris, tu veux que la liste déroulante apparaisse quand tu sélectionne la cellule.
si c'est bien ça, regarde le fichier joint.

a+

 

[mike13]

Re : Cellule avec liste déroulante

Bonjour MRomain,

C'est exactement çà mais je ne sais pas comment tu as fait.

Peux-tu me l'expliquer, je suis un gros naze.

Merci par avance.

Mike13

 

[mromain]

Re : Cellule avec liste déroulante

re,

j'ai rajouté un code VBA sur la feuille.
tu fais un clic droit sur l'onglet, puis tu sélectionnes "Visualiser le code", et là tu verras la macro.

ce que fait la macro :
si on est en cellule A1, elle simule "Alt + {flèche du bas}".

bonne chance...

a+

 

[mike13]

Re : Cellule avec liste déroulante

Merci MRomain,

J'abuse encore, je ne sais pas du tout comment tu as pu faire et surtout comment et où tu as pu écrire "tata", "toto", etc...

Tu peux me l'expliquer STP ?

Merci par avance

Mike13

 

[mth]

Re : Cellule avec liste déroulante

Bonsoir Mike,

Je me permets de répondre car mromain ne semble pas connecté,

Comme te l'indiquait ILoveZadig, en te positionnant sur ta cellule A1, tu cliques sur le menu Données/Validation.

Là tu vois la fenêtre qui s'affiche, "Liste" est sélectionné, et dans "source" tu vois: "toto";"titi";"tata"

Bonne soirée,

mth

 

[mike13]

Re : Cellule avec liste déroulante

Merci le Forum et en particulier MTH, MROMAIN et ILOVEZADIG,

Je confirme, je suis un gros nul mais vous m'avez sorti une épine du pied avec vos réponses pertinentes que j'ai mis un peu de temps à assimiler.

Vous êtes les plus forts.

GROS merci encore

Mike13

 

[msingle]

Re : Cellule avec liste déroulante

@mromain
Bonjour,

Comment adapter le code pour qu'il s'applique à une zone (par exemple a7:a15 et c7:c15) au lieu d'une cellule?

msingle

 

[mromain]

Re : Cellule avec liste déroulante

Bonjour msingle,

Voici le code adapté :

[COLOR=BLUE]Private Sub[/COLOR] Worksheet_SelectionChange([COLOR=BLUE]ByVal[/COLOR] Target [COLOR=BLUE]As[/COLOR] Range)
    [COLOR=BLUE]If Not[/COLOR] Application.Intersect(Range("[COLOR=Red]A7:A15[/COLOR],[COLOR=Red]C7:C15[/COLOR]"), Target) [COLOR=BLUE]Is Nothing Then[/COLOR] SendKeys ("%{down}")
[COLOR=BLUE]End Sub[/COLOR]

a+

 

[msingle]

Re : Cellule avec liste déroulante

Merci beaucoup mromain.

Pour le code, et la rapidité de la réponse!

A+