次の方法で共有

Hyperlink.Follow Method

  • [アーティクル]
Visio Automation Reference

Causes Microsoft Office Visio to navigate to a hyperlink.

Version Information
 Version Added:  Visio 5.0

Syntax

expression.Follow

expression   A variable that represents a Hyperlink object.

Return Value
Nothing

Example

The following example draws a rectangle shape, adds a Hyperlink object to the shape, sets its Address and NewWindow properties, and then uses the Follow method to navigate the hyperlink.

Before running this code, replace address with a valid Internet or intranet address.

Visual Basic for Applications 
  
Public Sub Follow_Example() 

Dim vsoHyperlink As Visio.Hyperlink 

Set vsoHyperlink = ActivePage.DrawRectangle(0,0,5,5).AddHyperlink 

vsoHyperlink.Address = "http://<em>address</em>/" 
vsoHyperlink.NewWindow = False 
vsoHyperlink.Follow 



End Sub

See Also