in reply to Re^2: Excel saving as PDF as 1 page
in thread Excel saving as PDF as 1 page

try 
use Win32::OLE qw(with);
use Win32::OLE::Variant;


my $vtfalse =  Variant(VT_BOOL, 0);  
my $vtpages =  Variant(VT_I4, 1);  
with ($sheet->PageSetup,
  'Zoom'           => $vtfalse,
  'FitToPagesWide' => $vtpages,
  'FitToPagesTall' => $vtpages );

[download]
poj

Replies are listed 'Best First'.
Re^4: Excel saving as PDF as 1 page
by merrymonk (Hermit) on Oct 25, 2015 at 09:22 UTC
    Brilliant. That works just as I wanted it to. Thank you for your help. It was good to find it first thing this morning.
[reply]

In Section Seekers of Perl Wisdom