Dear Wayne,
Wouldn't it be sufficient to know how to insert a picture file into PowerPoint
via rcom?
The following VBA code does that:
' VBA PowerPoint
Sub InsertGraphicOnSlide()
Dim ppApp As PowerPoint.Application
Dim ppPres As PowerPoint.Presentation
Dim ppShape As PowerPoint.Shape
Dim ppCurrentSlide As PowerPoint.Slide
Set ppApp = CreateObject("PowerPoint.Application")
ppApp.Visible = True
Set ppPres = ppApp.Presentations.Add(msoTrue)
Set ppCurrentSlide = ppPres.Slides.Add(Index:=1, _
Layout:=ppLayoutBlank)
With ppCurrentSlide.Shapes
' Adds a picture to slide 1 in the active presentation.
Set oPicture = .AddPicture("C:\Temp\test.jpg", _
msoFalse, msoTrue, 0.5, 0.5, 1, 1)
' Now scale the image
oPicture.ScaleHeight 1, msoTrue
oPicture.ScaleWidth 1, msoTrue
End With
End Sub
Unfortunately I do not know how to translate this into rcom, but it should be
something like:
library(rcom)
ppt <- comCreateObject("PowerPoint.Application")
shape <- comCreateObject("PowerPoint.Shape")
pres <- comInvoke(comGetProperty(ppt,"Presentations"),"Add")
slide <- comInvoke(comGetProperty(pres,"Slides"),"Add",1,2)
# along the lines, but does not work
shape <-
comSetProperty(comInvoke(comGetProperty(slide,"Shapes"),"AddPicture"),
"C:\\Test\\test.jpg", "msoFalse", "msoTrue", 0.5, 0.5, 1, 1)
comSetProperty(comGetProperty(shape, "ScaleHeight"), 1, "msoTrue")
comSetProperty(comGetProperty(shape, "ScaleWidth"), 1, "msoTrue")
comSetProperty(ppt,"Visible",TRUE)
Kind regards,
Markus
From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] On Behalf Of [EMAIL PROTECTED]
Sent: 19 November 2007 12:14
To: rcom-l@mailman.csd.univie.ac.at
Subject: [Rcom-l] Example exporting R graph to Powerpoint
Hi everyone,
Im trying to learn more about using rcom to generate powerpoint presenatations.
I have found a few examples on how to do some basic stuff:
http://mailman.csd.univie.ac.at/pipermail/rcom-l/2006-December/001363.html
http://www.mf.uni-lj.si/ibmi/biostat-center/gradiva/Lajovic_pptizr.html
http://sunsite.univie.ac.at/rcom/download/deprecated/rexcel.pdf
Does anyone have an example of directly exporting an R graph into Powerpoint
using rcom?
Regards,
Wayne
----------------------------------------------------------------------------------------
Wayne Jones
Statistical Consultant
Shell Global Solutions (UK)
Shell Technology Centre Thornton, P.O. Box 1, Chester CH1 3SH, United Kingdom
Tel: +44 (0) 151 373 5977
Fax: +44 (0) 151 373 5384
Mobile: +44 (0) 7896 536026
Email: [EMAIL PROTECTED]
Internet: www.shell.com/globalsolutions/statisticsandchemometrics
Shell Global Solutions (UK) is a division of Shell Research Limited which has
its Registered Office at Shell Centre, London SE1 7NA and is registered in
England & Wales with No.539964.
This message is intended for the personal and confidential use for the
designated recipient(s) named above. If you are not the intended recipient of
this message you are hereby notified that any review, dissemination,
distribution or copying of this message is strictly prohibited. This
communication is for information purposes only and should not be regarded as an
offer to sell or as a solicitation of an offer to buy any financial product, an
official confirmation of any transaction or as an official statement of Libero
Ventures Ltd. Email transmissions cannot be guaranteed to be secure or
error-free. Therefore we do not represent that this information is complete or
accurate and it should not be relied upon as such. All information is subject
to change without notice.
_______________________________________________
Rcom-l mailing list
Rcom-l@mailman.csd.univie.ac.at
http://mailman.csd.univie.ac.at/mailman/listinfo/rcom-l
More information (including a Wiki) at http://rcom.univie.ac.at
