Hey all,
I've created a PowerPoint template (.pot) file for my clients to use if they need to create a corporate presentation. Here we use MS Word as a main conduit to all our word (.dot) templates and alike, I'm trying to add my new template with the others on a form in Word but to no success, I'm created the below code but it keep throwing a wobbly "RT Error 91 - ob variable or with block variable not set"
Any Help would be greatly appreciated
Code:Sub cmd_showpowerpoint_Click() Dim ppt As Object Dim MyappID As String ppt.Presentations.Open FileName:="k:\zprecedents\dls.pot", Untitled:=msoTrue MyappID = Shell("C:\Program Files\Microsoft Office\Office\POWERPNT.EXE", 1) 'Run Microsoft Powerpoint FileSystem.ChDir "K:\" Set ppt = CreateObject("powerpoint.application") Set ppt = Nothing End Sub




Reply With Quote