Hallo,

wer kann einen reiferen, unerfahrenen VBA Anwender weiterhelfen? :-) in aller kürze was ich gerne machen möchte: Beim starten einer Präsentation soll ein Makro eine Excelverknüpfung aktualiseren und dann die Präsentation ablaufen lassen (mit Addin). Das hab ich auch so weit hin bekommen, allerdings habe ich das Problem, dass die Präsentation im Hintergrund läuft und Powerpoint im Vordergrund ist. Anbei mein Ansatz:

Sub Auto_Open()
    Dim osld As Slide
     Dim oshp As Shape
     For Each osld In ActivePresentation.Slides
     For Each oshp In osld.Shapes
         If oshp.Type = msoLinkedOLEObject Then
             oshp.LinkFormat.Update
         End If
         Next oshp
     Next osld
    ActivePresentation.Save
    ActivePresentation.SlideShowSettings.Run
    WindowState = pptmWindowMinimized
End Sub

 WindowState = pptmWindowMinimized tut also nicht das was es soll! Alternativ habe ich auch SendKeys ("%{TAB}")  und sendkeys {F5} probiert, funktioniert beides auch nicht!

Hat jemand einen Tip für mich?

Besten Dank im Voraus

Markus