"Print Area" setup limit?

[taki]

G'morning.....

Is there a limit to how many "print areas" can be set? I wanted to set one for every week in my sheet, that is 33 of them, but the macro would not continue past 18. That's what I finally settled for. Below is a sample of macro I used;

Range("A1:U24").Select
ActiveSheet.PageSetup.Printarea =
"$A$1:$U$24,$A$26:$U$49,$A$51:$U$74,
$A$76:$U$99,$A$101:$U$124,$A$126:$U$149,
$A$151:$U$174,$A$176:$U$199,$A$201:$U$224,
$A$226:$U$249,$A$251:$U$274,$A$276:$U$299,
$A$301:$U$324,$A$326:$U$349,$A$351:$U$374,
$A$376:$U$399,$A$401:$U$424,$A$426:$U$449,
$A$451:$U$474,$A$476:$U$499,$A$501:$U$524,
$A$526:$U$549,$A$551:$U$574,$A$576:$U$599,
$A$601:$U$624,$A$626:$U$649,$A$651:$U$674,
$A$676:$U$699"

 

[Andrew Poulsom]

There's probably a limit to the number of noncontiguous ranges or the number of characters in the formula.

Wouldn't it be easier to just hide rows 25, 50, 75 etc and include all the rows in your Print_Area?