Hyperlinks コレクション オブジェクト
Microsoft PowerPoint Visual Basic リファレンス |
Hyperlinks コレクション オブジェクト
複数のオブジェクト Hyperlinks Hyperlink |
スライドまたはマスタのすべての Hyperlink オブジェクトのコレクションです。
使い方
Hyperlinks コレクションを取得するには、Hyperlinks プロパティを使用します。次の使用例は、指定したアドレスを持つ作業中のプレゼンテーションのスライド 1 のすべてのハイパーリンクを更新します。
For Each hl In ActivePresentation.Slides(1).Hyperlinks
If hl.Address = "c:\current work\sales.ppt" Then
hl.Address = "c:\new\newsales.ppt"
End If
Next
ハイパーリンクを作成し、それを Hyperlinks コレクションに追加するには、Hyperlink プロパティを使用します。次の使用例は、スライド ショーの実行時に、ユーザーが作業中のプレゼンテーションのスライド 1 の図形 3 をクリックすると指定したサイトにジャンプするように設定し、その新しいハイパーリンクをコレクションに追加します。既に図形 3 をクリックするとハイパーリンク先へジャンプするように設定されている場合、次の使用例は、新しいハイパーリンクを上書きするため、Hyperlinks コレクション内の項目数は変わりません。
With ActivePresentation.Slides(1).Shapes(3) _
.ActionSettings(ppMouseClick)
.Action = ppActionHyperlink
.Hyperlink.Address = "https://www.microsoft.com"
End With