ExcelBanter

ExcelBanter (https://www.excelbanter.com/)
-   Excel Programming (https://www.excelbanter.com/excel-programming/)
-   -   how can i call macro in powerpoint file from excel file (https://www.excelbanter.com/excel-programming/349754-how-can-i-call-macro-powerpoint-file-excel-file.html)

pm[_2_]

how can i call macro in powerpoint file from excel file
 
hello

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

rgs

Howard Kaikow

how can i call macro in powerpoint file from excel file
 
"pm" wrote in message ...
hello

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


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



pm[_2_]

how can i call macro in powerpoint file from excel file
 
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[_2_]

how can i call macro in powerpoint file from excel file
 
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


All times are GMT +1. The time now is 07:04 AM.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
ExcelBanter.com