Compartir a través de


Método Application.CalendarDateShadingEditEx (Project)

Cambia el color de fondo y el patrón de fondo de los cuadros de fecha en la vista Calendario.

Sintaxis

expresión. CalendarDateShadingEditEx( _Item_, _Pattern_, _Color_ )

Expresión Expresión que devuelve un objeto Application .

Parameters

Nombre Obligatorio/opcional Tipo de datos Descripción
Item Obligatorio Long Tipo de día del calendario que se va a cambiar. Puede ser una de las constantes de PjCalendarShading.
Pattern Opcional Long El modelo para el tipo de cuadro de fecha especificado por Item. Puede ser una de las constantes PjFillPattern.
Color Opcional Long El color para el tipo de cuadro de fecha especificado por Item. Puede ser un valor hexadecimal del color RGB, en el que el último byte representa el color rojo. Por ejemplo, el valor &HFF0000 es azul y &H00FFFF, el amarillo.

Valor devuelto

Boolean

Comentarios

Además de Item, CalendarDateShadingEditEx requiere el parámetro Pattern, el parámetro Color o ambos para ejecutarse sin error. Por ejemplo, la siguiente línea del panel Inmediato de VBE funcionará correctamente.

? CalendarDateShadingEditEx (PjCalendarShading.pjBaseWorking, , &H01dddd)

Ejemplo

En el ejemplo siguiente se cambia el color de fondo de los días laborables en el calendario base a un color púrpura estipulado y el color de los días no laborables a gris claro.

Sub CalendarDate_ShadingEdit() 
    ' Activate the Caldender view. 
    ViewApply Name:="Calendar" 
 
    CalendarDateShadingEditEx Item:=pjBaseWorking, Pattern:=pjLightFillPattern, Color:=&H900090 
    CalendarDateShadingEditEx Item:=pjBaseNonworking, Color:=&HDDDDDD 
End Sub

Nota:

Si usa cualquiera de las constantes de enumeración de PjColor para el parámetro Color, el color será casi negro. Por ejemplo, el valor de pjGreen es 9, que en el método CalendarDateBoxesEx es un color rojo muy oscuro. Para usar solo los dieciséis colores disponibles con las constantes de PjColor, use el método CalendarDateShadingEdit.

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.