Método Application.ZoomCalendar (Project)

Aumenta ou diminui o zoom do Calendário.

Sintaxe

expression. ZoomCalendar( _NumWeeks_, _StartDate_, _EndDate_ )

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

Parâmetros

Nome	Obrigatório/Opcional	Tipo de dados	Descrição
NumWeeks	Opcional	Long	O número de semanas a serem exibidas. Se StartDate e EndDate forem especificados, NumWeeks será ignorado.
StartDate	Opcional	Variant	A primeira data a ser exibida.
EndDate	Opcional	Variant	A última data a ser exibida.

Valor de retorno

Boolean

Comentários

Usar o método ZoomCalendar sem especificação de argumentos exibe a caixa de diálogo Zoom.

Exemplo

O exemplo a seguir exibe quatro linhas de semanas dentro do painel ativo do modo de exibição Calendário.

Sub FourWeekCalendar() 
 ViewApply Name:="Calendar" 
 ZoomCalendar NumWeeks:=4 
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.