Hi,
ich habe hinter einen Button ein Makro hinterlegt, das mir von 16 Tabellenblättern nur das zweite ausdruckt:
Sub Nur_Messprotokolle_drucken()
Dim SH%, i%
SH = ActiveWorkbook.Sheets.Count
For i = 1 To SH
Select Case i
Case 1, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16
'mach ni...