Método Range.InsertCaption (Word)
Insere uma legenda imediatamente antes ou após o intervalo especificado.
Sintaxe
expressão. InsertCaption( _Label_ , _Title_ , _TitleAutoText_ , _Position_ , _ExcludeLabel_ )
expressão Obrigatório. Uma variável que representa um objeto Range.
Parâmetros
| Nome | Obrigatório/Opcional | Tipo de dados | Descrição |
|---|---|---|---|
| Label | Obrigatório | Variant | O nome da legenda a ser inserido. Pode ser uma cadeia de caracteres ou uma das seguintes 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. |
| Title | Opcional | Variant | A sequência de caracteres a ser inserida imediatamente após o nome na legenda (ignorado se TitleAutoText for especificado). |
| TitleAutoText | Opcional | Variant | A entrada de AutoTexto cujo conteúdo você deseja inserir imediatamente após o nome na legenda (substitui qualquer texto especificado por Title). |
| Position | Opcional | Variantes | Especifica se a legenda será inserida acima ou abaixo do intervalo. Pode ser uma das constantes WdCaptionPosition. |
| ExcludeLabel | Opcional | Variant | True não inclui o rótulo de texto, como definido no parâmetro Label. False inclui o rótulo especificado. |
Exemplo
Este exemplo insere uma legenda abaixo da primeira tabela no documento ativo.
ActiveDocument.Tables(1).Range.InsertCaption _
Label:=wdCaptionTable, _
Position:=wdCaptionPositionBelow
Confira também
Suporte e comentários
Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.