Discussion :

[SIGMIC]

Bonsoir,

Je n'arrive pas à faire tourner le petit bout de macro suivant sans que les lignes "Dim" viennent en rouge en pointant sur le signe "=" (fin d'instruction attendue ou erreur de syntaxe):

Code :

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

1
2
3
4
Dim numbers() As Integer = {1, 4, 7}
Dim letters() As String = {"a", "b", "c"}
For Each number As Integer In numbers<div style="margin-left:40px">For Each letter As String In letters</div><div style="margin-left:80px">Debug.Write(number.ToString & letter & " ")</div><div style="margin-left:40px">Next</div>Next
Debug.WriteLine("")

Un tout grand à mon sauveur.
Bien cordialement
Michel

[gnain]

en vba ce n'est pas pareil à vb.net

en vba il faut déclarer les variables comme ceci

Code :

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

Dim numbers(3) As Integer

et leur affecter des valeur plus loin

[clementmarcotte]

Bonjour,

en vba ce n'est pas pareil à vb.net

Maudit !!!!!!!!!!!! Surtout que, même si je le sais, je me fais prendre à tout coup.

Et puis, c'est cette habitude de VBA de piquer une crise quand on laisse un trou à droite du signe = le temps de faire un copier-coller ou un glisser-déposer

[SIGMIC]

Merci gnain!

Je n'avais rien trouvé d'autre sur Internet pour répondre à mon besoin et j'avais tenté de m'inspirer de ces lignes de code.
Je pense qu'il soit dans ce cas préférable de préciser mon besoin:

J'ai un certain nombre d'opérations à effectuer en boucle, mais cette partie ne pose pas de problème.
Maintenant ce bloc d'opérations doit être effectué pour une trentaine de pays (AUT, FRA, CAN, etc.) et, pour chaque pays, une dizaine de marques (ROL, CAR, etc.).
La boucle doit prendre le premier pays (AUT) et effectuer pour chacune des marques le bloc d'opérations (AUT et ROL, AUT et CAR, AUT et ..., etc.).

J'aimerais donc pouvoir lister ces pays et ces marques pour que la macro traite le bloc d'opérations à chacun des pays-marques (il prend le premier pays et passe toutes les marques, puis prend le deuxième pays et passe toutes les marques, etc.).

Je serais bien reconnaissant d'obtenir encore un bout de réponse à ce sujet.
Un tout grand merci par avance!

Cordialement
Michel

[gnain]

Il vous faut une boucle dans une boucle

Code :

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

1
2
3
4
5
6
7
For i = 1 to NB_DE_Pays
 
     For j = 1 to NB_Marque
            'récupération pour pays(i) les marque(j)
     next j
 
next i

[SIGMIC]

Merci gnain. J'avais compris la logique de cette fonction de boucles imbriquées dans mon manuel visual basic. Mon véritable problème (de débutant...) se situe dans la liste des pays et des marques, à quel endroit puis-je les faire figurer? Après les "Dim" ?