Windows 7 - Choix

Asked By Jacquouille on 13-Aug-12 03:05 PM
Bonsoir
Je me souviens avoir lu ici une m?thode de choix tr?s ?l?gante et tr?s
pratique.
Elle rempla?ait une s?rie de SI ....
Exemple:
si c=1 ou si c = 2 ou si c = 3 ...
Tout cela ?tait remplac? (en VBA) par un truc du genre:
Le fameux mot est disparu de ma m?moire et je n'arrive plus ? lui mettre l
amain dessus.
Quelqu'un a-t-il connaissance de ce "truc" ?
Mille mercis et bonne soir?e
jacques.

Jacquouille




MichD replied to Jacquouille on 13-Aug-12 03:18 PM
Bonjour,

| si c=1 ou si c = 2 ou si c = 3 ...

Ce n'est pas trop sp?cifique comme exemple.

Il y a la fonction Choose() ou Choisir() dans la feuille de calcul.

Tu as un Select Case et tous les "cases" que tu peux imaginer...

Tu devrais essayer de donner un exemple plus concret!


MichD
---------------------------------------------------------------
Jacquouille replied to MichD on 13-Aug-12 03:43 PM
Re
Vu que c'est ancien et que j'ai oubli? ... je vais essayer d'?tre plus
pr?cis
Ton exemple "choisir()" permet ? Excel de choisir le xi?me dans une liste.
C'est pas cela.

Voici ce que je crois avoir retenu:
For each c in range ("a1:a100")
if [c]=1 or [c]=2 or [c] =3 then .....

Cela ?tait remplac? par quelque chose du genre:

qui ?tait une fa?on ?l?gante et rapide d'?num?rer tous les cas possibles
dans lesquels il fallait ex?cuter le then ((en l' occurrence, supprimer la
ligne compl?te o? [c] ?galait 1 ou 2 ou 3 .
Je ne puis t'en dire plus, si ce n'est que ce "truc-machin" ne semblait pas
connu du grand public, mais appr?ci? par tes confr?res MVP.
Merci pour la peine que tu te donnes pour moi.
Ce n'est pas non plus un Select case.

Jacquouille

k0bju3$213$1@speranza.aioe.org...

Bonjour,

| si c=1 ou si c = 2 ou si c = 3 ...

Ce n'est pas trop sp?cifique comme exemple.

Il y a la fonction Choose() ou Choisir() dans la feuille de calcul.

Tu as un Select Case et tous les "cases" que tu peux imaginer...

Tu devrais essayer de donner un exemple plus concret!


MichD
---------------------------------------------------------------
isabelle replied to Jacquouille on 13-Aug-12 09:32 PM
hello Jacquouille,

peut ?tre..

For Each c In Range("a1:a100")
If Not IsError(Application.Match([c], Array(1, 2, 3), 0)) Then test = 1
Nex

--
isabelle




Le 2012-08-13 15:43, Jacquouille a ?crit :
MichD replied to Jacquouille on 14-Aug-12 06:27 AM
Je ne sais pas vraiment ? quoi tu r?f?res (l'expression que tu recherches)


MichD
---------------------------------------------------------------
Jacquouille replied to MichD on 14-Aug-12 07:25 AM
D?sol? de ne pouvoir t'aider, Denis. Il se fait que j'ai oubli?, c' est
pourquoi je demandais de l'aide.
Mais il y a beaucoup plus grave que cela.  Nous dormirons quand m?me.
merci beaucoup.
Jacques.


Jacquouille

k0d966$el0$1@speranza.aioe.org...

Je ne sais pas vraiment ? quoi tu r?f?res (l'expression que tu recherches)


MichD
---------------------------------------------------------------
Jacquouille replied to isabelle on 14-Aug-12 07:28 AM
Salut Isa la belle
Cela ressemble assez fort ? mon souvenir.
Mais, il est prouv? scientifiquement que ceux-ci s'alt?rent au fil des
ans....
Je vais donc prendre pour vrai ce Match suivi de son Array  et foutre cela
dans mon agenda.
Je te fais la bise pour te dire merci (Ici, tu as un gros avantage sur
Denis...-))
Bonne semaine

Jacquouille

k0c9ra$g9a$2@speranza.aioe.org...

hello Jacquouille,

peut ?tre..

For Each c In Range("a1:a100")
If Not IsError(Application.Match([c], Array(1, 2, 3), 0)) Then test = 1
Nex

--
isabelle




Le 2012-08-13 15:43, Jacquouille a ?crit :
isabelle replied to Jacquouille on 14-Aug-12 08:00 AM
bise ? toi ?galement Jacquouille, mais tu devras en faire une aussi ? Denis

car sa proposition "choose" est de loin plus court ;-)

If Choose([c], 1, 2, 3) Then x = [c]

--
isabelle



Le 2012-08-14 07:28, Jacquouille a ?crit :
Jacquouille replied to isabelle on 14-Aug-12 12:11 PM
Je vais donc faire la bise aux Choose de Denis .....
avec un tr?s grand sourire....   -))

Jacquouille

k0delc$ora$1@speranza.aioe.org...

bise ? toi ?galement Jacquouille, mais tu devras en faire une aussi ? Denis

car sa proposition "choose" est de loin plus court ;-)

If Choose([c], 1, 2, 3) Then x = [c]

--
isabelle



Le 2012-08-14 07:28, Jacquouille a ?crit :