Top-Themen

AppleEntwicklungHardwareInternetLinuxMicrosoftMultimediaNetzwerkeOff TopicSicherheitSonstige SystemeVirtualisierungWeiterbildungZusammenarbeit

Aktuelle Themen

Administrator.de FeedbackApache ServerAppleAssemblerAudioAusbildungAuslandBackupBasicBatch & ShellBenchmarksBibliotheken & ToolkitsBlogsCloud-DiensteClusterCMSCPU, RAM, MainboardsCSSC und C++DatenbankenDatenschutzDebianDigitiales FernsehenDNSDrucker und ScannerDSL, VDSLE-BooksE-BusinessE-MailEntwicklungErkennung und -AbwehrExchange ServerFestplatten, SSD, RaidFirewallFlatratesGoogle AndroidGrafikGrafikkarten & MonitoreGroupwareHardwareHosting & HousingHTMLHumor (lol)Hyper-VIconsIDE & EditorenInformationsdiensteInstallationInstant MessagingInternetInternet DomäneniOSISDN & AnaloganschlüsseiTunesJavaJavaScriptKiXtartKVMLAN, WAN, WirelessLinuxLinux DesktopLinux NetzwerkLinux ToolsLinux UserverwaltungLizenzierungMac OS XMicrosoftMicrosoft OfficeMikroTik RouterOSMonitoringMultimediaMultimedia & ZubehörNetzwerkeNetzwerkgrundlagenNetzwerkmanagementNetzwerkprotokolleNotebook & ZubehörNovell NetwareOff TopicOpenOffice, LibreOfficeOutlook & MailPapierkorbPascal und DelphiPeripheriegerätePerlPHPPythonRechtliche FragenRedHat, CentOS, FedoraRouter & RoutingSambaSAN, NAS, DASSchriftartenSchulung & TrainingSEOServerServer-HardwareSicherheitSicherheits-ToolsSicherheitsgrundlagenSolarisSonstige SystemeSoziale NetzwerkeSpeicherkartenStudentenjobs & PraktikumSuche ProjektpartnerSuseSwitche und HubsTipps & TricksTK-Netze & GeräteUbuntuUMTS, EDGE & GPRSUtilitiesVB for ApplicationsVerschlüsselung & ZertifikateVideo & StreamingViren und TrojanerVirtualisierungVisual StudioVmwareVoice over IPWebbrowserWebentwicklungWeiterbildungWindows 7Windows 8Windows 10Windows InstallationWindows MobileWindows NetzwerkWindows ServerWindows SystemdateienWindows ToolsWindows UpdateWindows UserverwaltungWindows VistaWindows XPXenserverXMLZusammenarbeit
GELÖST

VBA-Script für Druckschächte wählen in Word

Frage Entwicklung VB for Applications

Mitglied: 52106

52106 (Level 1)

11.10.2012 um 11:29 Uhr, 6302 Aufrufe, 3 Kommentare

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.

Mit freundlichen Grüßen

Mitglied: Gilneas
11.10.2012 um 13:08 Uhr
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.
Bitte warten ..
Mitglied: colinardo
11.10.2012, aktualisiert um 13:24 Uhr
Du könntest es auch über folgende Eigenschaften des Dokuments versuchen

01.
ActiveDocument.PageSetup.FirstPageTray = 2 
02.
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.
Bitte warten ..
Mitglied: colinardo
11.10.2012 um 14:32 Uhr
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
Bitte warten ..
Neuester Wissensbeitrag
Windows 10

Powershell 5 BSOD

(1)

Tipp von agowa338 zum Thema Windows 10 ...

Ähnliche Inhalte
VB for Applications
Powershell Script aus VBA heraus ausführen (2)

Frage von mcnico1978 zum Thema VB for Applications ...

Microsoft Office
gelöst SharePoint, Word, Excel. Auslesen mittels VBA und XML (10)

Frage von schwazza zum Thema Microsoft Office ...

Microsoft Office
gelöst VBA Word IBAN zerschneiden (8)

Frage von InSpee zum Thema Microsoft Office ...

Windows 7
Microsoft Word - Anzeigefehler bei Scrollen

Frage von heisenberg4 zum Thema Windows 7 ...

Heiß diskutierte Inhalte
Windows Userverwaltung
Ausgeschiedene Mitarbeiter im Unternehmen - was tun mit den AD Konten? (34)

Frage von patz223 zum Thema Windows Userverwaltung ...

LAN, WAN, Wireless
gelöst Server erkennt Client nicht wenn er ausserhalb des DHCP Pools liegt (28)

Frage von Mar-west zum Thema LAN, WAN, Wireless ...

Windows Server
Server 2008R2 startet nicht mehr (Bad Patch 0xa) (18)

Frage von Haures zum Thema Windows Server ...