Dim r as range

With ActiveWindow

.DisplayGridlines = False

.DisplayWorkBookTabs = False

End With

Объект из семейства Workbooks позволяет работать с рабочей книгой:

ü Close – закрытие рабочей книги;

ü Protect (password) – защита рабочей книги;

ü Save – сохраняет рабочую книгу под прежним именем;

ü SaveCopyAs(filename) – сохранение рабочей книги под новым именем, указанным в агрументе.

Например, чтобы защитить рабочую книгу с паролем MY, можно написать:

WorkBooks(“Mybook.xls”).protect “MY”

Объект из семейства Worksheets позволяет работать с конкретным листом активной рабочей книги:

ü Name – изменение имени данного листа;

ü Visible (True/False)– для скрытия или отображения листа;

ü UsedRange – ссылка на заполненный диапазон рабочего листа (только для чтения);

ü Activate – активизация листа;

ü Add – добавление листа в рабочую книгу;

ü Delete – удаление листа из данной рабочей книги.

Например, чтобы обратиться к диапазону рабочего листа, содержащему данные, введем переменную типа Range и в нее запишем ссылку на заполненный диапазон.

Set r = Worksheets(“Лист1”).UsedRange

Чтобы добавить лист (после добавления он автоматически становится активным) и переименовать его:

Sheets.Add

ActiveSheet.Name = “Отчет”

Объект Range позволяет работать с конкретной ячейкой или диапазоном ячеек рабочего листа. К ячейке можно обращаться несколькими способами:

ü Используя конкретную адресацию – Range(“a1”), Range(“A1:B5”);

ü Используя номер строки и столбца – Cells(3,5), Range(Cells(2, 2), Cells(5, 5)), где в скобка указывается сначала номер строки, а затем номер столбца.

Ячейки поддерживают следующие свойства и методы:

ü Font – изменяет шрифт содержимого ячеек в указанном диапазоне;

Пусть требуется отформатировать диапазон рабочего листа следующим образом: установить для букв высоту шрифта – 16, полужирный курсив красного цвета.

Функция RGB определяет цвет, полученный сочетанием цветов, указанных в качестве параметров в следующем порядке: красный, зеленый, голубой. Интенсивность цвета определяется константами от0 до 255.

ü Interior – изменяет цвет фона и тип штриховки;

Пусть требуется для диапазона ячеек задать фоновый узор из светлых горизонтальных линий голубого цвета. Свойству ColorIndex задаем номер цвета по встроенной числовой палитре (число от 0 до 56).

ü Border – задает вид границы данного диапазона;

Пусть требуется на рабочем листе провести сплошную толстую горизонтальную линию, которая является нижней границей заданного диапазона ячеек. Тип границы (верхняя, нижняя, левая или правая) задается аргументом метода Borders.

ü NumberFormat – изменяет формат представления данных в указанном диапазоне;

Пусть требуется отформатировать данные в денежном формате с двумя знаками после запятой, выделяя отрицательные числа красным цветом:

Range("a1:m10").NumberFormat = "$# ##0.00_);[Red]$# ##0.00"

ü HorizontalAlignment – осуществляет выравнивание содержимого по горизонтали;

ü VerticalAlignment – осуществляет выравнивание содержимого по вертикали;

ü Merge – объединяет ячейки указанного диапазона;

Пусть требуется объединить диапазон ячеек и выровнять содержимое объединенной ячейки по горизонтали и вертикали по центру.

With Range("a1:m10")

.Merge

.HorizontalAlignment = xlCenter

.VerticalAlignment = xlCenter

End With

ü Сopy – копирует содержимое ячеек указанного диапазона в буфер.

ü Style – задает стиль форматирования.

Пусть требуется создать стиль форматирования под именем New и применить его к данному диапазону:

Объект из семейства Shapes позволяет работать с графическими объектами, расположенными в верхнем слое рабочего листа или диаграммы:

ü AddShape – добавляет графический объект на данный рабочий лист;

ü AddPicture – добавляет рисунок на данный рабочий лист;

ü AddLabel – добавляет надпись на данный рабочий лист. В качестве аргументов метода указывается тип добавляемого объекта, отступ слева, отступ сверху от границ рабочего листа, ширина объекта и его высота;

ü Сopy – копирует объект в буфер обмена;

ü Delete – удаляет объект с рабочего листа;

ü Left, Top, Width, Height – определяют месторасположение и размер графического объекта;

ü Type – константа идентифицирующая тип объекта;

ü Visible – видимость объекта;

ü Fill – содержит свойства для задания цвета фигуры, типа штриховки и текстуры;

ü Characters – позволяет разместить текст на объекте.

Пусть требуется добавить графический объект на рабочий лист и написать на нем слово «Заставка»:

Лекция №3.

Дата добавления: 2014-01-04