Метод Hyperlink.Follow (Visio)

Вызывает переход Microsoft Visio на гиперссылку.

Синтаксис

выражение. Подписаться

выражение Переменная, представляющая объект гиперссылки .

Возвращаемое значение

Отсутствует

Пример

В следующем примере рисуется прямоугольник, к фигуре добавляется объект Hyperlink , задаются свойства Address и NewWindow , а затем используется метод Follow для навигации по гиперссылке.

Перед запуском этого кода замените адрес на допустимый адрес в Интернете или интрасети.

 
Public Sub Follow_Example() 
 
 Dim vsoHyperlink As Visio.Hyperlink 
 
 Set vsoHyperlink = ActivePage.DrawRectangle(0,0,5,5).AddHyperlink 
 
 vsoHyperlink.Address = "https://address /" 
 vsoHyperlink.NewWindow = False 
 vsoHyperlink.Follow 
 
End Sub

Поддержка и обратная связь

Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.