how can i call macro in powerpoint file from excel file

hello

is there any possibility of launching macro in ppt from xls?

rgs

"pm" <pm@nie.mam> wrote in message news:dpmppm$gbt$1@atlantis.news.tpi.pl...
> hello
>
> is there any possibility of launching macro in ppt from xls?

Create a PowerPoint object and use the Run method on that object.

Howard Kaikow napisal:

> > is there any possibility of launching macro in ppt from xls?
>
> Create a PowerPoint object and use the Run method on that object.

could you help me with syntax?

Dim PPObj As Object
Set PPObj = CreateObject("PowerPoint.application")
With PPObj
.presentations.Add
.presentations.Open Filename:="F:\Analizy ISI\pl\prob.ppt"
.Visible = True

and how can i run module2 in prob.ppt, which is:

Sub UpdtAll()

Dim sld As Slide
Dim sh As Shape
For Each sld In ActivePresentation.Slides
For Each sh In sld.Shapes
If sh.Type = msoLinkedOLEObject Then
'update
sh.LinkFormat.Update
End If
Next sh
Next sld

End Sub

pm wrote:

> could you help me with syntax?

ech

i do it myself

Public Sub PPTPrint()
Dim PPObj As Object
Set PPObj = CreateObject("PowerPoint.application")
With PPObj
.presentations.Add
.presentations.Open Filename:="F:\Analizy ISI\pl\prob.ppt"
.Visible = True
.Run "Prob.ppt!UpdtAll"

and now: saving, printing, closing