XL 2010 Nommer la fenetre active

[franck70]

Bonjour à tous,

J'ai besoin d'un petit coup de main. J'ai une macro ou je demande à un moment d'indiquer où est le fichier à ouvrir :

fileToOpen = Application _
.GetOpenFilename()
Workbooks.Open Filename:=fileToOpen

Par la suite, je repasse sur un autre fichier et j'aimerais ensuite revenir sur le fichier ouvert ci-dessus.
J'ai essayé de nommer la fenêtre avec ActiveWindow=XXXX pour utiliser ensuite Windows(XXXX).Activate, mais ça ne fonctionne pas car j'ai l'impression qu'on ne peut pas nommer une fenêtre active avec ce code.

Sauriez-vous comment faire pour nommer la fenêtre active et ainsi pouvoir revenir dessus ensuite ? J'ai l'impression que c'est tout bête, mais je ne trouve rien (ou je cherche mal !!!)

Merci beaucoup pour votre aide

Cordialement

 

[Dranreb]

Bonjour.
La 1ère idée qui me vient à l'esprit c'est de vous conseille de noter le classeur dans une variable globale déclarée As Workbook. Ça tombe bien, la méthode Open de l'objet collection Workbooks renvoie justement un objet Workbook. Faire:
Set Wbk = Workbooks.Open(Filename:=fileToOpen)
Vous n'aurez qu'a faire Wbk.Activate
Du moins si c'est vraiment nécessaire, parce que dans une macro, pas besoin qu'il soit actif pour pouvoir travailler dedans…

 

[franck70]

Bonjour Danreb

Merci pour ton retour, j'essaye ta proposition dans la journée

Cordialement

 

[franck70]

Bonjor

Après avoir testé , ça marche effectivement super bien.

Merci beaucoup Danreb