Gruppe
Druck
Bereich
Seite
Thema
Druckseiten und Anzahl der Ausdrucke über UserForm festlegen
Problem
Wie kann ich die zu druckenden Seiten und die Anzahl der Ausdrucke über einen UserForm-Dialog festlegen?
Lösung
Geben Sie den nachfolgenden Code in ein Standardmodul ein und weisen Sie ihn einer Schaltfläche zu.
StandardModule: modMain
Sub CallForm()
frmDrucken.Show
End Sub
ClassModule: frmDrucken
Private Sub cmdAbbrechen_Click()
Unload Me
End Sub
Private Sub cmdDrucken_Click()
ActiveSheet.PrintOut _
From:=CInt(txtFrom.Text), _
To:=CInt(txtTo.Text), _
Copies:=CInt(txtCopies.Text)
Unload Me
End Sub