PrintTitleColumns Property Example
This example defines row three as the title row, and it defines columns one through three as the title columns.
Worksheets("Sheet1").Activate
ActiveSheet.PageSetup.PrintTitleRows = ActiveSheet.Rows(3).Address
ActiveSheet.PageSetup.PrintTitleColumns = _
ActiveSheet.Columns("A:C").Address