Live-Forum - Die aktuellen Beiträge
Datum
Titel
24.10.2025 11:47:33
Shape auf 1 cm und in Zelle zentriert. Code kürzen
24.10.2025 09:22:50
Filter aktualisieren bei Blattaufruf
24.10.2025 09:06:52
Zählenwenn
23.10.2025 22:02:44
Warum NV bei meiner Rang Formel?
Keine passende Antwort im Forumarchiv gefunden?
Stelle deine Frage im Live-Forum
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1296to1300
1296to1300
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Drucken auf 2 druckern

Forumthread: Drucken auf 2 druckern

Drucken auf 2 druckern
03.02.2013 15:21:29
Jean-Pierre
Hallo zusammen,
ich habe ein Formular welches ich gerne, nach dem Ausfüllen, per Knopfdruck gleichzeitig auf zwei Druckern ausdrucken möchte.
Bei Drucker 1 handelt es sich um einen HP Tintenstrahler.
Bei Drucker 2 handelt es sich um einen speziellen PDF Drucker.
Ist dies mittels VBA möglich, wenn ja wie?
Da ich in VBA eine absolute Niete bin, wäre eine "Step-by-Step" Anleitung schön.
Ich bedanke mich jetzt schon für Eure Hilfe und wünsche allen einen schönen "Rest-"Sonntag.
Mit freundlichen Grüßen
Jean-Pierre Muller

Anzeige

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Drucken auf 2 druckern
03.02.2013 15:23:04
Hajo_Zi
Hallo Jean-Piere,
benutze den Makrorecorder.

AW: Drucken auf 2 druckern
03.02.2013 18:31:06
Jean-Pierre
Hallo Hajo,
habe nun diesen Code mit dem Makrorecorder aufgezeichnet: 

Sub Drucken_auf_zwei_Drucker()
' Drucken_auf_zwei_Drucker Makro
' Makro am 03.02.2013 von * aufgezeichnet
Application.ActivePrinter = "HP Photosmart C7200 series auf Ne04:"
ActiveWindow.SelectedSheets.PrintOut Copies:=1, ActivePrinter:= _
"HP Photosmart C7200 series auf Ne04:", Collate:=True
Application.ActivePrinter = "PDF Druck auf FPP3:"
ActiveWindow.SelectedSheets.PrintOut Copies:=1, ActivePrinter:= _
"PDF Druck auf FPP3:"
End Sub
Wie kann ich denn jetzt eine Schaltfläche in das Formular einbauen, dass ich nur noch drauf klicken brauche?
Mit freundlichen Grüßen
Jean-Pierre

Anzeige
AW: Drucken auf 2 druckern
03.02.2013 18:34:47
Hajo_Zi
Hallo Jean-Piere,
von einer Userform war bisher nicht die Rede. Wähle in Werkzeugsammlung den CommanButton, ziehe _ ihn in der Userform auf, Doppelklick drauf und dahin den Code kopieren ohne 

Sub und End Sub
Gruß Hajo

Anzeige
Danke Hajo!
03.02.2013 19:06:56
Jean-Pierre
Hallo Hajo,
vielen Dank hat nach ein paar Anläufen (VBA Dummy) nun geklappt :-)
Mit freundlichen Grüßen
Jean-Pierre
;

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige