probleme de chemin d'accès
Bonjour à tous,
J'ai une petite question sur le chemin d'accès au répertoire où je veux enrengistrer un fichier.
J'ai écris le code suivant :
Code:
1
2
3
4
5
6
7
8
9
10
11
12
13
| Sub NewYear()
'
' Macro enregistrée le 30/10/2012 par Lolo
'
'
ChDir _
"C:\Users\Lolo\Desktop\Programme\Identification"
ActiveWorkbook.SaveAs Filename:=Format(Cells(1, 1), "yyyy") _
, FileFormat:=xlNormal, Password:="", WriteResPassword:="", _
ReadOnlyRecommended:=False, CreateBackup:=False
Application.Quit
End Sub |
Ce dernier me permet de créer une copie de mon programme en lui donnant le nom de l'année et en l'enregistrant dans le répertoire IDENTIFICATION.
Si je donne mon programme à quelqu'un,ce dernier le mettra dans le répertoire de son choix sur son ordi. Par conséquent, le chemin d'accès correspondant à mon ordi, soi "C:\Users\Lolo\Desktop\Programme\Identification" ne sera plus bon.
Ma question est donc la suivante : y a-t-il une façon de faire pour que ma macro enregistre ma copie dans le répertoire IDENTIFICATION quelque soit l'endroit où ce dernier se trouve sur le disque dur?
Par exemple si je déplace le répertoire IDENTIFICATION qui contient le programme dans "C:\Users\Lolo" ?
Merci à ceux qui se pencheront sur mon problème.
Laurent
