Compartilhar via

Application.CalendarDateShadingEdit method (Project) (Método Application.CalendarDateShadingEdit [Projeto])

Altera a cor de plano de fundo e o padrão de caixas de data na exibição Calendário.

Sintaxe

expression. CalendarDateShadingEdit( _Item_, _Pattern_, _Color_ )

expressão Uma variável que representa um Aplicativo objeto.

Parâmetros

Nome Obrigatório/Opcional Tipo de dados Descrição
Item Obrigatório Long O tipo de dia de calendário a ser alterado. Pode ser uma das constantes PjCalendarShading.
Pattern Opcional Long O padrão para o tipo de caixa de data especificado pelo Item. Pode ser uma das seguintes constantes PjFillPattern.
Color Opcional Long A cor do tipo de caixa de data especificada pelo Item. Pode ser uma das seguintes constantes PjColor:

Valor de retorno

Boolean

Comentários

Além de Item, CalendarDateShadingEdit exige o parâmetro Pattern ou Color, ou ambos, para que sejam executados sem erro. Por exemplo, a seguinte linha no painel imediato do VBE funciona corretamente.

? CalendarDateShadingEdit (PjCalendarShading.pjBaseWorking, , &H01dddd)

Para editar caixas de data do calendário onde as cores podem ser valores RGB, use o método CalendarDateShadingEditEx.

Exemplo

O exemplo seguinte altera a cor de fundo dos dias úteis no calendário base para um roxo e a cor dos dias de descanso para cinzento.

Sub CalendarDate_ShadingEdit() 
 ' Activate the Caldender view. 
 ViewApply Name:="Calendar" 
 
 CalendarDateShadingEdit Item:=pjBaseWorking, Pattern:=pjLightFillPattern, Color:=pjPurple 
 CalendarDateShadingEdit Item:=pjBaseNonworking, Color:=pjGray 
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.

  • Last updated on