Compartir a través de


Método Range.InsertCrossReference (Word)

Inserta una referencia cruzada en un título, un marcador, una nota al pie o al final, o bien en un elemento para el que se ha definido un rótulo de título; por ejemplo, una ecuación, una figura o una tabla.

Sintaxis

expresión. InsertCrossReference( _ReferenceType_ , _ReferenceKind_ , _ReferenceItem_ , _InsertAsHyperlink_ , _IncludePosition_ , _SeparateNumbers_ , _SeparatorString_ )

expresión requerida. Variable que representa un objeto Range.

Parameters

Nombre Obligatorio/opcional Tipo de datos Descripción
ReferenceType Obligatorio Variant El tipo de elemento para el que se va a insertar una referencia cruzada. Puede ser cualquier constante WdReferenceType o WdCaptionLabelID o una etiqueta de título definida por usuario.
ReferenceKind Obligatorio WdReferenceKind Información que debe incluirse en la referencia cruzada.
ReferenceItem Obligatorio Variant Si ReferenceType es wdRefTypeBookmark, este argumento especifica un nombre de marcador. Para todos los demás valores de ReferenceType, este argumento especifica el nombre o el número de artículo en la opción de tipo de referencia en el cuadro de diálogo referencia cruzada. Utilice el método GetCrossReferenceItems para devolver una lista de nombres del elemento que se puede utilizar con este argumento.
InsertAsHyperlink Opcional Variant True para insertar la referencia cruzada como hipervínculo respecto al elemento referenciado.
IncludePosition Opcional Variant True para insertar "más adelante" o "siguiente", según la ubicación del elemento de referencia respecto a la referencia cruzada.
SeparateNumbers Opcional Variant True para utilizar un separador que separe los números del texto asociado. (Usar sólo si el parámetro ReferenceType está establecido en wdRefTypeNumberedItem y el parámetro ReferenceKind está establecido en wdNumberFullContext.)
SeparatorString Opcional Variant Especifica la cadena que se va a utilizar como separador si el parámetro SeparateNumbers está establecido en True.

Comentarios

Si especifica wdPageNumber como valor de ReferenceKind, es podrán que deba repaginar el documento para ver la información de referencia cruzada correcta.

Ejemplo:

En este ejemplo, se inserta al principio del documento activo una referencia cruzada a la página que incluye el primer marcador del documento.

Set myRange = ActiveDocument.Range(Start:=0, End:=0) 
myBookmarks = ActiveDocument _ 
 .GetCrossReferenceItems(wdRefTypeBookmark) 
With myRange 
 .InsertBefore "Page " 
 .Collapse Direction:=wdCollapseEnd 
 .InsertCrossReference ReferenceType:=wdRefTypeBookmark, _ 
 ReferenceKind:=wdPageNumber, ReferenceItem:=myBookmarks(1) 
End With

Vea también

Objeto Range

Soporte técnico y comentarios

¿Tiene preguntas o comentarios sobre VBA para Office o esta documentación? Vea Soporte técnico y comentarios sobre VBA para Office para obtener ayuda sobre las formas en las que puede recibir soporte técnico y enviar comentarios.