XL 2016 [Résolu] Fichier Xlsm non modifiable car utilisé dans la macro

[bidouill]

bonsoir tout le monde

j'ai un souci que je n'arrive pas à élucider (mais peut-être qu'il n'y a pas de solution).

je vais essayer de m'expliquer clairement.

j'ai un fichier qui se nomme "suivi de dossier.xlsm". dans ce document il y a une page de renseignement à compléter et ensuite un bouton qui "actionne une macro". cette macro permet de remplir à chaque manipulation un autre fichier qui se trouve sur le serveur.
ma problématique est le fait que l'assistante ne peut pas modifier le nom du fichier "suivi de dossier.xlsm" par exemple en donnant le nom du client car la macro ne fonctionne plus ce qui est normal le nom initial apparaissant dedans.
ex de ligne dans la macro :
Selection.Insert Shift:=xlDown
Windows("Suivi pièces du dossier.xlsm").Activate
Sheets("FTL").Activate
ActiveWindow.ScrollColumn = 34

est ce qu'il y a une solution pour contourner ce problème.

je vous remercie par avance pour votre aide précieuse.

Cordialement

Patrick

PS : désolé si le texte du sujet est un peu flou

 

[job75]

Bonsoir bidouill,

ma problématique est le fait que l'assistante ne peut pas modifier le nom du fichier "suivi de dossier.xlsm" par exemple en donnant le nom du client car la macro ne fonctionne plus ce qui est normal le nom initial apparaissant dedans.

Ce n'est pas un problème, dans la macro il ne faut pas utiliser le nom du fichier "en dur", remplacez-le par ThisWorkbook.Name

A+

 

[bidouill]

Bonsoir bidouill,

Ce n'est pas un problème, dans la macro il ne faut pas utiliser le nom du fichier "en dur", remplacez-le par ThisWorkbook.Name

A+

Bonsoir

déjà un grand merci pour ta réactivité.

donc pour ne pas faire d'erreur :
dans ma macro par ex je remplace
Windows("Suivi pièces du dossier.xlsm").Activate

Par
Windows("ThisWorkbook.Name").Activate

 

[job75]

Il ne faut pas de guillemets : Windows(ThisWorkbook.Name).Activate ou plus simplement ThisWorkbook.Activate

 

[bidouill]

Il ne faut pas de guillemets : Windows(ThisWorkbook.Name).Activate ou plus simplement ThisWorkbook.Activate

Merci beaucoup je test dès ce soir