Titels afdrukken

[krkl]

Is het mogelijk om bij een afdruk van bijvoorbeeld 10 bladen bij de eerste 5 bladen een vaste titel afdruk te hebben en op de volgende 5 een andere vaste titel afdruk. De eerste vaste titel afdruk is regel 3 en voor de volgende 5 regels is dit regel 20.

Groeten,

Klaas

 

[Niels28]

bedoel zo iets?

Sub Printen()

    With ActiveSheet
        .PageSetup.PrintTitleRows = "$3:$3"
        .PrintOut From:=1, To:=5, Copies:=1
        .PageSetup.PrintTitleRows = "$20:$20"
        .PrintOut From:=5, Copies:=1
    End With
    
End Sub

Niels