Classe ActionSetting (PowerPoint VBA)

Contém informações sobre como o intervalo de texto ou forma especificado reage a ações do mouse durante uma apresentação de slides.

Set

Para usar uma variável de classe ActionSetting, ela primeiro precisa ser instanciada por exemplo

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

Os procedimentos a seguir podem ser usados ​​para definir variáveis ​​do tipo ActionSetting: ActionSettings.Item, Shape.ActionSettings, ShapeRange.ActionSettings e TextRange.ActionSettings

Temas

Os procedimentos a seguir nesta aula foram agrupados e são descritos em uma página de tema separada

Display/Show with its procedures ShowAndReturn e SlideShowName

Propriedades

Action Retorna ou define o tipo de ação que ocorrerá quando houver um clique sobre a forma especificada ou quando o ponteiro do mouse estiver posicionado sobre a forma durante uma apresentação de slides. Leitura/gravação.

ActivePresentation.Slides(1).Shapes(3).ActionSettings(ppMouseOver).Action = ppActionEndShow

ActionVerb Retorna ou define uma cadeia de caracteres que contém o verbo OLE que será executado quando o usuário clicar na forma especificada ou passar o ponteiro do mouse sobre ela durante uma apresentação de slides. Leitura/gravação.

ActivePresentation.Slides(1).Shapes(3).ActionSettings(ppMouseOver).ActionVerb =

AnimateAction Especifica se se a cor da forma especificada for momentaneamente invertida quando ocorrer a ação do mouse especificada. Leitura/gravação.

ActivePresentation.Slides(1).Shapes(3).ActionSettings(ppMouseOver).AnimateAction = msoTrue

Hyperlink Retorna um objeto Hyperlink que representa o hiperlink para a forma especificada. Somente leitura.

Dim hypHyperlink As Hyperlink
Set hypHyperlink = ActivePresentation.Slides(1).Shapes(3).ActionSettings(ppMouseOver).Hyperlink

Parent Retorna o objeto parente para o objeto especificado.

Dim objParent As Object
Set objParent = ActivePresentation.Slides(1).Shapes(3).ActionSettings(ppMouseOver).Parent

Run Retorna ou define o nome da apresentação ou macro a ser executada quando a forma especificada for clicada ou o ponteiro do mouse passar sobre a forma durante uma apresentação de slides. Leitura/gravação.

ActivePresentation.Slides(1).Shapes(3).ActionSettings(ppMouseOver).Run =

SoundEffect Retorna um objeto SoundEffect que representa o som a ser executado durante a transição para o slide especificado. Somente leitura.

Dim setSoundEffect As SoundEffect
Set setSoundEffect = ActivePresentation.Slides(1).Shapes(3).ActionSettings(ppMouseOver).SoundEffect

ActionSettings.Count Retorna o número de objetos na coleção especificada. Somente leitura.

Dim lngCount As Long
lngCount = ActiveWindow.RangeFromPoint.ActionSettings.Count

ActionSettings.Parent Retorna o objeto parente para o objeto especificado.

Dim objParent As Object
Set objParent = ActiveWindow.RangeFromPoint.ActionSettings.Parent