Ansprechen von Druckern
31.08.2007 16:18:00
Druckern
für die Abrechnung von diversen Dienstleistungen habe ich einer Kollegin eine Datei erstellt, bei der unter anderem ein Leistungsnachweis ausgedruckt wird, und zwar einmal bei ihr in der Niederlassung und einmal
bei mir in der Zentrale. Leider gibt es bei folgendem Code immer wieder Probleme:
(.....)
'Drucker in Zentrale
Application.ActivePrinter = "\\sdeme25\Xerox-WC128-4L auf Ne02:"
Sheets("LNi").PrintOut Copies:=1, ActivePrinter:= _
"\\sdeme25\Xerox-WC128-4L auf Ne02:", Collate:=True
'Drucker in Niederlassung
Application.ActivePrinter = "\\sdese13\GWS-D152XeroxC-Schulung auf Ne03:"
Sheets("LNi").PrintOut Copies:=1, ActivePrinter:= _
"\\sdese13\GWS-D152XeroxC-Schulung auf Ne03:", Collate:=True
(.....)
weil sich offensichtlich die Reihenfolge der Drucker (durch "auf Ne02/Ne03" bezeichnet) ändert - warum auch immer. Gibt es für meine Codierung denn nun andere Lösungen, z.B. den Standarddrucker anzusprechen? Nur wie macht man das?
Vielen Dank für Eure Tipps.
Gruß und schönes WE
Torsten