J'attaque le dernier jour et demi de mon stage, et dans ce court laps de temps, je dois mettre en place une solution excel me permettant de synthétiser des données.
Ces données, je les ai dans des classeurs excel (1 par jour), et j'aimerais lire ces classeurs fermés.
J'ai trouvé pas mal de sources sur le web comme ici, mais j'ai un peu de mal à m'adapter.
une vraie mine d'or ce site, sous catégorie "Lire".
J'essaye d'utiliser la méthode Excel4macro dans un code comme ceci:
Code:
Public Sub ChercheXLS()
Dim Retour As String
Retour = Dir(leChemin & "2007\03\" & "*.xls")
Do While Retour <> ""
MsgBox Retour
[COLOR="Red"]MsgBox ExecuteExcel4Macro("'" & leChemin & "2007\03\[" & Retour & "]" & "Synthese N & N-1" & "'!$A$1")[/COLOR]
Retour = Dir
Loop
End Sub
Tout marche, sauf la ligne en rouge.
J'explique rapidement ce code:
Retour = Dir(leChemin & "2007\03\" & "*.xls")
J'affecte à la variable Retour le nom d'un classeur
Do While Retour <> ""
On boucle tant que Retour est différent de rien
Sinon, j'utiliserais la méthode de requêtage excel classeur fermé, et je récupèrerais toute ma feuille de données, sur laquelle je ferai mes traitements.
ça me dérange pas, mais si je peux apprendre à faire celle là avant, pourquoi pas ?
Est-ce que quelqu'un saurait et pourquoi ça ne marche pas ?
La ligne ne fonctionne que pour une seule cellule oui, mais comme je connais les références des cellules d'origine, je peux boucler dessus et reproduire la ligne.
Je me demande s'il ne vaut pas mieux que je fasse une requête, et que je me serve de cette méthode pour récupérer les infos manquantes ?
Dans tous les cas, je vais boucler dans tous les sens, donc ?
Si quelqu'un a un avis sur la question, je remercie par avance.
Pour ma part j'opterai pour une requête mais tout dépend de l'architecture de tes feuilles et de ce que tu veux faire de ta synthèse.
dans le wiki XLD,Tu as une démo de Thierry MichelXLD et moi pour la collecte de N classeurs avec p feuilles et q cellules continues ou non; peut être cela pourra t'être utile.