Macro to setup Rows to Repeat at the Top

[Steven]

I would like to create a macro to setup Rows to Repeat at the Top based on
the current rows selected. ie I would just select the rows and I plan on
using a menu bar macro button to run the macro. Therefore the macro needs to
know to use the currently selected rows to use as the rows to repeat at the
top.

I tried something like:

With ActiveSheet.PageSetup
.PrintTitleRows = Selection.Rows
End With

but thats not it. It returns an error.

Thank you for your help,


Steven

 

[Joel]

With ActiveSheet.PageSetup
.PrintTitleRows = "$1:$2"
End With

 

[JP]

With ActiveSheet.PageSetup
.PrintTitleRows = Selection.Areas(1).Address
End With

 

[Steven]

That is not what I am looking for. That works if I want row 1 and 2. But I
want to go with the current selection top row and bottom row because it will
not always be row 1 and 2 that I want to repeat. I want to use the current
rows selected.

Thanks,

Steven

 

[Steven]

Great, Thank you.

With ActiveSheet.PageSetup
.PrintTitleRows = Selection.Areas(1).Address
End With

 

[JP]

Who are you talking to?

Mine works no matter how many rows you select.

With ActiveSheet.PageSetup
.PrintTitleRows = Selection.Areas(1).Address
End With


--JP