Modifier nom du fichier

Bonjour,

j'utilise la macro suivante pour gérer

1 affichage différent sur 2 écrans

en avant dernière ligne je rappelle le nom du fichier.

Je gère ainsi 6 affichages différents.

je dois également changer régulièrement le nom du fichier.

Pour éviter cela j'ai essayé de remplacer

Windows("concours_4p64.xlsm:1").Activate

par Windows("Workbook:1").Activate

Cela ne fonctionne pas

Quelqu'un peut il me donner la bonne syntaxe

D'avance merci

Pierre

Sub affiche_tab1b()

end sub

Bonjour Pierre_br,

Tout va dépendre si un seul fichier est ouvert ou plusieurs.

Dans le cas ou tu fermes un fichier pour en ouvrir un autre et qu'il n'existera qu'un seul fichier ouvert.

Tu peux modifier le code final par

Application.ScreenUpdating = True
Workbooks(1).Activate
Windows(1).Activate
Call plein_ecran_p
End sub

ça fonctionne

Merci pour ton aide

Pierre

Rechercher des sujets similaires à "modifier nom fichier"