Discussion :

[dylan.pascal]

Bonjour,

Je me permets de vous contacter car je bloque sur un problème de programmation. Je développe des Macros en VBA mais mon problème relève de l'algorithmie.
Mon programme permet de se connecter à différentes bases de données, d’exécuter une requête et de coller le résultat dans une feuille Excel.

Voici le bout de code où je bloque :

Code vba :

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

1
2
3
4
5
6
7
8
9
10
11
For i = 0 To 4
 
                    SQLBase = TableauServeur(i)
 
                    DB.Open SQLBase, SQLUser, SQLPWD
 
                    ImportDonneesFeuilleAutreDetail "Autres - Détail", "A", "B", _
                    ChaineSQL
 
                    DB.Close
        Next i

Cette boucle permet de gérer les nom de connexions aux bases de données, j'ai un tableauServeur qui stocke les noms. Je fais appel à la fonction ImportDonnéesFeuille... qui pend en paramètre 4 éléments :
- Le titre de l'onglet à créer
- Le point de départ où doit être collé le résultat : ici la colonne A de la feuille
- Le point d'arrivée où doit s’arrêter le résultat : ici la colonne B de la feuille
- La requête SQL

Je cherche à incrémenter ces colonnes pour permettre de coller à la suite les résultats des différentes bases. Avez-vous une idée de comment dois-je procéder ?

Cordialement,

Dylan.

[Jean-Philippe André]

Salut,

ici tu parles des colonnes A et B, et de les incrémenter... Qu'entends tu par là ?

S'agit-il de coller le résultat toujours dans la colonne A, à la suite de la dernière cellule remplie de la colonne A, ou bien tu prends A/B puis C/D et E/F ?

Soit un peu plus précis stp

Merci

[dylan.pascal]

Oui je voulais naviguer des mes colonnes A/B C/D E/F du coup j'ai trouver la solution :

Code :

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

1
2
3
For i = 0 To 4
        Colonne = Chr(Asc(Colonne) + 1)
Next i

La fonction :

Code :

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

Chr(Asc(Colonne) + 1)

permet d'incrémenter des strings en se référant à la table ASCii

Si je définis ma colonne en string et initialisée à C, alors ma boucle va l'incrémenter, C,D,E,F...

Cordialement,

Dylan