VBA à l'ancienne [Résolu]

[n.roussaly]

Bonjour,
Je développe dans du VBA à l'ancienne...
Je m'explique, j'utilise un logiciel dans lequel nen sont pas intégrées les bibliothèques office 11.
Hors j'aimerai savoir s'il existe une facon préconstruite de faire l'équivalent de ce que fait une "savefiledialog" ?
Merci pour vos réponse...
PS: Au fait j'ai niveau newbie

[cafeine]

Hello,

regarde dans la FAQ, c'est facile avec les API
http://access.developpez.com/faq/?pa...AffBoitEnregSs

[n.roussaly]

super! Merci.
Mea Culpa de pas avoir regardé correctement la FAQ...
Reste une question:
Pourquoi quand je lance la fonction telle qu'elle:

Code :

MsgBox EnregistrerUnFichier(0, "Enregistrer sous", Application.ActiveDocument.Name() & ".xls", "c:\ExportBO\")

elle fonctionne alors que quand je veux recuperer le path comme ceci:

Code :

1
2
3
 
Dim pathExport As String
pathExport = MsgBox EnregistrerUnFichier(0, "Enregistrer sous", Application.ActiveDocument.Name() & ".xls", "c:\ExportBO\")

J'ai une erreur:

Code :

attendu: fin d'instruction

J'aurais pas fait une betise?

[n.roussaly]

Ah bah si j'avais connement recopié l'exemple Muarf