PowerPoint Vrknüpfunge aktualisieren MACRO
11.07.2004 15:47:19
Anja
ich habe eine frage....
ich habe ein Macro geschrieben, aber das problem ist, die Verknüpfunge werden nicht automatisch aktualisiert, und das ist sehr sehr schlecht,
ich möchte gerne, dass beim Öffnen dieser PP-Datei die Verknüofungen automatisch aktualisiert werden.... kann mir jaemand helfen:
Sub PowerPointStarten()
Dim ppApp As Object
Dim ppP As Object
Dim sFile As String
sFile = ThisWorkbook.Path & "\POWER_POINT_KPI\KPI.ppt"
If Dir(sFile) = "" Then
Beep
MsgBox "Die Datei " & sFile & " existiert nicht!"
Exit Sub
End If
Set ppApp = CreateObject("PowerPoint.Application")
ppApp.Visible = msoTrue
Set ppP = ppApp.Presentations.Open(sFile)
ppP.SlideShowSettings.Run
' ppApp.Quit
Set ppP = Nothing
Set ppApp = Nothing
End Sub
Viele Grüße
Anja