Thanks for the links. I still am having problems getting off the dime. I'm running the following code which opens Powerpoint, but goes no further:
I made the following ppt macro and am trying to convert it to Perl:use Win32::OLE; use Cwd; use File::Copy; $cwd = cwd(); $input = 'input.xls'; $input_file = "$cwd\\Metrics_Data.txt"; copy ("Template1.xls", "$input"); print "Template file is: $template1\n\n"; print "Input file is: $input\n\n"; open INPUT_FILE, $input || die "No file\n"; $PptApp = Win32::OLE->new ('Powerpoint.Application'); $PptApp->{Visible} = 1; $PpptApp = Presentations(Presentation1)->Open("$input"), ReadOnly ->Tr +ue;
If you have any sample code to get me over the initial hump, I'll be flying...Sub Open_Slide() ' ' Macro recorded 9/8/2001 by William T. Smith ' Presentations.Add WithWindow:=msoTrue ActiveWindow.View.GotoSlide Index:=ActivePresentation.Slides.Add(I +ndex:=1, Layout:=ppLayoutBlank).SlideIndex End Sub
Bill
In reply to Re: Re: Powerpoint OLE
by smithwt
in thread Powerpoint OLE
by smithwt
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |