Nommer et créer fichier dans repertoire précis

Bonjour à tous j'ai besoin d'un sérieux coup de pouce

Avec le code ci dessous je suis parvenu à créer automatiquement un fichier dont le nom se trouve dans la cellule A1 de l'onglet "Base"
Par contre je ne parviens pas à indiquer à Excel le répertoire où je souhaiterais que ce fichier se crée (C:\users\...), il le crée par défaut l à l'endroit du dernier enregistrement

Mes multiples tentatives ne m'ont pas permis de trouver la bonne syntaxe

Je compte sur vous merci beaucoup par avance

Sub Classeur_ajouter()

n = Sheets("Base").Range("A1").Value
Workbooks.Add
ActiveWorkbook.SaveAs Filename:=n & ".xls"

End Sub