Anmerkung
Für den Zugriff auf diese Seite ist eine Autorisierung erforderlich. Sie können versuchen, sich anzumelden oder das Verzeichnis zu wechseln.
Für den Zugriff auf diese Seite ist eine Autorisierung erforderlich. Sie können versuchen, das Verzeichnis zu wechseln.
Ruft die Adresse für das Hyperlink-Objekt eines Shapes ab, die Adresse, zu der der Link navigiert, oder legt diese fest. Lese-/Schreibzugriff.
Syntax
Ausdruck. Adresse
Ausdruck Eine Variable, die ein Hyperlink-Objekt darstellt.
Rückgabewert
Zeichenfolge
Hinweise
Das Festlegen der Address-Eigenschaft für ein Hyperlink-Objekt entspricht der Eingabe von Informationen in das Feld Adresse im Dialogfeld Hyperlinks (Menü Einfügen ) oder dem Festlegen des Ergebnisses der Zelle Address im Hyperlink des Shapes. Name-Zeile im ShapeSheet-Fenster.
Der Wert der Address-Eigenschaft kann ein DOS-, UNC- oder URL-Pfad sein, z. B. "driveletter":\ "foldername" \ "drawingname", \ "servername"\ "ordnername"\ "drawingname" oder https:// address.
Wenn die Address-Eigenschaft relativ ist, z. B. ".. \ "drawingname" wird anhand der HyperlinkBase-Eigenschaft (sofern angegeben) oder dem Dokumentpfad des Links erstellt. Wenn das Dokument nicht gespeichert wurde, bleibt der Hyperlink undefiniert.
Wenn die Address-Eigenschaft leer ist, können Sie davon ausgehen, dass die Adresse auf eine Seite im Dokument verweist, die die Seite enthält. In diesem Fall enthält die SubAddress-Eigenschaft den Namen des Zeichenblatts, zu dem mit dem Hyperlink navigiert wird.
Beispiel
Mit diesem VBA-Makro (Microsoft Visual Basic für Applikationen) wird die Address-Eigenschaft eines Hyperlink-Objekt festgelegt. Ersetzen Sie vor dem Ausführen dieses Beispiels address durch eine gültige Internet- oder Intranetadresse.
Public Sub Address_Example()
Dim vsoShape As Visio.Shape
Dim vsoHyperlink As Visio.Hyperlink
'Create a new shape to receive the hyperlink
Set vsoShape = ActivePage.DrawRectangle(1, 2, 2, 1)
Set vsoHyperlink = vsoShape.AddHyperlink
vsoHyperlink.Description = "Web site"
vsoHyperlink.Address = "https://address /"
End Sub
Support und Feedback
Haben Sie Fragen oder Feedback zu Office VBA oder zu dieser Dokumentation? Unter Office VBA-Support und Feedback finden Sie Hilfestellung zu den Möglichkeiten, wie Sie Support erhalten und Feedback abgeben können.