Also, can you check to see if the activesheet.name is what you expect it to be?
--
HTH,
Barb Reinhardt



"Richard J. Snee" wrote:

With ActiveSheet.PageSetup
.PrintTitleRows = "$101:$105" 'macro ends here
.PrintTitleColumns = ""
End With

"Richard J. Snee" wrote:

Macro terminates early without error message. This has occured several times
in code that was working literally for years. If I trace the execution in
Debug mode the macro just ends short. No errors. On error resume next has no
effect. On error goto 0 has no effect.