tri d'après valeurs combo

[Francis]

Bonjour le forum
Je termine une application, je bute sur l’analyse et je pense qu’un XLDnaute peut me mettre sur la voie .
Je trie suivant les valeurs d’une combo (cette partie marche),
et je voudrais aussi avoir la possibilité de trier sur toutes les valeurs de la combo.
En somme, faire un Ou logique avec les valeurs de la combo pour valtest.
En réalité, valtest a les valeurs suivantes : E,O,M,H.
Il est vrai que pour un tri, une variable ne peut avoir qu’une valeur…..mais peut être y a-t-il une astuce ?

If CheckBox1 Then
FenRisques.Show
valtest = Left(FenRisques!ComboBox2, 1)
valtest = UCase(valtest)
End If
else
valtest = E or O or M or H. (ça ne marche pas
End If
Merci pour vos idées
Francis

 

[ChTi160]

Re : tri d'après valeurs combo

Salut Francis
arff pas évident
car tu n'as pas mis de fichier exemple Lol il faut tout créer pas gloupsss

pour tenter de répondre
tu peux faire (non testé)

Dim L as Byte
If CheckBox1 Then
With FenRisques
        .Show  'pourquoi le Show????
   valtest = UCase(Left(.ComboBox2(.ListIndex))
   Else
  For L= 0 to .combobox2.listCount-1
          valtest = UCase(Left(.ComboBox2(L))
  'ici la procedure
  next
End with
End If

Bonne fin de journée

 

[Francis]

Re : tri d'après valeurs combo

Bonsoir ChTi160 et le forum
Merci pour ta réponse et au vu de celle-ci je vois que je me suis trompé dans l’analyse. Et je vais partir vers une autre solution.
Il est vrai que la lecture avec un œil différent fait souvent avancer les choses.
Merci encore pour ton aide.
Francis