Método Application.FilePageSetupCalendarTextEx (Project)

Formata o texto de visualizações de calendário para impressão, onde a cor do texto pode ser um valor hexadecimal.

Sintaxe

expression. FilePageSetupCalendarTextEx( _Name_, _Item_, _Font_, _Size_, _Bold_, _Italic_, _Underline_, _Color_ )

Expressão Uma expressão que retorna um objeto Application .

Parâmetros

Nome	Obrigatório/Opcional	Tipo de dados	Descrição
Name	Opcional	String	O nome do calendário a ser editado.
Item	Opcional	Long	O item de texto a ser formatado. Pode ser uma das constantes PjPageSetupCalendarItem.
Font	Opcional	String	O nome da fonte.
Size	Opcional	Integer	O tamanho da fonte em pontos.
Bold	Opcional	Boolean	True se a fonte for negrito; Caso contrário, False.
Italic	Opcional	Boolean	True se a fonte for itálico; Caso contrário, False.
Underline	Opcional	Boolean	True se a fonte estiver sublinhada; Caso contrário, False.
Color	Opcional	Long	A cor do texto. Pode ser um valor RGB, onde vermelho é o último byte. Por exemplo, o valor &H01FFFF é amarelo.

Valor de retorno

Boolean

Comentários

Usando o método FilePageSetupCalendarTextEx sem nenhum argumento exibe a caixa de diálogo Estilos de texto.

Observação

[!OBSERVAçãO] FilePageSetupCalendarTextEx funciona somente para exibições de calendário de impressão.

Exemplo

O exemplo a seguir formata os títulos mensais em vermelho para impressão.

Sub File_PageSetupCalendarText() 
 
    'Activate the Calendar view. 
    ViewApply Name:="&Calendar" 
 
    FilePageSetupCalendarTextEx Item:=pjMonthlyTitles, Color:=&0101FF 
    FilePrint 
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.