Salut à tous, je souhaite ouvrir, un par un, tous les classeurs excel contenus dans un fichier.
(j'ai trouvé quelqu'un sur ce forum qui avait le même problème que moi, par contre il n'a pas indiqué si il avait trouvé une solution…)
Voici son post:http://www.developpez.net/forums/d11...-excel/limite-

ceci est le code que j'ai commencé.

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
Dim classeurs As Variant 'j'ai essayé avec object sans plus de résultat
For Each classeurs In Workbooks 
Workbooks.Open filename:=classeurs
    …. 'ici, le traitement à réaliser sur chaque onglet puis,...
    ActiveWorkbook.Save
    Workbooks.Close
Next classeurs
À l'éxécution, j'ai le méssage d'erreur suivant:
Erreur 438: propriété ou méthode non générée par cet objet
.

Le problème se situe au niveau de: Workbooks.open filename.
Filename attent un nom de classeur, hors moi , je ne souhaite pas indiquer de nom de classeur, je souhaite tous les ouvrir, quelque soit leur nom.