Powerpoint Makro mit Ereignis App_SlideShowEnd wird gar nicht ausgeführt.

Ich setze das Produkt Office 360 Prenium und es geht um Powerpoint. Eingesetzter Rechner MS Windows 7 Prof. Leider funktioniert der Code gar nicht wenn ich das Ereignis SlideShowEnd behandle - leider bekomme ich auch keine Fehler Meldung, Makro Sicherheit
ist deaktiviert. Ein VBA-Modul ist vorhanden, sowie ein entsprechendes Klassenmodul für die Ereignisse. Der gleiche Code eingesetzt auf einem anderen REchner mit Powerpoint 2013 funktioniert problemlos. Woran kann es liegen das ich keine Fehlermeldung bekomme
und der VBA-Code nicht läuft., aber der gleiche Code auf einen anderen Rechner mit Office 2013 arbeitet? Gibt es eine Möglichkeit nach der Ursache zu suchen?

Vielen Dank im Voraus.

Hallo Agentur Özel,

da sich dein Problem auf VBAs/Makros bezieht, empfehle ich dir unseren
MSDN-Forum zu kontaktieren. Diese ist unsere Support-Plattform für Entwickler, hier wird das Thema täglich unterstützt und besprochen.

Liebe Grüße

Hallo,

mit "VBA-Modul" meinen Sie vermutlich die Initialisierungsroutine für die Ereignisse des Application-Objekts. Sie ist nicht selbsstartend, da PowerPoint keine AutoOpen-Makros kennt. Ein automatischer Start ist nur per AddInn oder über eine Verknüpfung möglich.
Beides wird nicht „mitgenommen“, wenn die PP-Datei auf einem anderen Rechner ausgeführt wird. Sie können die Initialisierungs-Prozedur aber testweise manuell ausführen. Gehen Sie im Bearbeitungsmodus auf "Ansicht/Makros". Darin muss sich eine Prozedur befinden,
die Initialisize_App oder so ähnlich lautet.

Sub InitializeApp()

Set X.App = Application

End Sub

Führen Sie diese Prozedur einmal aus. Es geschieht scheinbar nichts und es gibt auch keine Erfolgs- bzw. Fehlermeldung wenn der Verweis auf das Klassenmodul korrekt ist. In Wahrheit ist jedoch im Hintergrund sehr viel passiert, denn jetzt
sind die Ereignisse des Application-Objekts „scharf“ geschaltet. Was Sie dann im Präsentationsmodus leicht überprüfen können.

Zuvor das Klassenmodul ggf. mit weiteren Ereignissen ergänzen.

Public WithEvents App As Application

Private Sub App_SlideShowBegin(ByVal Wn As SlideShowWindow)

MsgBox "Die Präsentation wurde gestartet"

End Sub

Private Sub App_SlideShowEnd(ByVal Pres As Presentation)

'Hinweis: Tritt auch bei Abbruch vor dem eigentlichen Ende der Präsentation ein.

MsgBox "Abgebrochen!"

End Sub

Private Sub App_SlideShowNextSlide(ByVal Wn As SlideShowWindow)

MsgBox "Die nächste Folie wurde aufgerufen"

End Sub

Sollte keines der Ereignisse „anschlagen“, liegt vermutlich ein Fehler in der Office- bzw. PowerPoint-Installation vor. Das sollte dann in anderen Office-Progammen noch genauer überprüft werden bevor eine Reparatur versucht wird. Ein Programmierfehler ist
eher auszuschließen aber nicht ganz, denn es könnte auf Grund der ständigen Weiterentwicklung von VBA eine Inkompatibilität zwischen den Programmversionen vorliegen. In dem Fall kann ich leider nicht weiterhelfen, da mir die aktuellen Änderungen in Office
365 nicht bekannt sind.

Mit freundlichen Grüßen an die Agentur

Hallo Daniel,

Ich habe die Formularfelder konventionell erstellt und möchte etwas mehr erfahren, ob ich z.B. über die Makroschaltfläche was machen kann.

deine Ursprungsfrage lautet aber anders...

Du hast also das Kombinationsfeld aus den Formularfeldern der Vorversionen verwendet. In den Eigenschaften kannst du festlegen, welches Makro bei Aktivieren des Feldes ausgeführt werden soll und welches bei Verlassen des Feldes ausgeführt werden soll.

Das setzt voraus, dass du vorher Makros erstellt hast, die dann unter "Ereignis" (Entry) und "Verlassen" (Exit) zur Auswahl stehen.

Viele Grüße

Lisa

Hallo,

ein Worksheet-Ereignis wird ausgelöst, wenn in einem Blatt ein Ereignis eintritt, in deinem Fall der Rechtsklick. Und aus diesem Grund muss der Code für dieses Ereignis auch unbedingt in das Codemodul des entsprechenden Tabellenblattes.

Das heißt, der Code muss in Mappe BestimmteMappe.xls in das Codemodul des Blattes BestimmteTabelle.

Mit freundlichen Grüßen

Claus Busch

Hallo Claus,

Kann man ein Worksheet-Ereignis auch nicht umschreiben?

So, dass das Ereignis ausgeführt wird wenn eine andere Mappe geöffnet ist.

Wenn Du mehrere Werte für einen Zielwert verändern möchtest musst Du den Solver nehmen. Auch für diesen lassen sich Makro's aufzeichnen.



Beginne beim Aufzeichnen damit das Du zuerst auf den "Zurücksetzen" Knopf klickst, der erzeugt ein "SolverReset" im Makro.



Als letztes klick auf "Lösen", welches die Zeile "SolverSolve" erzeugt. Diese veränderst Du später auf "SolverSolve True", damit der Solver-Dialog automatisch geschlossen wird.



Allerdings musst Du zum Ausführen entweder einen VBA-Verweis zum Solver setzen, oder ein Modul benutzen welches den Solver initialisiert (Kannst Du von mir haben).



Damit Dein Makro nun auch noch automatisch ausgeführt wird könntest Du es im WorkSheet_Change Ereignis aufrufen... aber eins nach dem anderen. ;-)



Andreas.