Window.BackgroundColor-Eigenschaft (Visio)

Artikel
04/07/2023

Bestimmt die Hintergrundfarbe des aktiven Microsoft Visio-Zeichnungsfensters sowie der verknüpften Seitenansichts- und Vollbildfenster. Lese-/Schreibzugriff.

Syntax

Ausdruck. BackgroundColor

Ausdruck Eine Variable, die ein Window-Objekt darstellt.

Rückgabewert

OLE_COLOR

Hinweise

Die folgenden Werte sind in Visio für eine OLE_COLOR-Eigenschaft gültig:

&H00 bbggrr, wobei bb der blaue Wert zwischen 0 und 0xFF (255) ist, gg den grünen Wert und rr den roten Wert.
&H800000 xx , wobei xx ein gültiger GetSysColor-Index ist.

Weitere Informationen zur GetSysColor-Funktion finden Sie im Microsoft Platform SDK auf MSDN nach " GetSysColor ".

Der Datentyp OLE_COLOR wird für Eigenschaften verwendet, die Farben zurückgeben. Wenn eine Eigenschaft als OLE_COLOR deklariert wird, zeigt die Eigenschaftenfenster im Visual Basic-Editor ein Dialogfeld zur Farbauswahl an, in dem der Benutzer die Farbe für die Eigenschaft visuell auswählen kann, anstatt sich die numerische Entsprechung merken zu müssen.

Weiterhin können die folgenden VBA-Farbkonstanten (Microsoft Visual Basic für Applikationen) für den Datentyp OLE_COLOR verwendet werden.

Konstante	Wert	Beschreibung
vbBlack	0x0	Black
vbRed	0xff	Rot
vbGreen	0xFF00	Grün
vbYellow	0xffff	Gelb
vbBlue	0xFF0000	Blau
vbMagenta	0xFF00FF	Magenta
vbCyan	0xFFFF00	Cyan
vbWhite	0xFFFFFF	Weiß

Bei einem Zeichnungsfenster, einem Druckvorschaufenster oder einem Vollbildansichtsfenster setzt das Festlegen der BackgroundColor-Eigenschaft des Fensters auf einen anderen Wert als den Standardwert (-1) die Einstellungen ApplicationSettings.DrawingBackgroundColor, ApplicationSettings.PrintPreviewBackgroundColor und ApplicationSettings.FullScreenBackgroundColor für diesen Satz von Fenstern außer Kraft. Um diese Eigenschaften für denselben Satz von Fenstern zurücksetzen zu können, müssen Sie BackgroundColor auf den Standardwert -1 zurücksetzen. Wenn mehrere Zeichnungen geöffnet sind, hat das Festlegen von BackgroundColor für einen Satz von Fenstern keine Auswirkungen auf die Einstellung für andere geöffnete Fenstersätze.

Bei einem ShapeSheet-Fenster ändert das Festlegen der BackgroundColor-Eigenschaft des Fensters auf einen anderen Wert als den Standardwert die Hintergrundfarbe des ShapeSheet-Fensters, hat jedoch keine Auswirkung auf die anderen Fenstereinstellungen.

Beispiel

Mit dem folgenden VBA-Makro wird veranschaulicht, wie Sie mit der BackgroundColor-Eigenschaft die Hintergrundfarbe des aktuellen Zeichnungsfensters abrufen und festlegen. Außerdem wird gezeigt, wie ein ApplicationSettings-Objekt aus dem Application-Objekt von Visio abgerufen wird, und es wird die Beziehung zwischen der BackgroundColor-Eigenschaft und der ApplicationSettings.DrawingBackgroundColor-Eigenschaft veranschaulicht. In diesem Beispiel wird davon ausgegangen, dass ein aktives Zeichnungsfenster in Visio geöffnet ist und dass anfänglich alle Hintergrundfarbeigenschaften auf ihre Standardwerte festgelegt sind.

Public Sub BackgroundColor_Example() 
 
 Dim vsoApplicationSettings As Visio.ApplicationSettings 
 Set vsoApplicationSettings = Visio.Application.Settings 
 
 'Get the current application background color. 
 Debug.Print vsoApplicationSettings.DrawingBackgroundColor 
 
 'Get the active window background color. 
 Debug.Print ActiveWindow.BackgroundColor 
 
 'Change the application background color. 
 'This also changes the active window color as 
 'well as the setting in the Color Settings dialog box. 
 vsoApplicationSettings.DrawingBackgroundColor = vbRed 
 
 'Change the active window background color. 
 ActiveWindow.BackgroundColor = vbMagenta 
 
 'Change the application background color again. 
 'This time, there is no change in the current 
 'window color, but the dialog box setting changes. 
 vsoApplicationSettings.DrawingBackgroundColor = vbYellow 
 
 'Reset Window.BackgroundColor to its default value. 
 ActiveWindow.BackgroundColor = -1 
 
 'Change the application background color again. 
 'Now both the active window color 
 'and the dialog box setting change. 
 vsoApplicationSettings.DrawingBackgroundColor = vbBlue 
 
End Sub

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.

Freigeben über