Enregistrer en passant par VBA

Bonjour,
je ne sais pas si je poste au bon endroit.
Je fais actuellement une base de donnée sous Access, avec plusieurs formulaires...
A partir de là, j'extraie mes données Access sous Excel (en automation) et je lance un algo sous Excel qui me tri tout ça.
Après ce tri, j'aimerai enregistrer mon rapport Excel (tout ça à partir d'access en automation).

J'utilise donc la commande suivante:

Code:

---

xlBook.SaveAs "C:\Temp\Feuille1.xls"

---

qui m'enregistre mon .xls dans le dossier indiqué.

Mais j'aimerai pouvoir parcourir mon disque dur pour choisir ou enregistrer mon fichier et choisir le nom de ce fichier quand je l'enregistre, comme quand je fais "enregistrer sous" avec Excel.

Est-ce possible?

Si oui comment?

Merci

Bonjour,

Pas sur que cela fonctionne correctement depuis access, mais c'est a essayer

Application étant ta variable application excel

Code:

---

1 2	Application.SaveWorkspace

---

Bon courage

Hello,

tu dois afficher une boite de dialogue "Enregistrer sous" pour récupérer le chemin d'enregistrement (code dispo dans les FAQ) puis envoyer la valeur à l'instance Excel que tu pilotes via VBA.

schématiquement

Code:

---

1 2 3 4 5

varFichier = FonctionEnregistrerUnFichier(....) if VarFichier & "" <> "" xlBook.SaveAs VarFichier ' ou appExcel.Workbooks(NomDuClasseur).SaveAs VarFichier End if

---