Discussion :

[pompom31]

Bonjour

Après avoir cherché une 1/2 journée une solution a mon pb, je me retourne vers vous
Je cherche à créer un type de variable à partir d'une liste d’élément. Je souhaite en plus que ces éléments soit ordonnés

Pour être plus clair je vais prendre un exemple
Je souhaite créer une variable "Toto" qui puisse prendre comme valeur ("1","3","Ca","7", "Li"). Et j'aimerai que ces valeurs soient ordonnées cad "1" < "3" < "Ca" < "7" < "Li".
J'ai compris que cela n'était pas possible avec le mot TYPE.

J'ai bien trouvé ceci

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
Enum toto
ca=5
Li=9
end enum

Pour autant cela ne correspond pas vraiment au besoin car toutes les variables de type toto sont en réalité des nombres - de type Long je crois-
par ex si je code

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
dim temp as toto
temp=-13.24

il n'y a aucune erreur et temp vaut bien 13.24

Est il possible de créer un tel type de variable ?
Comment feriez vous à ma place ?

Cdlt

[Marc-L]

Bonjour,

si c'est pour une variable tableau : V = [{"1","3","Ca","7","Li"}] …

V(1) est égal à "1" et V(5) à "Li" … Sinon voir aussi la fonction Array, son premier indice étant par défaut zéro …

[pompom31]

Bonjour et merci de ta réponse

Je vais essayer d'être plus clair
Je souhaite avoir une variable qui puisse prendre UNE valeur paris une liste ("1","3",....). Je souhaite aussi pouvoir comparer cette variable a une autre valeur de la liste
Autrement formulé (reste de math) je cherche à créer un ensemble fini et ordonné

par ex

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Dim Variable as Ensemble_fini_et_ordonné

(que je n'arrive pas à créer)
Comme cela je peux comparer Variable à "Li"
ex if Variable-"Li">0 then...

J'avoue que je ne vois pas comment on peut le faire avec des tableaux (ni avec la fonction array)

J'ai l'impression que ce n'est pas faisable en VBA, as tu une solution ?
Cdlt

[Marc-L]

Voir peut-être du côté de l'objet Collection …