Gruppe
Druck
Bereich
Kopf/Fußzeile
Thema
Teilbereiche als Wiederholungszeilen anlegen
Problem
Die Zeilen 1:11 sollen unter Weglassung der Zeilen 5:6 als Wiederholungszeilen festgelegt werden.
Lösung
Geben Sie den Code in ein Standardmodul ein und weisen Sie ihn einer Schaltfläche zu.
StandardModule: Modul1
Sub PrintSheet()
With ActiveSheet
.PageSetup.PrintTitleRows = "$1:$11"
.Rows("5:6").Hidden = True
.PrintPreview
.Rows("5:6").Hidden = False
End With
End Sub