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
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)