Добавил:
Upload Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз: Предмет: Файл:
Информатика.Учебное пособие - КузГТУ.pdf
Скачиваний:
231
Добавлен:
10.05.2015
Размер:
5.61 Mб
Скачать

тание (обычный, курсив, полужирный, полужирный курсив); ColorIndex – определяет цвет шрифта, в качестве которого задается его номер; xlAutomatic (константа) – цвет по умолчанию; Color – задает произвольный цвет с использованием палитры RGB; Underline – подчеркивание текста в ячейке (табл. 5.19).

Пример:

Range(“D3:F3”).Select

With Selection.Font

.Name=”Arial Cur”

.Size=14

.Underline=xlUnderlineStyleNone

.Color Index=xlAutomatic End With Selection.Font.Bold=True Selection.Font.ColorIndex=3

5.4.4.4.2. Оформление границ ячейки

Оформление границ ячеек задается с помощью свойства объекта Border. Для диапазона ячеек границы делятся на внешние и внутренние. Доступ к определенным границам производится через набор Borders (границы). Границы могут задаваться константами, список которых приведен в табл. 5.20.

Таблица 5.20

Константа

Граница

xlEdgeBottom

Внешняя нижняя

xlEdgeTop

Внешняя верхняя

xlEdgeLeft

Внешняя левая

xlEdgeRight

Внешняя правая

xlInsideHorizontal

Внутренняя горизонтальная

xlInsideVertical

Внутренняя вертикальная

xlDiagonalDown

От верхнего правого до нижнего левого

угла

xlDiagonalUp

От нижнего левого до верхнего

правого угла

Параметры границ определяются за счет следующих свойств. LineStyle – задает стиль линии (табл. 5.21). Weight – определя-

258

ет толщину линии (табл. 5.22). Цвет границы задается свойствами

ColorIndex и Color.

 

 

Таблица 5.21

Константа

Стиль линии

xlContinuous

Сплошная линия

xlDash

Прерывистая линия

xlDashDot

Пунктирная линия

xlDashDotDot

Двойная пунктирная линия

xlDot

Точечная линия

xlDouble

Двойная линия

xlLineStyleNone

Нет линии

 

 

Таблица 5.22

Константа

 

Толщина линии

 

 

 

xlHairline

 

Сверхтонкая

xlThin

 

Тонкая

xlMedium

 

Средняя

xlThick

 

Жирная

Примеры:

 

Range(“C1:F3”).Select

 

Selection.Borders(xlDiagonalDown).LineStyle=xlNone

Selection.Borders(xlDiagonalUp).LineStyle=xlNone

With Selection.Borders(xlEdgeLeft)

.LineStyle=xlContinuous

.Weight=xlThin

.ColorIndex=xlAutomatic End With

With Selection.Borders(xlInsideHorizontal)

.LineStyle=xlContinuous

.Weight=xlThin

.ColorIndex=xlAutomatic End With

With Selection.Borders(xlInsideVertical)

.LineStyle=xlContinuous

.Weight=xlThin

.ColorIndex=xlAutomatic End With

259

5.4.4.4.3. Заливка ячейки

Цвет и узор, которыми заполняется ячейка, определяются c помощью свойства объекта Interior. Цвет заливки задается свойствами Color или ColorIndex. Pattern – определяет узор заливки ячейки (табл. 5.23).

Таблица 5.23

Константа

Узор заливки

xlSolid

Сплошной

xlGray75

75 % – серый

xlGray50

50 % – серый

xlGray25

25 % – серый

xlGray16

12,5 % – серый

xlGray8

6,25 % – серый

xlHorizontal

Горизонтальный штриховой

xlVertical

Вертикальный штриховой

xlDown

Перевернутый диагональный штриховой

XlUp

Диагональный штриховой

xlChecker

Диагональный клетчатый

xlSemiGray75

Толстый диагональный клетчатый

xlLightHorizontal

Тонкий горизонтальный штриховой

xlLightVertical

Тонкий вертикальный штриховой

xlLightDown

Тонкий перевернутый диагональный

xlLightUp

Тонкий диагональный

XlGrid

Тонкий горизонтальный клетчатый

xlCrissCross

Тонкий диагональный клетчатый

Цвет узора заливки задается свойствами

PatternColorIndex и PatternColor.

Пример:

Range(“C1:F3”).Select

With Selection.Interior

.ColorIndex=6

.Pattern=xlSolid End With

260