Unlock a world of possibilities! Login now and discover the exclusive benefits awaiting you.
Hi everyone,
i created a Macro on QV 11 in order to export my dashboard to PPT charts.
Everything worked with Office 2010. Once i updated to Office 2013 the macro stops on the highlighted commands. If i comment it everything works (but i'm not able to position the images in the right way).
Can you please help me?
Sub ExportPPT
Set objPPT = CreateObject("PowerPoint.Application")
objPPT.Visible = True
Set objPresentation = objPPT.Presentations.Open("C:\XXXXXXstica.ppt")
Set PPSlide = objPresentation.Slides(4)
ActiveDocument.GetSheetObject("CH06").CopyBitmapToClipboard
With PPSlide.Shapes.Paste
.IncrementLeft 130
.IncrementTop -60
.ScaleHeight 1.1, msoTrue
.ScaleWidth 1.1, msoTrue
end with
Try it without Increment only with left/top ...
- Marcus
Thank you Marcus, but i have the same issue.
The script stops at the Left command..
Maybe this is helpful: http://answers.microsoft.com/en-us/office/forum/office_2013_release-powerpoint/vba-to-move-objects-i...
- Marcus