Compartir a través de


Método Application.BoxStylesEditEx (Project)

Establece el estilo de cuadros en la vista Diagrama de red, donde los colores pueden ser valores hexadecimales.

Sintaxis

expresión. BoxStylesEditEx( _Style_, _DataTemplate_, _HorizontalGridlines_, _VerticalGridlines_, _BorderShape_, _BorderColor_, _BorderWidth_, _BackgroundColor_, _BackgroundPattern_ )

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

Parameters

Nombre Obligatorio/opcional Tipo de datos Descripción
Estilo Obligatorio Long Estilo de cuadro que se va a cambiar. Puede ser una de las constantes de PjBoxStyle.
DataTemplate Opcional String Nombre de la plantilla de datos que se va a usar para el estilo.
HorizontalGridlines Opcional Boolean True si las líneas de cuadrícula horizontales separan cada fila en el cuadro; de lo contrario, False.
VerticalGridlines Opcional Boolean True si las filas en el cuadro; separan por líneas verticales de lo contrario, False.
BorderShape Opcional Long Forma del borde del cuadro. Puede ser una de las constantes de PjBoxShape.
BorderColor Opcional Long El color del borde del cuadro. 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.
BorderWidth Opcional Long Valor comprendido entre 1 y 4 que determina el ancho del borde del cuadro en píxeles.
BackgroundColor Opcional Long Color de fondo del cuadro. Puede ser un valor hexadecimal del color RGB.
BackgroundPattern Opcional Long Patrón del fondo. Puede ser una de las constantes de PjBackgroundPattern:

Valor devuelto

Boolean

Comentarios

Para mostrar el cuadro de diálogo Estilos de cuadro, use el método BarBoxStyles.

Ejemplo

El ejemplo siguiente se cambian los cuadros cuyo estilo es pjBoxCritical para que se muestren como rectángulos redondeados, agrega líneas de cuadrícula verticales, establece el color del borde en un rojo oscuro y establece el color de fondo gris claro con un patrón de interpolación.

Sub BoxStyles_EditCritical() 
 'Activate the Network Diagram view 
 ViewApply Name:="Network Diagram" 
 
 BoxStylesEditEx Style:=pjBoxCritical, BorderShape:=pjBoxRoundedRectangle, VerticalGridlines:=True, _ 
 BorderColor:=&HB0, BorderWidth:=3, _ 
 BackgroundColor:=&HE0E0E0, BackgroundPattern:=pjBackgroundLightDither 
End Sub

Nota:

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

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.