Объект Worksheet

От описания объекта Workbook (Рабочая книга) нетрудно перейти к рассмотрению объекта Worksheet (Рабочий лист) так же, как при изучении Excel. Вы знаете, что можно делать с рабочим листом: выбирать его, переименовывать, копировать, удалять, вставлять новый лист в рабочую книгу. Чтобы выполнить аналогичные действия с объектом Worksheet, необходимо знать его свойства и методы.

При работе с этим объектом вы в основном будете использовать его свойства. Одно из часто используемых свойств - свойство Name (Имя). В VBA задание свойства Name эквивалентно двойному щелчку на ярлыке рабочего листа и вводу нового имени. Для задания активному листу нового имени Бюджет применяется код

ActiveSheet.Name = "Бюджет"

Предположим, что необходимо форматировать весь рабочий лист. Как выбрать все ячейки листа? Для этого используется свойство Cells (Ячейки). Вот небольшой пример задания шрифта для всех ячеек листа:

Worksheets("Лист1").Cells.Font.Name = "Arial"

При работе с объектом Worksheet часто применяются следующие методы (конечно, список всех методов этого объекта значительно шире):

• Activate - активизирует рабочий лист;
• CheckSpelling - используется для проверки орфографии содержимого рабочего листа;
• Delete - удаляет рабочий лист из рабочей книги.

А как вставить новый лист в рабочую книгу? Ну конечно же, с помощью метода Add! Чтобы вставить и переименовать рабочий лист, выполните следующее.

1. Создайте новую процедуру с именем НовыйЛист.
2. Введите код процедуры

Dim wsNewWorkSheet As Worksheet

Set wsNewWorkSheet = Worksheets.Add

wsNewWorksheet.Name = Format(Date, "d mmmm yyyy")

1. Выполните процедуру.
2. Если вы находились в редакторе Visual Basic во время выполнения процедуры, то перейдите в окно программы Excel. Вы увидите новый рабочий лист, где в качестве имени листа будет стоять текущая дата (рис. 9.2).

Рис. 9.2. Обратите внимание, что в качестве имени нового листа стоит дата

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

Dim wsNewWorkSheet As Worksheet

Set wsNewWorkSheet = Worksheets.Add

После создания листа используется свойство Name для задания имени в виде текущей даты.

wsNewWorkSheet.Name = Format(Date, "d mmmm yyyy")

Функция Format (Формат) применяется для управления внешним видом (форматом) даты. В данном случае дата будет иметь такой формат: день, полное название месяца, четыре цифры для записи года.

Многие разработчики используют текущие даты в качестве имен рабочих книг и листов. Это помогает избегать дублирования имен.

Резюме

В этом часе мы поработали с некоторыми основными объектами Excel: Application, Workbook и Worksheet. Объект Application позволяет задавать установки и параметры уровня приложения, а также использовать встроенные функции Excel. С помощью объектов Workbook и Worksheet можно соответственно манипулировать файлами рабочих книг и рабочими листами внутри книг.

В следующем часе мы ближе познакомимся с другим основным объектом Excel - объектом Range (Диапазон).