VARIABLE = chemin du fichier
Bonjour à tous,
J'aimerai pourvoir déclarer une variable = au chemin d'un fichier (dossier) j'ai écrit le code suivant mais il ne focntionne pas :
"
'Changement de dossier de partage
Dim Variable1 As String
'Attribution d'une valeur à la variable
Variable1 = Workbooks("\\STAFIC\Partage\Observations\Observations.xlsm")"
Avez vous une idée de comment je pourrai faire, s'il vous plait?
J'aimerai le déclarer en variable car si un jour nous changeons de serveur il est plus simple de changer le nom du dossier si c'est une variable au lieu de rechercher dans toute la macro ...
Merci à vous
Bonjour elise15996,
La fonction suivante pourrait-elle convenir ?
Variable1 = Workbooks("Observations.xlsm").PathBonjour,
Merci mais non j'ai essayé comme ca et ca ne fonctionne pas non plus ...
Bonjour,
Merci, Oui ces 4 solutions fonctionnent très bien lorsque l'on veut le nom du fichier mais moi je vais chercher un fichier dan un autre dossier donc ca ne fonctionne pas…
le code que j'ai avec le lien du ficher est le suivant :
"Sub test2()
'Chemin d'accès avec nom du fichier dans la variable1
Variable1 = Workbooks("\\STAFIC\Partage\5S\Résultats 5S\Graphiques taux de conformité 5S.xlsm").Path & "\Observations.xlsm"
MsgBox "Le chemin d'accès est :" & Chr(13) & Variable1
End Sub"
et j'ai ce message qui apparait :
Ce que je veux faire est peut être infaisable ?
Bonjour,
La fonction path renvoie le chemin d’accès complet d'un fichier à partir de son nom.
Comme vous renseignez déjà le chemin d'accès, essayez simplement :
Variable1 = "\\STAFIC\Partage\5S\Résultats 5S\Graphiques taux de conformité 5S.xlsm"
Si vous regardez le début du poste c'est ce que j 'avais fais au début et ça n'a pas fonctionné Je vous remercie de votre réponse.
Si vous regardez le début du poste c'est ce que j 'avais fais au début et ça n'a pas fonctionné Je vous remercie de votre réponse.
Pas tout à fait. Vous aviez indiqué cela :
Variable1 = Workbooks("\\STAFIC\Partage\Observations\Observations.xlsm")"
et je vous propose d'essayer comme ceci :
Variable1 = "\\STAFIC\Partage\Observations\Observations.xlsm"