Discussion :

[Renato71]

Bonjour à tous,

Changement de poste, je suis confronté au VBA que je découvre à travers des macros réalisées par mes prédécesseurs et en m'aidant bien évidemment des nombreux tutos disponibles sur le net.

J'ai comme objectif de dupliquer une macro existante.
Cette macro créée une requête, récupère les données, les mets dans un tableau et les affiches.

J'ai commencé par la solution de base qui a été de C/C les variables du nombre de requête dont j'avais besoin (et honnêtement j'ai même fait cela pour les autres steps mais on verra par la suite )

Code :

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

1
2
3
4
5
6
 
'Déclaration des variables:
    Dim sURL As String, aResultat() As Variant, aLines() As String
    Dim sURL2 As String, aResultat2() As Variant, aLines2() As String
    Dim sURL3 As String, aResultat3() As Variant, aLines3() As String
...

Toutefois je me doute qu'il existe une possibilité pour déclarer des variables "en masse" mais je ne trouve pas de tuto à ce sujet.
Est-ce que quelqu'un pourrait me guider là-dessus ?

Merci par avance pour l'aide apportée,

R71

[Philippe Tulliez]

Bonjour,

Toutefois je me doute qu'il existe une possibilité pour déclarer des variables "en masse" mais je ne trouve pas de tuto à ce sujet.
Est-ce que quelqu'un pourrait me guider là-dessus ?

Je ne sais pas ce que vous entendez par une déclaration de variables "en masse" mais comme vous numérotez vos variables, il est possibles que les variables tableaux correspondent à vos recherches

Voici les tutoriels sur ce sujet

• Utiliser les variables tableaux en VBA Excel
• Conceptualisation des variables tableau en VBA et Application à l'optimisation du code sous Excel

[Renato71]

Bonjour Philippe,

Merci beaucoup pour ton retour rapide, cela a parfaitement répondu à ma demande.
J'étais bien tombé sur cette page mais n'en n'avais pas compris les fonctionnalités.
Avec un peu de pratique cela m'a permis de réaliser une boucle/tableau dans ma saisie de requête, super cela fonctionne parfaitement.

Toutefois est-ce que cela est aussi applicable à la fonction Split ?
Je m'explique. Cette fonction créé un tableau.
J'ai voulu appliquer le même principe que précédemment mais sans réussite. Probablement un problème dans la dimension de mon tableau. Je n'avais pas cette préoccupation précédemment puisqu'une seule dimension, alors que là que je ne connais pas la dimension à l'avance de mon tableau.

Code :

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

1
2
3
4
5
6
7
Sub exemple()
        texte = "www.developpez.net"
        tableau = Split(texte, ".")
    sgBox tableau(0) 'Renvoie : www
    MsgBox tableau(1) 'Renvoie : developpez
    MsgBox tableau(2) 'Renvoie : net
    End Sub

Comment ne pas à avoir à créer tableau1 pour le texte 1, tableau 2 pour le texte 2 etc ? Créer une nouvelle dimension ?

Merci encore pour l'aide,

R71

[Philippe Tulliez]

Bonjour,

Probablement un problème dans la dimension de mon tableau. Je n'avais pas cette préoccupation précédemment puisqu'une seule dimension, alors que là que je ne connais pas la dimension à l'avance de mon tableau

Split crée une table d'une dimension égale au nombre d'éléments qui sépare la chaîne et on connaît ce nombre grâce à la fonction Ubound mais tout cela est expliqué dans le tutoriel.

Comment ne pas à avoir à créer tableau1 pour le texte 1, tableau 2 pour le texte 2 etc ? Créer une nouvelle dimension ?

Dans mon utilisation de Splt, je n'ai pas de problème particulier mais sans doute n'ai je pas les mêmes contraintes.