Remplir une boite de dialogue avec une macro

[macroUser]

Bonjour,

Comment peut on remplir une boite de dialogue automatiquement lorsque celle ci prend la main sur la macro ?

Explication :

J'ai une macro VB excel qui s'execute normalmenent jusqu'au moment ou elle demande a l'utilisateur de saisir un non de fichier et de valider en apuyant sur OK.

Je voudrais que la macro remplisse la boite de dialogue et valide la saisie, mais je ne vois pas comment faire.

J'ai essayé d'utiliser SendKeys, mais SendKeys attends que la fenetre de dialogue se ferme avant de s'exectuer.

Comment faire 🙁

 

[JB]

- Salut MacroUser,

joins un exemple de ton fichier, ce sera plus facile pour les cracks du forum.

@+

JB

 

[macroUser]

voici la macro :

Sub Macro1()
Application.ActivePrinter = "SVGmaker sur LPT1:"
ActiveWindow.SelectedSheets.PrintOut Copies:=1, ActivePrinter:="SVGmaker sur LPT1:", Collate:=True
End Sub


SVGmaker sur LPT1: est une imprimante qui créé un fichier SVG.
Lorsque j'imprime de cette façon, une fenetre de dialogue s'ouvre pour me demander le chemin ou je veux enregistrer mon svg.
Malheureusement je ne peux pas utiliser les option:
PrintToFile:=True, PrToFileName:monChemin


PS : Pour simuler ma macro Macro1 sans utiliser l'imprimante SVGmaker sur LPT1, il suffit de faire :

ActiveWindow.SelectedSheets.PrintOut Copies:=1, ActivePrinter:="SVGmaker sur LPT1:", Collate:=True, PrintToFile:=True

merci