Selection.InsertCrossReference (Word)
Insere uma referência cruzada para um título, indicador, nota de rodapé ou nota de fim, ou para um item para o qual um nome de legenda esteja definido por exemplo, uma equação, figura ou índice.
Se você especificar wdPageNumber como para o valor de ReferenceKind, talvez seja necessário repaginar o documento para ver as informações de referência cruzada corretas.
InsertCrossReference (ReferenceType, ReferenceKind, ReferenceItem, InsertAsHyperlink, IncludePosition, SeparateNumbers, SeparatorString)
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
Arguments
O seguinte argumento é opcional
ReferenceType (WdCaptionLabelID) - O tipo de item para o qual uma referência cruzada deve ser inserido. Pode ser qualquer constante WdReferenceType ou WdCaptionLabelID ou um nome de legenda definido pelo usuário.
Os valores de retorno possíveis são wdCaptionEquation - Subscrito, wdCaptionFigure - Configura, wdCaptionTable - Configurável.
ReferenceKind (WdReferenceKind) - As informações a serem incluídas na referência cruzada.
Aqui você pode encontrar os valores possíveis para
ReferenceItem (Long) - Se ReferenceType for wdRefTypeBookmark, este argumento especificará um nome de indicador. Todos os outros valores ReferenceType, este argumento especificará o nome ou número do item na caixa tipo de referência, na caixa de diálogo de referência cruzada. Use o método GetCrossReferenceItems para retornar uma lista de nomes de itens que podem ser usados com este argumento.
Optional arguments
Os seguintes argumentos são opcionais
InsertAsHyperlink (Boolean) - True para inserir a referência cruzada como um hiperlink.
IncludePosition (Boolean) - True para inserir "acima" ou "abaixo", dependendo do local do item referência em relação a referência cruzada.
SeparateNumbers (WdReferenceKind) - True para usar um separador para separar os números do texto associado. (Use apenas se o parâmetro ReferenceType é definido como wdRefTypeNumberedItem e o parâmetro de ReferenceKind é definido como wdNumberFullContext.).
Aqui você pode encontrar os valores possíveis para
SeparatorString (String) - Especifica a cadeia de caracteres a ser usada como um separador se o parâmetro SeparateNumbers estiver definido como true.