Activation de fenêtre

[Gabriel]

Bonjour à tous

J'ai fais un macro qui fait une importation. Elle fonctionne bien mais j'ai une application qui fait en sorte que le nom du fichier n'est pas toujours le même. Donc la macro est toujours la même mais pas le nom du fichier.
J'ai essayer de la remplacer par une variable mais cela ne fonctionne pas. Est ce que quelquun pourrait m'aider ??

Voic l'exemple

Columns("A:A").ColumnWidth = 16.71
Windows("nouveau_projet.xls").Activate
ActiveWindow.SmallScroll Down:=12
Windows("3.txt").Activate

Il le nom " nouveau_projet " n'est pas toujours le même. Il faut un moyen pour mettre un variable qui correspond au nom du workbook.


Merci

Gabriel

 

[Robert]

Salut Gabriel, salut le forum,

Si au moment de l'exécution de la macro tu n'as que deux fichiers ouverts, le fichier variable et "3.txt", essaye avec le code ci-dessous :

Public Sub fen()
Columns("A:A").ColumnWidth = 16.71
'ne fonctionne que si seuls "3.txt" et un l'autre fichier sont ouverts
ActiveWindow.ActivateNext
ActiveWindow.SmallScroll Down:=12
Windows("3.txt").Activate
End Sub

À plus,

Robert