I have this code in excel…
Sub ppt_drivers()
Dim pptApp As Object
Dim pptPres As Object
Dim pptFile As String
Set pptApp = New PowerPoint.Application
pptApp.Visible = True
Set pptPres = pptApp.Presentations.Open(“c:test.ppt”)
pptPres.UpdateLinks
‘break links
pptFile = InputBox(“Filename “)
With pptPres
.SaveAs Filename:=”c:” & pptFile
.Close
End With
pptApp.Quit
Set pptPres = Nothing
End Sub
From Excel I open a ppt file and update the links between Excel and ppt. The trouble is that i don’t know the code to break the links after they are updated. Does anyone know the code to make that happen. thanks
