Macro - Bouger un fichier sans avoir besoin de changer la macro

[hellocarioca]

Bonjour,

je viens de créer un outil utilisant pas mal de macro.
Cet outil va devoir être bougé sur le sharedrive de mon client et donc la localisation de mes fichiers va changer et il me semble que la macro ne suit pas c changements, donc après il faut retaper dans chaque macro le nouveau chemin pour par exemple ouvrir un fichier.

Est ce qu'il y a une solution pour bouger un fichier d'endroit et que la macro note d'elle meme le nouveau chemin pour aller le chercher...

Je sais pas si c tres clair mais si vous avez compris, aidez-moi !!!

Merci

maud

 

[fred65200]

Re : Macro - Bouger un fichier sans avoir besoin de changer la macro

bonjour,

tu peux peut être déclarer une constante Public

Public const maRacine as String = "C:\Dossier\Sous dossier\"

et utiliser maRacine dans ton code.
Lors du déplacement, tu n'as qu'une ligne à modifier.

Sinon, si tu as une arborescence spécifique à ton classeur.
ThisWorkbook.Path donne le chemin du classeur où sont écrites les macros.

cordialement

 

[hellocarioca]

Re : Macro - Bouger un fichier sans avoir besoin de changer la macro

Bonjour Fred,

Alors je suis vraiment pas douée en langage excel donc g rien compris...🙁

Ce que je veux dire c que ma macro est déjà créée depuis belle lurette et ça m'embête de devoir changer toutes mes macros... je me demandais juste si y avait un moyen de déplacer les fichiers d'une certaine façon liée au macro pour que les macro enregistre d'elles-meme le nouvel endroit!

Merci

Maud

 

[hellocarioca]

Re : Macro - Bouger un fichier sans avoir besoin de changer la macro

pardon je viens de penser à un exemple.
Par exemple je demande à ma macro d'ouvrir un fichier:
Workbooks.Open Filename:= _
"C:\Documents and Settings\mlehello\My Documents\Share Drive G4S\Dispute Final Savings.xls"

Et disons que je décide de changer le nom du fichier par Dispute Savings Maud.xls. et ben du coup après ma macro bug parce qu'elle reconnait pas le fichier. Et donc c ce genre de changement que j'aimerai pouvoir faire sans avoir besoin d'aller dans ma macro et changer manuellement le nom du fichier.

Merci

Maud

 

[fred65200]

Re : Macro - Bouger un fichier sans avoir besoin de changer la macro

re

je ne vois pas comment tu peux faire sans repasser tout ton code au crible.

Sinon chez ton client, tu fais chercher / remplacer.

cordialement

 

[fred65200]

Re : Macro - Bouger un fichier sans avoir besoin de changer la macro

reponse au post de 13h21

Public Const maRacine As String = "C:\Documents and Settings\mlehello\My Documents\Share Drive G4S\"
Public Const monClasseur As String = "Dispute Final Savings.xls"
Sub test()
    Workbooks.Open Filename:=maRacine & monClasseur
End Sub

les déclaration Public doivent être en haut de ta feuille de code.
@+