Поделиться через

Метод Hyperlink.Follow (Visio)

  • Статья

Заставляет Microsoft Visio переходить к гиперссылке.

Синтаксис

expression. Следовать

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

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

Отсутствует

Пример

В следующем примере рисуется фигура прямоугольника, к фигуре добавляется объект 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 и обратная связь.