52106
Oct 11, 2012
10129
3
0
VBA-Script für Druckschächte wählen in Word
Guten Tag,
ich benötige ein VBA-Script für Word 2010, wo man an einem beliebigen Drucker die Schächte für den Ausdruck einstellen kann.
Z. B. per UserForm sollte auszuwählen sein:
1. erste Seite: auf z. B. Schacht 1 oder 2
2. folge Seiten: auf z. B. Schacht 1 oder 2
hat jemand eine Idee oder kann mir behlflich sein?
Vielen Dank.
MFG
ich benötige ein VBA-Script für Word 2010, wo man an einem beliebigen Drucker die Schächte für den Ausdruck einstellen kann.
Z. B. per UserForm sollte auszuwählen sein:
1. erste Seite: auf z. B. Schacht 1 oder 2
2. folge Seiten: auf z. B. Schacht 1 oder 2
hat jemand eine Idee oder kann mir behlflich sein?
Vielen Dank.
MFG
Please also mark the comments that contributed to the solution of the article
Content-Key: 192617
Url: https://administrator.de/contentid/192617
Printed on: April 19, 2024 at 03:04 o'clock
3 Comments
Latest comment
Als Idee: Kannst du den Drucker nicht einfach doppelt einrichten? Zum Beispiel über den Umweg einer Freigabe.
Dann richtest du für beide eine jeweils andere Standardconfig mit dem entsprechendem Schacht ein.
Damit könntest du per Druckerauswahl das Fach entscheiden.
Und wenn es VBS sein muss, dann wählst du eben den Drucker per VBS aus.
Dann richtest du für beide eine jeweils andere Standardconfig mit dem entsprechendem Schacht ein.
Damit könntest du per Druckerauswahl das Fach entscheiden.
Und wenn es VBS sein muss, dann wählst du eben den Drucker per VBS aus.
Du könntest es auch über folgende Eigenschaften des Dokuments versuchen
Dabei gelten folgende mögliche Variablen:
wdPrinterAutomaticSheetFeed 7 Automatischer Papiereinzug.
wdPrinterDefaultBin 0 Standardschacht.
wdPrinterEnvelopeFeed 5 Briefumschlagzufuhr.
wdPrinterFormSource 15 Formularschacht.
wdPrinterLargeCapacityBin 11 Schacht für große Mengen.
wdPrinterLargeFormatBin 10 Schacht für große Formate.
wdPrinterLowerBin 2 Unterer Schacht.
wdPrinterManualEnvelopeFeed 6 Manuelle Briefumschlagzufuhr.
wdPrinterManualFeed 4 Manuelle Zufuhr.
wdPrinterMiddleBin 3 Mittlerer Schacht.
wdPrinterOnlyBin 1 Einziger Schacht des Druckers.
wdPrinterPaperCassette 14 Papierkassette.
wdPrinterSmallFormatBin 9 Schacht für kleine Formate.
wdPrinterTractorFeed 8 Traktoreinzug.
wdPrinterUpperBin 1 Oberer Schacht.
ActiveDocument.PageSetup.FirstPageTray = 2
ActiveDocument.PageSetup.OtherPagesTray = 0
Dabei gelten folgende mögliche Variablen:
wdPrinterAutomaticSheetFeed 7 Automatischer Papiereinzug.
wdPrinterDefaultBin 0 Standardschacht.
wdPrinterEnvelopeFeed 5 Briefumschlagzufuhr.
wdPrinterFormSource 15 Formularschacht.
wdPrinterLargeCapacityBin 11 Schacht für große Mengen.
wdPrinterLargeFormatBin 10 Schacht für große Formate.
wdPrinterLowerBin 2 Unterer Schacht.
wdPrinterManualEnvelopeFeed 6 Manuelle Briefumschlagzufuhr.
wdPrinterManualFeed 4 Manuelle Zufuhr.
wdPrinterMiddleBin 3 Mittlerer Schacht.
wdPrinterOnlyBin 1 Einziger Schacht des Druckers.
wdPrinterPaperCassette 14 Papierkassette.
wdPrinterSmallFormatBin 9 Schacht für kleine Formate.
wdPrinterTractorFeed 8 Traktoreinzug.
wdPrinterUpperBin 1 Oberer Schacht.
Das lässt sich auch einfach in den Seiteneigenschaften festlegen (Doppelklick neben das Lineal, oder Tab Seitenlayout auf den kleinen Pfeil neben "Seite einrichten" klicken, dann Tab Papier.
Dieses Script könnte Dir auch helfen:
http://www.vb-fun.de/vb/tipps/tip0067.shtml
Grüße Uwe
Dieses Script könnte Dir auch helfen:
http://www.vb-fun.de/vb/tipps/tip0067.shtml
Grüße Uwe