Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender

Forumthread: Direktdruck über CommandButton

Direktdruck über CommandButton
26.04.2013 15:07:14
Dirk
Hallo zusammen,
ich habe folgende Problematik :
In meinem Netzwerk befinden sich mehrere Drucker.
Nun möchte ich über einen CommandButton erreichen,
daß das erste Druckexemplar z. B. auf Drucker A Fach 2
und das zweite Druckexemplar auf Drucker B Fach 1
ausgedruckt wird. Nach dem Ausdruck soll automatisch
wieder der Standard-Drucker aktiviert werden.
Grüße
Dirk

Anzeige

1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Direktdruck über CommandButton
26.04.2013 16:12:22
Hajo_Zi
Hallo Dirk,
mache es noch folgendem Prinzip.

Option Explicit
Sub Faxen()
Dim savPrinter As String
savPrinter = ActivePrinter      ' aktuellen Drucker auslesen
ActivePrinter = "WinFax Pro 9.0"    ' anderen Drucker einstellen
ActiveSheet.PrintOut
ActivePrinter = savPrinter              ' Drucker wieder zurückstellen
End Sub

Anzeige
;

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige