Dynamic Print Area converting to Static range

I am using the following formula in to define my Print Area:
=OFFSET('Price Book'!$A$1,0,0,MATCH(1,--('Price Book'!$A$1:$A$1503=""),0)-2,15)

The formula works correctly but it keeps converting to a static range, eg. $A1:$O300. It appears that it is the following VB code that I am using to set a header that is causing it as if I comment out the following lines of code the formula sticks.

Please Login or Register  to view this content.

Any suggestions on how to prevent this? Is there maybe a some VB code that I can execute after setting the page header to redefine the formula for the Print_Area range back to my original formula? I know that there is probably a way to set the print area using VB code rather than this OFFSET formula but I am fairly inexperienced with VB code.

Thanks,
Brandon

I forgot to mention that the formula stays in the Print_Area until I switch to another worksheet and then back to the worksheet in question. That is when the VB script above is called and results in the Print_Area formula changing from my dynamic formula to a static range.