Papierfachwahl mit Excel via VBA

bin derzeit auf der Suche nach einem Skript, mittels dem ich das Papierfach eines Druckers auswählen kann und darauf drucken kann.
mit
"Application.Dialogs(xlDialogPrinterSetup).Show" hab ich es schon versucht... die Auswahl des Papierfaches soll automatisch erfolgen (beim öffnen des Dokumentes). In Word ist die ganze Sache trivial, da gibt es die Möglichkeit einem Dokument zu sagen von welchem Papierfach es gedruckt werden möchte..ich muss das ganze aber in Excel realisieren.

vielleicht hat das schonmal jemand gemacht... beim googeln bin ich auch nicht fündig geworden.

Grüsse Thomas