Clase Hyperlinks - la colección de hipervínculos de una hoja de cálculo o de un rango (Word VBA)

La clase Hyperlinks representa la colección de objetos HYPERLINK de un documento, intervalo o selección.

Para usar una variable de clase Hyperlinks, primero debe ser instanciado, por ejemplo

Dim hyps as Hyperlinks
Set hyps = Selection.Hyperlinks

Los siguientes procedimientos se pueden usar para establecer variables de clase Hyperlinks : Document.Hyperlinks, Range.Hyperlinks y Selection.Hyperlinks.

For Each

A continuación, se muestra un ejemplo de cómo procesar los elementos Hyperlinks en una colección.

Dim hyp As Hyperlink
For Each hyp In Selection.Hyperlinks
	
Next hyp

Add

Devuelve un objeto HYPERLINK que representa un hipervínculo nuevo agregado a un intervalo, una selección o un documento.

Add (Anchor, Address, SubAddress, ScreenTip, TextToDisplay, Target)

ActiveDocument.Hyperlinks.Add Anchor:=Selection.Range, _ 
 Address:="http:\\www.microsoft.com"

Arguments

Un argumento con nombre

Anchor (Hyperlink) - Texto o gráfico que se desea convertir en un hipervínculo.

Optional arguments

Los siguientes argumentos son opcionales

Address (String) - Dirección del vínculo especificado.

SubAddress (String) - El nombre de una ubicación dentro del archivo de destino, tal como un marcador, un intervalo con nombre o un número de una diapositiva.

ScreenTip (String) - The text that appears as a ScreenTip when the mouse pointer is positioned over the specified hyperlink.

TextToDisplay (String) - Texto mostrado del hipervínculo especificado.

Target (String) - Nombre del marco o la ventana en que desee cargar el hipervínculo especificado.

Count

Devuelve un Long que representa el número de hipervínculos de la colección.

Dim lngCount As Long
lngCount = Selection.Hyperlinks.Count

Item

Devuelve un objeto HYPERLINK individual de una colección.

Item (Index)

Index: El objeto individual que se va a devolver.

Dim hyp As Hyperlink
Set hyp = Selection.Hyperlinks(Index:=1)