Метод Application.BoxStylesEditEx (Project)

Задает стиль полей в представлении сетевой схемы, где цвета могут быть шестнадцатеричными значениями.

Синтаксис

выражение. BoxStylesEditEx( _Style_, _DataTemplate_, _HorizontalGridlines_, _VerticalGridlines_, _BorderShape_, _BorderColor_, _BorderWidth_, _BackgroundColor_, _BackgroundPattern_ )

Выражение Выражение, возвращающее объект Application .

Параметры

Имя Обязательный или необязательный Тип данных Описание
Style Обязательный Long Стиль коробки для изменения. Может быть одной из констант PjBoxStyle .
Datatemplate Необязательный String Имя шаблона данных, используемого для стиля.
HorizontalGridlines Необязательный Логический Значение true, если горизонтальные линии сетки разделяют каждую строку в поле; в противном случае — False.
VerticalGridlines Необязательный Логический Значение true, если вертикальные линии сетки разделяют каждую строку в поле; в противном случае — False.
BorderShape Необязательный Long Форма рамки поля. Может быть одной из констант PjBoxShape .
BorderColor Необязательный Long Цвет рамки поля. Может быть шестнадцатеричным значением для цвета RGB, где красный — последний байт. Например, значение &HFF0000 — синим, а &H00FFFF — желтым.
BorderWidth Необязательный Long Значение от 1 до 4, указывающее ширину границы поля в пикселях.
BackgroundColor Необязательный Long Цвет фона коробки. Может быть шестнадцатеричным значением для цвета RGB.
BackgroundPattern Необязательный Long Шаблон фона. Может быть одной из констант PjBackgroundPattern .

Возвращаемое значение

Boolean

Примечания

Чтобы отобразить диалоговое окно Стили полей , используйте метод BarBoxStyles .

Пример

В следующем примере изменяются поля со стилем pjBoxCritical , чтобы они отображались в виде скругленные прямоугольники, добавляются вертикальные линии сетки, задаются темно-красный цвет границы, а цвет фона — светло-серый с двояким узором.

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

Примечание.

Если вы используете любую из констант перечисления PjColor для параметров BorderColor или BackgroundColor , цвет будет почти черным. Например, значение pjGreen равно 9, что в методе BoxLinksEx является очень темно-красным. Чтобы использовать только шестнадцать цветов, доступных с константами PjColor , используйте метод BoxStylesEdit .

Поддержка и обратная связь

Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.