Método Selection.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 Selection.

Parámetros

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 el nombre de un marcador. Para todos los demás valores de ReferenceType, este argumento especifica el nombre o número de elemento en el cuadro tipo de referencia en el cuadro de diálogo referencia cruzada. Utilice el método GetCrossReferenceItems para devolver una lista de nombres de elemento que se pueden usar con este argumento.
InsertAsHyperlink	Opcional	Variant	True para insertar la referencia cruzada como hipervínculo.
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 una oración que contiene dos referencias cruzadas: una con el texto del título y la otra con la página en la que aparece el texto del título.

With Selection 
 .Collapse Direction:=wdCollapseStart 
 .InsertBefore "For more information, see " 
 .Collapse Direction:=wdCollapseEnd 
 .InsertCrossReference ReferenceType:=wdRefTypeHeading, _ 
 ReferenceKind:=wdContentText, ReferenceItem:=1 
 .InsertAfter " on page " 
 .Collapse Direction:=wdCollapseEnd 
 .InsertCrossReference ReferenceType:=wdRefTypeHeading, _ 
 ReferenceKind:=wdPageNumber, ReferenceItem:=1 
 .InsertAfter "." 
End With

Consulte también

Objeto Selection

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.