Propiedad Window.BackgroundColorGradient (Visio)

Determina el color del degradado de fondo de la ventana de dibujo activa de Microsoft Visio, así como de sus ventanas de vista preliminar y de vista de pantalla completa asociadas. Lectura y escritura.

Sintaxis

expresión. BackgroundColorGradient

Expresión Variable que representa un objeto Window .

Valor devuelto

OLE_COLOR

Observaciones

Los valores válidos para una propiedad OLE_COLOR dentro de Visio pueden ser uno de los siguientes:

• &H00 bbggrr, donde bb es el valor azul entre 0 y 0xFF (255), gg el valor verde y rr el valor rojo.

• &H800000 xx , donde xx es un índice GetSysColor válido.

Para obtener más información sobre la función GetSysColor , busque " GetSysColor " en el SDK de plataforma de Microsoft en MSDN.

El tipo de datos OLE_COLOR lo utilizan las propiedades que devuelven colores. Cuando una propiedad se declara como OLE_COLOR, la ventana Propiedadesdel editor de Visual Basic muestra un cuadro de diálogo selector de color que permite al usuario seleccionar visualmente el color de la propiedad, en lugar de tener que recordar el equivalente numérico.

Por otra parte, puede usar las siguientes constantes de color de Microsoft Visual Basic para Aplicaciones (VBA) para OLE_COLOR.

Constante	Valor	Descripción
vbBlack	0x0	Negro
vbRed	0xFF	Rojo
vbGreen	0xFF00	Verde
vbYellow	0xFFFF	Amarillo
vbBlue	0xFF0000	Azul
vbMagenta	0xFF00FF	Magenta
vbCyan	0xFFFF00	Aguamarina
vbWhite	0xFFFFFF	Blanco

Para una ventana de dibujo, una ventana de vista previa de impresión o una ventana de vista a pantalla completa, al establecer la propiedad BackgroundColorGradient de la ventana en un valor distinto del valor predeterminado (-1) se invalida la configuración ApplicationSettings.DrawingBackgroundColorGradient para ese conjunto de ventanas. Para poder restablecer esta propiedad para el mismo conjunto de ventanas, debe restablecer BackgroundColorGradient a su valor predeterminado, -1. Si hay varios dibujos abiertos, establecer BackgroundColorGradient para un conjunto de ventanas no tiene ningún efecto en la configuración de otros conjuntos de ventanas abiertos.

Sin embargo, para una ventana shapeSheet, establecer la propiedad BackgroundColorGradient de la ventana en un valor distinto del predeterminado no tiene ningún efecto, ya sea en el color de fondo de la ventana ShapeSheet o en cualquiera de los demás valores de ventana.

Ejemplo

La macro de VBA siguiente muestra cómo utilizar la propiedad BackgroundColorGradient para obtener y establecer el color del degradado de fondo de la ventana activa. También muestra cómo obtener un objeto ApplicationSettings del objeto Application de Visio y muestra la relación entre la propiedad BackgroundColorGradient y la propiedad ApplicationSettings.DrawingBackgroundColorGradient . En este ejemplo se supone que hay una ventana de dibujo activa abierta en Visio y que inicialmente todas las propiedades de color de degradado de fondo están establecidas en sus valores predeterminados.

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