J'ouvre un fichier Excel de Suivi.
J'ouvre ensuite un fichier de données excel qui change de nom à chaque fois ou presque
Je souhaite automatiser le rapatriement des données mais voila mon problème je n'arriave en vba à basculer d'un fichier à l'autre car le classeur 2 à un nom toujours different.
J'ai essayé le Windows("REO*.xls").Activate car les fichier non pas le même nom mais commence toujours par REO dans cette exemple malheureusement cela ne fonctionne pas.
une solution, utiliser des variables, si le 1er fichier ouvert est le classeur où se trouve la macro et si le classeur REO" est actif lorsque tu lances la macro :
Code:
Dim wb1 As Workbook, wb2 As Workbook
Set wb1 = ThisWorkbook
Set wb2 = ActiveWorkbook
après, pour agir sur l'un ou sur l'autre, tu utilises wb1 ou wb2... comme ceci par exemple...
JE viens de tester mais j'ai du loupé un truc ..... je ne recupére pas dans les variables les nom des fichiers ouverts et ensuite je bugue sur Windows(wb1).Activate, mais je dois avoir loupé un truc....
Sub RecupererDonnées()
Dim wb1 As Workbook, wb2 As Workbook
Set wb1 = ThisWorkbook
Set wb2 = ActiveWorkbook
je dois louper un truc terrible car même avec la modif et en effectuant en pas à pas la macro je ne bascule pas d'un fichier à l'autre. Je reste sur le même fichier
j'ai deux fichiers ouverts REO SUIV.xls (celui qui est toujours identique) et l'autre fichier REO xxxxxxx.xls. Je suis sur le REO SUIV.xls et je lance la macro en pas à pas et je ne bascule pas.
Désolé mais je suis surement complétement à coté ....
Sub RecupererDonnées()
Dim wb1 As Workbook, wb2 As Workbook
Set wb1 = ThisWorkbook
Set wb2 = ActiveWorkbook