Compartilhar via

Propriedade Window.Caption (Word)

  • Artigo

Retorna ou define o texto de legenda para a janela que é exibido na barra de título da janela do documento ou aplicativo. Cadeia de caracteres de leitura/gravação.

Sintaxe

expressão. Legenda

Expressão Uma variável que representa um objeto Window .

Comentários

Para alterar a legenda da janela do aplicativo para o texto padrão, defina essa propriedade com uma sequência de caracteres vazia ("").

Exemplo

Este exemplo exibe a legenda de cada janela da coleção Windows.

Count = 1 
For Each win In Windows 
 MsgBox Prompt:=win.Caption, Title:="Window" & Str(Count) & _ 
 " Caption" 
 Count = Count + 1 
Next win

Este exemplo redefine a legenda da janela do aplicativo.

Application.Caption = ""

Este exemplo define a legenda da janela ativa como sendo o nome do documento ativo.

ActiveDocument.ActiveWindow.Caption = ActiveDocument.FullName

Este exemplo altera a legenda da janela do aplicativo Word para incluir o nome do usuário.

Application.Caption = UserName & "'s copy of Word"

Este exemplo insere uma legenda de tabela e, em seguida, altera a legenda da primeira tabela de números para Tabela.

Selection.Collapse Direction:=wdCollapseStart 
Selection.Range.InsertCaption "Table" 
If ActiveDocument.TablesOfFigures.Count >= 1 Then 
 ActiveDocument.TablesOfFigures(1).Caption = "Table" 
End If

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.