Método Application.BoxStylesEditEx (Project)

Define o estilo das caixas no modo de exibição Diagrama de Rede, onde as cores podem ser valores hexadecimais.

Sintaxe

expression. BoxStylesEditEx( _Style_, _DataTemplate_, _HorizontalGridlines_, _VerticalGridlines_, _BorderShape_, _BorderColor_, _BorderWidth_, _BackgroundColor_, _BackgroundPattern_ )

Expressão Uma expressão que retorna um objeto Application .

Parâmetros

Nome	Obrigatório/Opcional	Tipo de dados	Descrição
Estilo	Obrigatório	Long	O estilo de caixa a ser alterado. Pode ser uma das constantes PjBoxStyle.
Datatemplate	Opcional	String	O nome do modelo de dados a ser usado para o estilo.
HorizontalGridlines	Opcional	Boolean	True se linhas de grade horizontais separam cada linha na caixa; Caso contrário, False.
VerticalGridlines	Opcional	Boolean	True se linhas de grade verticais separarem cada linha na caixa; Caso contrário, False.
BorderShape	Opcional	Long	A forma da borda da caixa. Pode ser uma das constantes PjBoxShape.
BorderColor	Opcional	Long	A cor da borda da caixa. Pode ser um valor hexadecimal para a cor RGB, onde vermelho é o último byte. Por exemplo, o valor &HFF0000 é azul e &H00FFFF é amarelo.
BorderWidth	Opcional	Long	Um valor de 1 a 4 que especifica a largura da borda da caixa, em pixels.
BackgroundColor	Opcional	Long	A cor do plano de fundo da caixa. Pode ser um valor hexadecimal da cor RGB.
BackgroundPattern	Opcional	Long	O padrão do plano de fundo. Pode ser uma das constantes PjBackgroundPattern.

Valor de retorno

Boolean

Comentários

Para exibir a caixa de diálogo Estilos de Caixa, use o método BarBoxStyles.

Exemplo

O exemplo a seguir altera as caixas com o estilo pjBoxCritical a serem exibidas com retângulos arredondados, adiciona linhas de grade verticais, define a cor da borda como um vermelho escuro e define a cor de plano de fundo cinza claro com um padrão pontilhado.

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

Observação

Se você usar qualquer uma das constantes de enumeração PjColor para os parâmetros BorderColor ou BackgroundColor , a cor será quase preta. Por exemplo, o valor de pjGreen é 9, que no método BoxLinksEx é vermelho muito escuro. Para usar somente as dezesseis cores disponíveis com constantes PjColor, use o método BoxStylesEdit.

Suporte e comentários

Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.