Boucle vba qui ouvre des fichiers avec noms variables - VB/VBA/VBS - Programmation
Marsh Posté le 28-03-2011 à 14:10:18
Au lieu de
Workbooks.Open Filename:= "Z:\"&selection.value".xls" |
Essayer
Workbooks.Open Filename:= "Z:\" & selection.value & ".xls" |
Marsh Posté le 28-03-2011 à 17:24:36
Merci Olivthill ,
Ca fonctionne niquel.
Par contre j'ai une deuxième question dans la foulée.
A la fin de ma boucle je souhaiterai fermer la feuille en question et la procédure :
Range'("A1" ).select
Windows(" & Selection.Value & " ).Close
ne fonctionne pas.
tu aurais une idée par hasard ?
Merci beaucoup
guillaume
Marsh Posté le 28-03-2011 à 12:45:40
Bonjour,
J'ai un fichier qui doit prélever des informations dans plusieurs autres fichiers excel, et les mettre dans plusieurs pages (une par fichier).
Mon fichier "mère" est composé de 15 onglets, et doit ouvrir 15 fichiers qui sont tous dans un même répertoire.
Pour chaque onglet, il doit prélever des informations dans le fichier portant le nom de la cellule A1 du-dit onglet.
J'imagine que le code devrait ressembler à ça mais je pense que je suis à coté de la plaque au niveau de la syntaxe :
Sub_boucle()
Windows("Classeur mère.xls" ).Activate
For Each feuille In Worksheets
feuille.Activate
Range("A1" ).Select
Workbooks.Open Filename:= "Z:\"&selection.value".xls"
[..manip de recherche de valeur.]
Next feuille
C'est sur cette partie variable du nom que porte ma question
Merci beaucoup,
Guillaume