Word2002 und Druckerschacht über VBA

[Schaf]

Hallo,

ich habe ein Problem mit Word 2002.

Ich habe ein Worddokument, das von mir via VB-Makro gefüllt wird. U.a. lege ich dabei auch den Druckerschacht für das Dokument fest:

With ActiveDocument.PageSetup 'Damit immer auf Schacht 2 gedruckt wird

.FirstPageTray = 272

.OtherPagesTray = 272

End With

Das ganze funktioniert bei meinem Drucker auch wunderbar, das Dokument kommt immer auf dem 2. Schacht raus.

Jetzt hab ich das ganze auch mit anderen Druckern probiert und bei jedem passiert etwas anderes, entweder er druckt das ganze gar nicht oder auf einem beliebigen Schacht. Grund dafür ist, das der

.FirstPageTray bei den anderen Druckern nicht 272 sondern 251 oder 261 ist.

Kann mir jemand sagen wie ich diese Nummer für die jeweiligen Drucker zur Laufzeit rausbekomme? Oder hat jemand sogar ne bessere Idee wie ich den 2. Schacht als Standard definieren kann?

Danke für eure Hilfe

Grüße

Schaf

[Schaf]

Hallo,

hab ne Lösung gefunden. Manchmal muss man einfach mal drüber

schlafen.

Danke an alle die mitgegrübelt haben.

Grüße

Schaf

[Jemand]

und kannst du das auch anderen mitteilen?

suche das selbe für ms access