Autant pour moi...
Voici :
ChDir 'C:\\'
ActiveWorkbook.SaveAs Filename:='C:\\nom classeur.xls', FileFormat:=xlNormal _
, Password:='', WriteResPassword:='', ReadOnlyRecommended:=False, _
CreateBackup:=False[/color][/size][/i]
Ce code sauvegarde ton classeur sous le chemin C:\\
et le nomme 'nom classeur.xls'[/size]
Tu peux l'adapter en créant des variables pour le chemin et le nom (au cas où tu veuilles enregistrer plusieurs fichiers avec des noms différents, ça évite de les taper en dur dans VBA)
A+