Tek-Tips is the largest IT community on the Internet today!

Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!

  • Congratulations Chris Miller on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!

Pushing Office docs to HTML with VBcode

Status
Not open for further replies.

drcab

Programmer
Nov 16, 2000
32
US
I am trying to open a PowerPoint Doc from within VBA(behind excel). From there I want to save the PowerPoint to a HTML doc. All is working until I hit this code


Set wdApp = CreateObject("PowerPoint.Application")
With wdApp
.Visible = True
.presentations.Open MyFile_PPT
retval = Dir$(MyFile_PPT_HTML)
If retval = "personnel_ppt.html" Then
Kill MyFile_PPT_HTML
End If
.presentations.SaveAs MyFile_PPT_HTML
End With

The last line before the End With is what is giving me an unsupported method. Any ideas?? Ideally I would like to run this behind the scenes (this process is being fired off before the Excel Doc is closed(before close event))

Tanks
 
Status
Not open for further replies.

Part and Inventory Search

Sponsor

Back
Top