Herbers Excel-Forum - das Archiv
Unterschiedliche Anzahl von Ausdrucken
Betrifft: Unterschiedliche Anzahl von Ausdrucken
von: KurtEnzian
Geschrieben am: 08.01.2007 15:13:21
Guten Tag allerseits,
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
Betrifft: AW: Unterschiedliche Anzahl von Ausdrucken
von: daniel Eisert
Geschrieben am: 08.01.2007 15:47:23
Hallo
da wirst du wohl ein kleines Makro schreiben müssen, daß dir die einzelnen Tabellenblätter entsprechend ausdruckt:
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
(Namen der Blätter ggf. noch anpassen)
Gruß, Daniel
Betrifft: AW: Unterschiedliche Anzahl von Ausdrucken
von: Wolfgang Krieg
Geschrieben am: 08.01.2007 16:32:49
Hallo Daniel,
hat super geklappt. Vielen Dank. KE