Discussion :

[Appwal]

Bonjour à tous!

Dans mon code, j'ai 5 variables nommées:

• option1
• option2
• option3
• option4
• option5

Je souhaiterais accéder à ces variables dans une boucle for de 1 à 5.

J'ai bien essayé le option & i mais à priori VB n'en veut pas...

Donc si quelqu'un a la solution... Merci!

[SfJ5Rpw8]

utilise un tableau....

[Vld44]

ce n'est pas à proprement parler la solution, mais tu peux également passer par un tableau :

option(i)

[Appwal]

Merci pour cette réponse rapide mais je suis obligé de travailler dans la situation décrite plus haut.

Je bosse sur un projet dont je ne peux pas modifier toutes les sources..

[Phifi]

Je bosse sur un projet dont je ne peux pas modifier toutes les sources..

!!! ça risque d'être compliqué (impossible?) alors...

[Appwal]

Ok!

Va falloir que je me débrouille autrement alors...

Merci quand même!

[OhMonBato]

Tu peux détailler un peu, montrer un bout de code pour nous faire voir ce que tu veux faire exactement stp ? C'est toujours délicat de répondre sans connaitre les tenants et aboutissants mais peut être que la fonction Choose pourrait être utile.

[Appwal]

A vrai dire il n'y a pas grand chose de plus dans mon code:

C'est vraiment juste une boucle for avec un accès à ces variables à l'intérieur.

Code :

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

1
2
3
4
5
6
 
For i = 1 To 5
      If (Option & i = "ZONEOPTION") Then
            Trouve = True
      End If
Next i

[OhMonBato]

Code :

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

1
2
3
4
5
For i = 1 To 5
  If Choose(i, Option1, Option2, Option3, Option4, Option5) = "ZONEOPTION" Then
    Trouve = True
  End If
Next i

[Appwal]

Merci bien

Et sinon, pour ma culture générale, il est donc impossible d'avoir des "variables variables" en VB?

[OhMonBato]

De manière simple en tout cas je ne vois pas, sinon c'est peut etre possible mais pas dans mes cordes.
C'est pourquoi on utilise des tableaux, c'est tout de même nettement plus efficace

[khany]

Merci bien

Et sinon, pour ma culture générale, il est donc impossible d'avoir des "variables variables" en VB?

Si, c'est juste tafaçon de l'écrire qui est incorrecte, tu associe un nom (string) avec i (integer), ca ira jamais

Ton nom doit devenir : Option & Trim(Str(i)) qui transforme ton indice en string

[OhMonBato]

même pas fait gaffe à ça

[Appwal]

Ah ca c'est sympa

Merci à vous

[Phifi]

Si, c'est juste tafaçon de l'écrire qui est incorrecte, tu associe un nom (string) avec i (integer), ca ira jamais

Ton nom doit devenir : Option & Trim(Str(i)) qui transforme ton indice en string

Euh... d'accord pour la concaténation de types différents mais Option, c'est quoi du coup ?

Je ne vois pas comment ça peut marcher

Code :

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

1
2
3
4
5
6
7
8
 
    Dim mavar1 As String
    '
    mavar1 = "blabla"
    '
    MsgBox "mavar" & Trim$(Str$(1))  '=> mavar1 et non blabla
    MsgBox mavar & Trim$(Str$(1))  '=> mavar est non défini et pour cause...
    '

[Appwal]

Exact, je viens de tester et je tombe sur le même résultat que Phifi

[khany]

Je suis pourtant certaine de l'avoir déjà fait

Peut-être pas le même cas

[Phifi]

J'utilise ce genre de chose pour les noms de champs indexés, c'est peut-être un cas similaire

ex :

Code :

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

1
2
3
4
5
6
7
8
 
'mon recordset a 10 champs -> monchamp1, monchamp2 etc...
For ix = 1 to 10
     rst.Addnew
     rst("monchamp" & trim$(str$(ix))) = TxtZone(ix)
     rst.Update
     'par exemple
Next ix

mais pour ce qui est des variables et des objets non indexés, je n'ai jamais réussi à faire un truc pareil

[Vld44]

il me semble que c'est impossible à faire.

Venant du php, j'avais cherché à reproduire le fameux "$$variable" mais je n'ai pas réussi.

[khany]

Je me souviens maintenant, c'est un peu le même cas que PhiFi, des contrôles liés à des signets dans Word et des noms de contrôles lors d'ajout dynamique de contrôles avec .Add

Désolée pour le faux espoir