aus einer Arbeitsmappe möchte ich von Tabellblatt 1 fünf Ausdrucke, von Tabellenblatt 2 vier Ausdrucke und von Rest nur einen Ausdruck. Kann ich das irgenwo voreinstellen um nicht jedes mal einzel anzuklicken.
Vielen Dank
KE
Sub Alles_Drucken()
Dim SH As Worksheet
For Each SH In ActiveWorkbook.Sheets
Select Case SH.Name
Case "Tabelle1"
SH.PrintOut copies:=4
Case "Tabelle2"
SH.PrintOut copies:=5
Case Else
SH.PrintOut copies:=1
End Select
Next
End Sub