Help for this page

Select Code to Download

Select or download this

    With ActiveSheet.PageSetup
        .PrintTitleRows = "$1:$10"
...
        .FirstPage.CenterFooter.Text = ""
        .FirstPage.RightFooter.Text = ""
    End With

Select or download this

$sheet->PageSetup -> {PrintTitleRows} = "$1:$10";  
$sheet->PageSetup -> {PrintTitleColumns} = "";