Compartir por


Método Application.ZoomCalendar (Project)

Acerca o aleja el Calendario.

Sintaxis

expresión. ZoomCalendar( _NumWeeks_, _StartDate_, _EndDate_ )

expresión Variable que representa un objeto Application.

Parámetros

Nombre Obligatorio/opcional Tipo de datos Descripción
NumWeeks Opcional Long Número de semanas que se van a mostrar. Si se especifican StartDate y EndDate, se omite NumWeeks.
StartDate Opcional Variant Primera fecha que se va a mostrar.
EndDate Opcional Variant Última fecha que se va a mostrar.

Valor devuelto

Boolean

Comentarios

Utiliza el método ZoomCalendar sin especificar ningún argumento, muestra el cuadro de diálogo Zoom.

Ejemplo

En el ejemplo siguiente se muestran cuatro filas de semanas dentro del panel activo de la vista Calendario.

Sub FourWeekCalendar() 
 ViewApply Name:="Calendar" 
 ZoomCalendar NumWeeks:=4 
End Sub

Soporte técnico y comentarios

¿Tiene preguntas o comentarios sobre VBA para Office o esta documentación? Vea Soporte técnico y comentarios sobre VBA para Office para obtener ayuda sobre las formas en las que puede recibir soporte técnico y enviar comentarios.