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.