Twitter iPhone pliant OnePlus 11 PS5 Disney+ Orange Livebox Windows 11

Select case

4 réponses
Avatar
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."

4 réponses

Avatar
MichD
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!!! ;-))
Avatar
Jacquouille
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!!! ;-))
Avatar
MichD
Ceci
Select Clng(Case C.Value)
devrait plutôt s'écrire :

Select Case Clng(C.Value)
Avatar
Jacquouille
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)