Klasse ActionSetting (PowerPoint VBA)

Enthält Informationen dazu, wie die angegebene Form oder der Textbereich während einer Bildschirmpräsentation auf Mausaktionen reagiert.

Um eine ActionSetting -Klassenvariable zu verwenden, muss sie zuerst instanziert werden, beispielsweise

Dim asg as ActionSetting
Set asg = ActiveWindow.RangeFromPoint.ActionSettings(Index:=1)

Klassen Variablen vom Typ ActionSetting können mit der Prozedur ActionSettings.Item festgelegt werden

Action

Gibt zurück oder legt den Typ der Aktion, die ausgeführt wird, wenn die angegebene Form geklickt wird oder der Mauszeiger über der Form während einer Bildschirmpräsentation positioniert wird. Lese-/Schreibzugriff. Dies sind mögliche Werte für PpActionType.

Der Wert der Action -Eigenschaft kann eine der PpActionType -Konstanten sein. Sie können die Action -Eigenschaft in Verbindung mit anderen Eigenschaften des ActionSetting -Objekts verwenden, wie in der folgenden Tabelle dargestellt. Wird für die Action-Eigenschaft folgender Wert festgelegt Verwenden Sie diese Eigenschaft Für folgende Aktion Festlegen der Eigenschaften für den Hyperlink, der ausgeführt wird, wenn die Maus während einer Bildschirmpräsentation auf eine Form zeigt. Zurückgeben oder Festlegen des Namens des Programms, das während einer Bildschirmpräsentation gestartet wird, wenn die Maus auf die Form zeigt. Zurückgeben oder Festlegen des Namens des Makros, das während einer Bildschirmpräsentation ausgeführt wird, wenn die Maus auf die Form zeigt. Festlegen des OLE-Verbs, das während einer Bildschirmpräsentation aufgerufen wird, wenn die Maus auf die Form zeigt. Festlegen des Namens der zielgruppenorientierten Bildschirmpräsentation, die während einer Bildschirmpräsentation ausgeführt wird, wenn die Maus auf die Form zeigt.

ActionVerb

Gibt eine Zeichenfolge zurück, die das OLE-Verb enthält, das ausgeführt wird, wenn der Benutzer während einer Bildschirmpräsentation auf die angegebene Form klickt oder den Mauszeiger darauf richtet, oder legt diese Zeichenfolge fest. Lese-/Schreibzugriff.

Die Action -Eigenschaft muss auf PpActionOLEVerb zunächst für diese Eigenschaft auf die Aktion der Bildschirmpräsentation auswirken festgelegt werden.

With ActivePresentation.Slides(1).Shapes(3) _
        .ActionSettings(ppMouseOver)
    .ActionVerb = "Play"
    .Action = ppActionOLEVerb
End With

AnimateAction

Gibt an, ob die Farbe der angegebenen Form bei der Ausführung der angegebenen Mausaktion für kurze Zeit invertiert wird. Lese-/Schreibzugriff.

Der Wert der AnimateAction -Eigenschaft kann eine der folgenden MsoTriState -Konstanten entsprechen.

With ActivePresentation.Slides(1) _
    .Shapes(3).ActionSettings(ppMouseClick)
        .SoundEffect.Name = "applause"
        .AnimateAction = msoTrue
End With

Gibt ein Hyperlink -Objekt zurück, das den Hyperlink für die angegebene Form darstellt. Schreibgeschützt.

Damit der Hyperlink während einer Bildschirmpräsentation aktiv sein muss die Action -Eigenschaft ppActionHyperlink festgelegt sein.

With ActivePresentation.Slides(1).Shapes(1) _
        .ActionSettings(ppMouseClick)
    .Action = ppActionHyperlink
    .Hyperlink.Address = "https://www.microsoft.com/"
End With

Run

Gibt den Namen der Präsentation oder des Makros zurück, die/das ausgeführt werden soll, wenn während einer Bildschirmpräsentation auf die angegebene Form geklickt wird oder der Mauszeiger über sie geführt wird. Lese-/Schreibzugriff.

Für diese Eigenschaft auf die Aktion der Bildschirmpräsentation auswirken müssen Sie den Aktionswert-Eigenschaft mit PpActionRunMacro oder PpActionRunProgram festgelegt. Wenn der Wert der Action -Eigenschaft PpActionRunMacro ist, sollte der angegebene Zeichenfolgenwert den Namen des globalen Makros, die momentan geladene. Wenn der Wert der Action -Eigenschaft PpActionRunProgram ist, sollte der angegebene Zeichenfolgenwert der vollständige Pfad und Dateiname eines Programms sein. Sie können die Ausführen -Eigenschaft festlegen, um ein Makro, das keine Argumente akzeptiert oder ein Makro, das ein einzelnes Shape oder Objekt-Argument akzeptiert. Das Shape, das während der Bildschirmpräsentation geklickt wurde, wird als dieses Argument übergeben werden.

With ActivePresentation.Slides(1) _
        .Shapes(3).ActionSettings(ppMouseOver)
    .Action = ppActionRunMacro
    .Run = "CalculateTotal"
    .AnimateAction = True
End With

ShowAndReturn

Bestimmt, ob und unter welchen Bedingungen Microsoft PowerPoint zur initiierenden Bildschirmpräsentation zurückkehrt. Lese-/Schreibzugriff.

Der Wert der ShowAndReturn -Eigenschaft kann eine der folgenden MsoTriState -Konstanten entsprechen.

With ActivePresentation.Slides(1).Shapes(5).ActionSettings(ppMouseClick)
    .Action = ppActionNamedSlideShow
    .SlideShowName = "techtalk"
    .ShowandReturn = msoTrue
End With

SlideShowName

Hiermit wird der Name der benutzerdefinierten Bildschirmpräsentation zurückgegeben oder festgelegt, die während einer Bildschirmpräsentation ausgeführt werden soll, wenn der Benutzer mit der Maus auf die Form zeigt. Lese-/Schreibzugriff.

ActiveWindow.RangeFromPoint.ActionSettings(1).SlideShowName =

SoundEffect

Gibt ein SoundEffect -Objekt, das den Sound wiedergegeben wird, während des Übergangs zur angegebenen Folie darstellt. Schreibgeschützt.

With ActivePresentation.Slides(1).Shapes(1).AnimationSettings
    .Animate = True
    .TextLevelEffect = ppAnimateByAllLevels
    .SoundEffect.ImportFromFile "c:\bass.wav"
End With