Range.InsertCaption (Word)

Insere uma legenda imediatamente antes ou após o intervalo especificado.

InsertCaption (Label, Title, TitleAutoText, Position, ExcludeLabel)

ActiveDocument.Tables(1).Range.InsertCaption _ 
 Label:=wdCaptionTable, _ 
 Position:=wdCaptionPositionBelow

Arguments

O seguinte argumento é necessário

Label (String) - O nome da legenda a ser inserido. Pode ser uma cadeia de caracteres ou uma das constantes WdCaptionLabelID . Se o rótulo ainda não tiver sido definido, ocorrerá um erro. Use o método Add com o objeto CaptionLabels para definir o novo rótulos de legenda.

Optional arguments

Os seguintes argumentos são opcionais

Title (String) - A sequência de caracteres a ser inserida imediatamente após o nome na legenda (ignorado se TitleAutoText for especificado).

TitleAutoText (String) - A entrada de AutoTexto cujo conteúdo você deseja inserir imediatamente após o nome na legenda (substitui qualquer texto especificado por Title).

Position (WdCaptionPosition) - Especifica se a legenda será inserida acima ou abaixo do intervalo. Pode ser uma das constantes WdCaptionPosition.

Os valores de retorno possíveis são wdCaptionPositionAbove - O nome da legenda é adicionado acima, wdCaptionPositionBelow - O nome da legenda é adicionado abaixo.

ExcludeLabel (String) - True não inclui o rótulo de texto, como definido no parâmetro Label. False inclui o rótulo especificado.