http://www.perlmonks.org?node_id=162889

Lando has asked for the wisdom of the Perl Monks concerning the following question:

I am attempting to setup a Data Warehouse reporting piece that works on the web and writes to an Excel Spreadsheet (for formatting reasons). I have a script that works wonderfully EXCEPT it refuses to allow me to change any PageSetup items like Header, Footer, etc. The script runs fine on my WinXP IIS web, but NOT on my Win2000 web. If I remove the following section, the script runs. If I add it, I get this error: Unable to set the FitToPagesWide property of the PageSetup class
Win32::OLE(0.1502) error 0x80020009: "Exception occurred" in PROPERTYPUT "FitToPagesWide" at D:/Perl/site/lib/Win32/OLE/Lite +.pm line 201
Here's the actual code snippet -- fairly straightforward OLE code,I think. Thoughts anyone? Even for a Win32 heretic?
with ($Sheet->PageSetup, 'FitToPagesWide'=>1, 'PrintGridlines'=>0, 'LeftHeader'=> "REPORT #DW2009A\rSummary Place of Service", 'CenterHeader' => "Empty", 'RightHeader' => "Test Report", 'LeftFooter' => "Done", 'CenterFooter' => "Now", 'Orientation' => xlLandscape, 'RightFooter' => "OK", 'PrintHeadings'=>0, 'FirstPageNumber'=> xlAutomatic, 'PrintTitleRows' => "1:1");