limite fichiers ouverts simultanément via une boucle

[Elcocco]

Bonjour,

j'ai une petite question j'essaye d'ouvrir une vingtaine de fichier via une macro VBA. mais malheureusement cela bloque au niveau de 19 fichiers ouvert, la macro refuse d'ouvrir les autres fichiers.
Est ce que vous savez comment contourner ce problème, car j'ai besoin d'avoir les fichiers ouvert pour pouvoir travailler dans chacun d'entre eux ?

merci

[jfontaine]

Bonjour,

la macro refuse d'ouvrir les autres fichiers.

Sans autre information, je pencherais sur une limite de capacités de ton PC. (RAM)

[Elcocco]

Voici la macro utilisé afin d'ouvrir tout les fichier du répertoire

Code :

1
2
3
4
5
6
7
8
9
10
11
12
13
14
Sub Ouvrir_Fichier()
 
Dim Wk As Object
Dim rep As Object
Dim Chemin As String
 
Chemin = ThisWorkbook.Path
Set rep = CreateObject("Scripting.FileSystemObject").GetFolder(Chemin)
 
For Each Wk In rep.Files
    If Wk.Name <> ActiveWorkbook.Name Then Workbooks.Open Filename:=Wk
Next
 
End Sub

Et au niveau du 19eme fichier l'erreur que jobtiens me dit qu'il y a un soucis dans le lien vers le fichier.

[mercatog]

Et pourquoi tu veux ouvrir tous les fichiers en une seule fois?
Ne serait il pas plus facile de travailler sur chaque fichier, le fermer et passer au suivant?

[Elcocco]

je vais avoir besoin de les ouvrir environ 200 fois chacun car c'est pour produire des fiches par magasins et les infos sont réparties dans tous les fichiers.

je pensais optimiser en ouvrant tout une seul fois. Car certains fichiers sont assez gros.

[mercatog]

C'est une question d'abord de conception et de méthodologie.

Ce que je te proposais c'est:
Ouvrir le fichier 1
Faire tous les traitements par rapport à ce fichier
le fermer

Ouvrir le fichier 2
...etc

A toi de voir ou peut être de changer le fusil d'épaule.

[Elcocco]

Merci,

Je pense que je vais partir sur le principes d'ouvrir puis de fermer les fichiers à chaque création d'un nouveaux classeur, car je ne peux pas faire la solution proposé car cela m'oblige aussi à avoir beaucoup de fichier ouvert. Car je dois avoir au final un classeur par magasins qui comporte environ 20 onglets. Et j'ai entre 200 et 300 magasins.

Encore merci pour les réponses et votre réactivité.

[jfontaine]

Si tu as beaucoup de données penches toi sur la création d'une Base de données (Access ou SQL Express) que tu alimentes avec tes fichiers Excel

Ensuite, tu pourras alimenter le fichier Excel via cette BDD

[bbil]

Envoyé par Elcocco

...cela bloque au niveau de 19 fichiers ouvert, la macro refuse d'ouvrir les autres fichiers....

comment cela ce manifeste-t-il ?

[Elcocco]

Le problème est un message d'erreur par lequel le chemin d'accès n'est pas le bon.

Pour la version BDD, je ne suis pas sur car c'est un process qui sera mensuel, car c'est pour la création d'un reporting.

[bbil]

Envoyé par Elcocco

Le problème est un message d'erreur par lequel le chemin d'accès n'est pas le bon....

et donc ce chemin d’accès pas bon à quoi il ressemble ?

[Elcocco]

Voici le message d'erreur que j'obtiens en PJ

[bbil]

et si tu essai d'ouvrir par excel ce fichier (sans macro...)

[Elcocco]

Il s'ouvre sans problème si je les ouvre un part et en les refermant je n'ai pas de soucis tout mes fichiers s'ouvrent sans le moindre problème.

[mercatog]

Ici il fallait écrire (peut être sans relation)

Code :

If Wk.Name <> ThisWorkbook.Name

[Elcocco]

j'ai testé la modification et pas de changement.

Je vais donc changer ma façon de faire.

merci à tous pour vos réponse

[Philippe JOCHMANS]

Bonjour

Envoyé par Elcocco

Pour la version BDD, je ne suis pas sur car c'est un process qui sera mensuel, car c'est pour la création d'un reporting.

Justement, vu l'importance des données, je préconise un passage vers une BDD.

Access (entre autre) te permet de gérer sans soucis.

Philippe

[kiki29]

Salut, à voir également http://silkyroad.developpez.com/VBA/ClasseursFermes/ même si la migration vers Access serait serieusement à envisager

[jfontaine]

Pour la version BDD, je ne suis pas sur car c'est un process qui sera mensuel, car c'est pour la création d'un reporting.

La BDD est d'autant plus a envisager si l'utilisation des données est régulière.
A noter que cela t'ouvre un horizon d'utilisation plus vaste que le reporting (études spécifiques, consultation du détail pour élaboration de commentaires ...)