Select case

Résolu/Fermé
jadami - 22 oct. 2017 à 14:49
jadami Messages postés 103 Date d'inscription mercredi 14 mars 2007 Statut Membre Dernière intervention 18 septembre 2020 - 29 oct. 2017 à 00:38
Bonjour,

J’ai une liste déroulante qui contient ces valeurs :

N
R
NR
ABC18 (18 correspond à l’année 2018 et ma table comporte des ABC17, ou ABC16 etc ….)

Je voudrais faire un select case sur cette liste déroulante, mais j’ai un problème sur ABC18

Select Case cmbStatut
Case "N"
Case "R"
Case "NR"
Case Left(cmbStatut.Value, 3)
Case Else
End Select



La case Left(cmbStatut.Value, 3) dont la valeur est “ABC” ne fonctionne pas, le débug ne s’arrête pas sur cette case.

Merci pour votre aide.

Salutations

2 réponses

yg_be Messages postés 22720 Date d'inscription lundi 9 juin 2008 Statut Contributeur Dernière intervention 23 avril 2024 1 476
Modifié le 22 oct. 2017 à 15:02
peut-être ainsi?
Select Case Left(cmbStatut.Value, 3)
     Case "N"
     Case "R"
     Case "NR"  
     Case "ABC"
     Case Else
End Select 

ou bien:
Select Case cmbStatut
     Case "N"
     Case "R"
     Case "NR"  
     Case Else
         if Left(cmbStatut.Value, 3) = "ABC" then
                ' ABC...
         else
                ' autre chose
         end if
End Select 
1
jadami Messages postés 103 Date d'inscription mercredi 14 mars 2007 Statut Membre Dernière intervention 18 septembre 2020
29 oct. 2017 à 00:38
Bonsoir,

Merci pour la réponse, la deuxième solution me convient parfaitement.

Salutations
0