Hallo,
ich bin nicht so fit in Excel und VBA, möchte aber in einer Tabelle eine Schaltfläche erstellen, die beim Klicken die Tabelle druckt.
Ich würde gerne einen bestimmten Drucker ansprechen und die Tabelle zweimal drucken.
Kann mir da jemand helfen.
LG Erika
ich bin nicht so fit in Excel und VBA, möchte aber in einer
Tabelle eine Schaltfläche erstellen, die beim Klicken die
Tabelle druckt.
Ich würde gerne einen bestimmten Drucker ansprechen und die
Tabelle zweimal drucken.
hallo Erika,
wähle erst mal im Druckermenü von Excel den gewünschten Drucker aus.
Dann laß erst mal das untere Makro laufen, dann hast du in H1, kannst ja die Zelle ändern, den Druckernamen, der sieht dann so ähnlich aus:
HP DeskJet 600 (Monochrome) auf LPT1:
Das fügst du im oberen Makro anstatt von xyz ein.
Sub Drucken()
Dim Merker As String
Merker = Application.ActivePrinter
Application.ActivePrinter = „xyz“
ActiveSheet.PrintOut copies:=2
Application.ActivePrinter = Merker
End Sub
’
Sub Druckernamen()
[H1] = Application.ActivePrinter
End Sub
Gruß
Reinhard