Re-eclater une requete Excel

Hello Cher Forum !

J'ai une petite question peut etre idiote mais qui ne tente rien...

J'ai réussi a compiler des fichiers present dans un dossier en une base de donnée grace aux fonction de requête dans excel,

Tres bien je peux faire mon analyse tout va bien !

Dans un 2eme temps il va falloir que je charge ces données.

L'outil de chargement utilise un format tres simple, à savoir, un CSV de 15 colonnes : code , Nom, 12 mois

Pensez vous que grace a ces outils de requête dans excel je sois capable de ré-éclater ma donnée sous la forme souhaitée de 15 colonnes, soit sur différents onglet ou mieux en différents fichiers, ou parfaitement en fichier CSV directement uploadable ?

Mais recherches sont jusqu'ici restées complètement vaines...

Preneur de tout debut de solution astucieuse comme tjrs ici !

Milles mercis pour votre aide !

Bonjour,

un exemple d'éclatement de fichiers

Steelson !

Efficace ! ca fait plus que bien le taff la macro a ete ajoute au classeur personal !

Merci beaucoup pour ton aide, et merci le forum comme a chaque fois !

Bom dia !

Steelson a écrit :

Bonjour,

un exemple d'éclatement de fichiers

Hello En fait j'ai un problème lorsque j'utilise la macro depuis le classeur de macro personnel,

J'obtiens une erreur Run-time error '9':

Subscript out of range

je pense que cela viens des lignes de code :

   Dim Principal
    Set Principal = ThisWorkbook

et

(code ou apparait l'erreur

 ws.Cells(1, col).Value = Principal.Sheets("data").Cells(1, col).Value

Je suis entrain de designer la sheet comme principal dans le personal XLSB no ?

je ne vois pas comment designer la sheet principal de mon classeur ou je vais faire tourner la maccro ? en essayant d'utiliser Active.workbook ?

Dsl je suis encore grand debutant!

Merci bcp pour ton aide

Je ne suis pas certain que cela vienne du nom Principal mais tu peux essayer de le changer partout.

A contrario, est-ce qu'une feuille data existe bien dans le classeur ?

Sépare chaque terme de la ligne où apparaît l'erreur et fais en un debug.print séparément, du genre :

Debug.print Principal.Name
Debug.print col
Debug.print Principal.Sheets("data")
Debug.print Principal.Sheets("data").Cells(1, col).Value

Merci beaucoup pour ton retour,

Oui j'ai bien tout renomédans mon classeur avec la sheet data,

J'obtiens l'erreur sur le debug print suivant

Debug.Print Principal.Sheets("data")

Cela ne vient il pas du fait que la macro est dans un module de mon classeur Personal.XLSB

Et que dans la declaration de variable la macro indique :

Set Principal = ThisWorkbook

et que du coup la macro considere que le classeur appelle principal est le classeur personal.XLSB (et qu'il n'y a pas de sheet appele data dans ce classeur) et pas le classeur que je tente d'eclater ?

Merci beaucoup pour ton aide,

En fait,

Debug.Print Principal.Sheets("data")

ne veut rien dire car c'est un objet, j'ai fait une erreur

si tu enlèves, est-ce que cela plante ici :

Debug.print Principal.Sheets("data").Cells(1, col).Value

mais en effet, il faudrait attribuer le nom "principal" au workbook à traiter ... je ne peux pas t'aider car je ne regroupe jamais mes macros dans la mesure où je les distribue avec les fichiers aux personnels qui en ont besoin