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