liste deroulante

[neo]

bonjour,

je souhaiterai creer une liste déroulante à l'aide d'une macro, mais je n'y parviens pas.

en gros, je fais:

Range('H12').Select
    With Selection.Validation
        .Delete
        .Add Type:=xlValidateList, AlertStyle:=xlValidAlertStop, Operator:= _
        xlBetween, Formula1:='Non traitée;En cours;Traitée'
        .IgnoreBlank = True
        .InCellDropdown = True
        .InputTitle = ''
        .ErrorTitle = ''
        .InputMessage = ''
        .ErrorMessage = ''
        .ShowInput = True
        .ShowError = True
    End With

et je voudrais en fait, dans ma liste avoir le choix entre NON traitée, En cours, traitée...mais ca ne marche pas.

Pourriez vous m'aider SVP.
Merci d'avance.

Neo

 

[thieeryr]

salut

et menu 'données' puis 'validation' ensuite dans autoriser choisir liste et ensuite definir les cellules 🙂

je sais je debute mais comme cela fonctionne tres bien 😉

 

[Robert]

Bonjour Neo, bonjour le forum,

Je pense que tu dois taper la liste des Mots que tu veux utiliser dans des cellules puis utiliser non pas Personnaliser mais Liste et sélectionner ensuite ces cellules. Si tu tapes les mots dans A1:A3 (Non traitées, En cours, Traitées), en VBA ça donne :

Sub Macro1()
Range('H1').Select
With Selection.Validation
.Delete
.Add Type:=xlValidateList, AlertStyle:=xlValidAlertStop, Operator:= _
xlBetween, Formula1:='=$A$1:$A$3'
.IgnoreBlank = True
.InCellDropdown = True
.InputTitle = ''
.ErrorTitle = ''
.InputMessage = ''
.ErrorMessage = ''
.ShowInput = True
.ShowError = True
End With
End Sub

Message édité par: Robert, à: 26/08/2005 16:06

 

[myDearFriend!]

Bonjour neo, thieeryr,

Autrement par VBA, tu peux peut-être essayer en remplaçant tes ';' (points virgules) par des ',' (virgules) dans Formula1:='Non traitée,En cours,Traitée'...

Cordialement,

EDITION
Oups, (re)salut Robert je ne t'ai pas vu arriver... et surtout pas reconnu avec ta petite voix fluette... LOL ! Bon week-end.

Message édité par: myDearFriend!, à: 26/08/2005 16:11

 

[thieeryr]

salut robert

dsl je suis un quiqui 😉

vous etes vraiment trop fort sur ce site !! 🙂

 

[thieeryr]

salut myDearFriend!


je ne t'avais pas vu !!

vous etes ingenieur ?? toi et robert ?

 

[Robert]

Bonjour le fil, bonjour le forum,

Thieeryr, désolé on s'est croisés... (t'as pas un nom plus simple toi ?)

Didier : 'C'est maintenant que tu le dis !!!!'

 

[thieeryr]

salut myDearFriend!


je ne t'avais pas vu !!

vous etes ingenieur ?? toi et robert ?

 

[thieeryr]

si thierry lol !! et je debute !! je croyais etre bon mais la vous me remettez a ma place (en bas lol!!)

 

[Robert]

Bonjour le fil, bonjour le forum,

On s'est recroisés décidément... Ingénieur ! T'es fou ou quoi... Respect mec... Moi je suis infographiste de profession et pochtron de vocation ou le contraire je sais plus... Didier il est alchimiste excellien fou mais sobre.

 

[myDearFriend!]

Salut thieeryr,

Disons que l'un des deux est 'ingénieux' et l'autre 'un gêneur'...🙂 🙂 🙂

Je plaisante bien entendu, d'autant que je n'ai pas dit qui est qui...en fait nous sommes tout simplement des passionnés.

A bientôt.

 

[Robert]

Bonjour le fil, bonjour le forum,

Même pas mal !!! Arf...

 

[thieeryr]

dsl neo on t'as un peu 'zapper' ton souci 🙁 mais bon 😉
avez vous vu mon dernier message et si oui pouvez-vous m'aider ?
merci et j'espere 'neo' que ton probleme est resolue 🙂
sur ce je vous quitte et a dans 2h30 environ lol!! (je part du taf)

 

[NEo]

Ok, ct ca, il fallait mettre des virgules

Merci beaucoup !!!