Office: (Office 2013) Wiederholungszeilen auf Folgeseiten ausblenden Excel2013

Hallo,

folgendes Problem habe ich:
Auf der ersten Seite habe ich die Wiederholungszeilen $1$32
Beim Ausdrucken sollen diese nur auf der Seite 1 zu sehen sein,
ab der Seite 2 sollen die Zeilen 12 bis 31 ausgeblendet werden
Folgendes Makro habe ich gefunden (funktioniert aber nicht) bzw. gebastelt
Sub Ausdruck()
Dim A As Integer
For A = 1 To 2

Tabelle1.Cells.EntireRow.Hidden = False

'Zeilen die beim zweiten Ausdruck ausgeblendet werden sollen
If A = 2 Then Range("12:31").EntireRow.Hidden = True

'hier die entsprechende Seite anpassen
'1, 1 ist Seite 1 bis 1
Tabelle1.PrintOut 1, 1

Next A
Tabelle1.Cells.EntireRow.Hidden = False
End Sub


Vielleicht hat jemand eine Lösung für mich!?
Vielen Dank!

 

Lösung

Makro funktioniert! Mein Fehler, hab es über Datei/Drucken probiert, muss aber das Makro ausführen. *anfängerfehler