Application.CalendarDateShadingEditEx-Methode (Project)

Ändert die Hintergrundfarbe und das Muster von Datenfeldern in der Kalenderansicht.

Syntax

Ausdruck. CalendarDateShadingEditEx( _Item_, _Pattern_, _Color_ )

Ausdruck Ein Ausdruck, der ein Application-Objekt zurückgibt.

Parameter

Name Erforderlich/Optional Datentyp Beschreibung
Item Erforderlich Long Der Typ des zu ändernden Kalendertags. Dies kann eine der PjCalendarShading -Konstanten sein.
Pattern Optional Long Das Muster für die Art von Datumsfeld, die mit Item angegeben. Dies kann eine der folgenden PjFillPattern -Konstanten sein.
Color Optional Long Die Farbe für die Art von Datumsfeld, die mit Item angegeben. Kann ein hexadezimaler RGB-Farbwert sein, wobei Rot das letzte Byte ist. Z. B. ist der Wert &HFF0000 Blau und &H00FFFF Gelb.

Rückgabewert

Boolean

Bemerkungen

Außer Item erfordert CalendarDateShadingEditEx mindestens einen der Parameter Pattern oder Color, um ohne Fehler ausgeführt zu werden. Z. B. funktioniert die folgende Zeile im Direktbereich des VBEs ordnungsgemäß.

? CalendarDateShadingEditEx (PjCalendarShading.pjBaseWorking, , &H01dddd)

Beispiel

Im folgenden Beispiel wird die Hintergrundfarbe der Arbeitstage im Basiskalender in ein gekipptes Lila und die Farbe der arbeitsfreien Tage in hellgrau geändert.

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

Hinweis

Wenn Sie eine der PjColor-Enumerationskonstanten für den Color-Parameter verwenden, ist die Farbe nahezu schwarz. For example, the value of pjGreen is 9, which in the CalendarDateBoxesEx method is a very dark red. To use only the sixteen colors available with PjColor constants, use the CalendarDateShadingEdit method.

Support und Feedback

Haben Sie Fragen oder Feedback zu Office VBA oder zu dieser Dokumentation? Unter Office VBA-Support und Feedback finden Sie Hilfestellung zu den Möglichkeiten, wie Sie Support erhalten und Feedback abgeben können.