Discussion :

[CedricMoi]

Bonjour,

Je tente de programmer une petite application en vba, un genre de démineur de 10x10 cases.
Chaque case a un nom: Bxy, avec x la ligne et y la colonne.
Je voudrais utiliser une boucle paramétrée du genre:

Code :

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

1
2
3
4
5
For i = 0 to 9
     For j = 0 to 9
          Jeu.Bij.Visible = True
     Next j
Next i

Évidement cela ne fonctionne pas puisque lors de la compilation VBA ne reconnais pas Bij...

Je vous remercie de votre aide, même si cette question peut paraitre triviale.

[Lou Pitchoun]

Salut,

Tu utilises quel logiciel ?

Jeu, c'est quoi comme objet ?

i et j ne sont pas interprétés comme des variables mais comme un nom : Bij.

A titre d'exemple, pour parcourir un tableau B à 2 dimensions :

Code :

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

1
2
3
4
5
For i = 0 to 9
     For j = 0 to 9
          B(i, j) = True
     Next j
Next i

[CedricMoi]

Bonjour et merci de ta réponse rapide

J'utilise le VBA fourni avec Excel.

Jeu est ma userform sur laquelle j'ai mes cases.

Je n'ai pas de tableau, mais un ensemble de cases dont je veux changer les attributs pour certaines en fonction des actions de l'utilisateur.

[Lou Pitchoun]

Voilà. C'est plus simple avec ces explications.

Pour accéder à un objet du formulaire :

Code :

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

NomUserForm.NomControle

ou

Code :

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

Me.NomControle

ou

Code :

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

Me.Controls("NomControle")

On va servir de la 3ème syntaxe pour pouvoir utiliser les variables :

Code :

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

Me.Controls("B" & i & j) = True

Remplace Me par le nom du UserForm si tu exécutes le code en dehors du UserForm.

[CedricMoi]

Tout a fait ca qu'il me fallait !


Merci