Bonjour,
Essaies ça:
mypath=activeworbook.path 'reconnait le chemin du classeur ouvert (Liste Telephone.xls)
chdir mypath ' change le dossier d'ouverture
ActiveWorkbook.SaveAs Filename:="Liste Telephone.xls", FileFormat:= _
xlNormal, Password:="", WriteResPassword:="", ReadOnlyRecommended:=False _
, CreateBackup:=False
Ca devrait fonctionner, ou au moins te donner une idée pour résoudre ton problème.
Bonne continuation
Maraboul