Excel-powerpoint

[biker boy]

Is it possible to open a powerpoint show/presentation from excel?
I want to be able to open the show as part of a help file, if the user presses a button.

[Salvatore]

You can use this code to embed a powerpnt pres on the excel sheet. The user would need to double click. I think you may even be able to put this code into the CLICK event on a command button.

Tell me how it works.


Sub AutomatePwrPtObject()
'This procedure embeds a PowerPoint Show

Dim Wdapp As Object
Dim WdDoc As Object
Dim aShape As Shape

Application.StatusBar = "Embedding & Editing document..."
Application.ScreenUpdating = False

'Select the upper left cell
With Worksheets("Sheet1")
.Activate
.Cells(2, 1).Select
'create the new embedded document
Set aShape = .Shapes.AddOLEObject(FileName:="PATH TO YOUR POWERPOINT PRESENTATION", _
DisplayAsIcon:=True)
End With

'set references to Word application and embedded document
Set Wdapp = aShape.OLEFormat.Object.Application
Set WdDoc = aShape.OLEFormat.Object

WdDoc.Activate 'activates the embedded document


Application.ScreenUpdating = True
Application.StatusBar = False
End Sub

[Salvatore]

You can do something much simpler:

Create a command button and attach a hyperlink to the command button that will take the user to the presentation.


USUALLY SIMPLER IS BETTER

[biker boy]

Both ways worked a treat
Thanks V Much
K