Select case

Le
Jacquouille
Bonjour

Dans le cas où plusieurs "case"( 41282, 41568, 72000), qui auraient la
même finalité (C.Interior.ColorIndex = 38)
Select Case C.Value
Case 41282
C.Interior.ColorIndex = 38

Puis-je écrire Case 41282, 41568, 72000
C.Interior.ColorIndex = 38

Question idiote, puisque cela ne fonctionne pas.
Comment puis-je énumérer les cellules qui devraient valoir 41282, 41568,
72000 et se faire colorer en index 38?

Merci et bon WE

Jacquouille

" Le vin est au repas ce que le parfum est à la femme."
Vidéos High-Tech et Jeu Vidéo
Téléchargements
Vos réponses
Gagnez chaque mois un abonnement Premium avec GNT : Inscrivez-vous !
Trier par : date / pertinence
MichD
Le #25884582
Bonjour,

Eh, oui, cette syntaxe est bonne. Cependant, la cellule (C.value)
doit être numérique et non texte. Sinon tu peux ajouter cela.

Select Clng(Case C.Value)
Case 41282, 41568, 72000
C.Interior.ColorIndex = 38
End Select

Si cela ne fonctionne pas, utilise ta grosse voix! Sait-on jamais
l'intimidation pourrait fonctionner!!! ;-))
Jacquouille
Le #25884572
Fais-moi confiance, cette s**** va voir de quel bois je me chauffe. -)
Merci Denis.

Un très bon WE à toi.



Jacquouille

" Le vin est au repas ce que le parfum est à la femme."
"MichD" a écrit dans le message de groupe de discussion :
l924jg$ril$


Bonjour,

Eh, oui, cette syntaxe est bonne. Cependant, la cellule (C.value)
doit être numérique et non texte. Sinon tu peux ajouter cela.

Select Clng(Case C.Value)
Case 41282, 41568, 72000
C.Interior.ColorIndex = 38
End Select

Si cela ne fonctionne pas, utilise ta grosse voix! Sait-on jamais
l'intimidation pourrait fonctionner!!! ;-))
MichD
Le #25884602
Ceci
Select Clng(Case C.Value)
devrait plutôt s'écrire :

Select Case Clng(C.Value)
Jacquouille
Le #25884622
Hé hé,
Ton conseil était bon.... elle n'a pas osé dire non.
Tout baigne.
Grand merci



Jacquouille

" Le vin est au repas ce que le parfum est à la femme."
"MichD" a écrit dans le message de groupe de discussion :
l9262p$v3d$

Ceci
Select Clng(Case C.Value)
devrait plutôt s'écrire :

Select Case Clng(C.Value)
Publicité
Poster une réponse
Anonyme