Condition de select case

[ptitepo]

Bjr à tous,

J'ai un select case, pour chaque mois je fait une instruction.
Quant je lance le programme, il me met "erreur de compilation, incmpatiblilité de type".

Select Case Mois
Case obt_janvier.Value = 1

Mon "obt_janvier" correspond à une case à cocher, et "mois" c'est le nom de mon cadre qui encoure les cases à cocher. Je pense pas que ce soit ça qu'il faut mettre mais je sais pas quoi mettre d'autre !
Merci de votre.

 

[pierrejean]

Re : Condition de select case

bonjour ptitepo

Veux-tu etre assez aimable pour nous fabriquer un petit fichier avec les elements qui posent probleme ?
Cela nous eviterait
1) de le faire nous même
2) de nous poser des tas de questions comme:
Case a cocher dans quoi ?
qu'est-ce que le cadre ?
obt_janvier c'est un nom ? un caption ?

 

[tototiti2008]

Re : Condition de select case

Bonjour à tous,

ptitepo, un Select case sert à faire plein de tests, mais sur une seule variable.
Si tu commence par :
Select Case Mois 'alors tu dois continuer avec
Case "Janvier" 'qui veut dire si Mois="Janvier"

ou alors, si tu veux faire une batterie de tests sur obt_janvier.value, alors il faut commencer par
Select Case obt_janvier.value

 

[ptitepo]

Re : Condition de select case

Oui j'ai un formulaire avec des boutons "case à cacoher" (c'est le nom qu'ils ont, c'est pas le bouton radio rond c'est le carré) avec tout les mois les uns a la suites des autres. J'ai fait un select case, pour qu'en fonction de si il sont cocher ou pas, mes instructions se réalise.

Select Case Mois
    Case obt_janvier.Value = 1
         ' instruction
    Case obt_fevrier.Value = 1
         ' instruction
    Case obt_mars.Value = 1
        ' instruction
.... et ainsi de suite jusqu'a décembre.

Et c'est après le select case que je ne sais pas quoi mettre. c'est pe être pas le bon choix ?
d'après tototiti2008 je devrais mettre

Select Case Mois
    Case mois = obt_janvier.Value = 1
         ' instruction
    Case mois = obt_fevrier.Value = 1
         ' instruction
    Case mois = obt_mars.Value = 1
        ' instruction
... ?

Merci

 

[tototiti2008]

Re : Condition de select case

Bonjour ptitepo,

Je crois que tu n'as pas compris le principe d'un Select Case :
Un select case ne permet que de tester UNE variable. La variable en question est celle dont le nom doit figurer juste après Case.

Exemple :

Select Case Mavariable
Case "1" 'veut dire si Mavariable = "1"
'Actions si "1"
Case "2"
'Actions si "2"
...
End Select

Toi, tu veux tester toutes les valeurs de tes cases à cocher, donc plein de variables. Tu devras faire quelque choese du genre :

If obt_janvier.Value = 1 then
'Instructions 1
Elseif obt_fevrier.Value = 1 then
'Instructions 2
...
End if

ou bien

If obt_janvier.Value = 1 then
'Instructions 1
End if
If obt_fevrier.Value = 1 then
'Instructions 2
...
End if

selon le cas...

 

[ptitepo]

Re : Condition de select case

D'accort c'etait un mauvais choix de condition, je voyais pas le select case dans se sens la, merci beaucoup.