Propriedade Document.FooterLeft (Visio)
Obtém ou define a sequência de caracteres de texto que aparece no lado esquerdo do rodapé de um documento. Leitura/gravação.
Sintaxe
expressão. FooterLeft
Expressão Uma variável que representa um objeto Document .
Valor de retorno
Cadeia de caracteres
Comentários
Você também pode definir esse valor na caixa esquerda em Rodapé na caixa de diálogo Cabeçalho e Rodapé (clique na guia Arquivo , clique em Imprimir, clique em Visualização de Impressão e, em seguida, no grupo Visualização , clique em Cabeçalho & Rodapé).
Tanto a sequência retornada por FooterLeft como a sequência utilizada para definir FooterLeft podem conter códigos de escape representando dados. Esses códigos de escape podem ser concatenados com texto adicional.
A lista a seguir mostra os códigos de escape válidos para rodapés e cabeçalhos de documentos.
Código de escape | Descrição |
---|---|
&p | Número de página |
&t ou &T | Hora atual |
&d (versão curta) ou &D (versão longa) | Data atual |
&& | E comercial |
&e | Extensão de nome de arquivo |
&f | Nome do arquivo |
&f&e | Nome do arquivo e extensão |
&n | Nome da página |
&P | Total de páginas impressas |
Exemplo
A macro a seguir mostra como posicionar uma sequência de caracteres contendo a data atual na parte esquerda do rodapé de um documento. Depois que você executar essa macro, se a data for 4 de maio de 2007, a parte esquerda do rodapé conterá "The date is quinta-feira, 4 de maio de 2007".
Sub FooterLeft_Example()
Dim strFooter as String
'Build the footer string.
strFooter = "The date is " & "&D"
'Set the footer of the current document.
ThisDocument.FooterLeft = strFooter
End Sub
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.