Объект Worksheet
От описания объекта Workbook (Рабочая книга) нетрудно перейти к рассмотрению объекта Worksheet (Рабочий лист) так же, как при изучении Excel. Вы знаете, что можно делать с рабочим листом: выбирать его, переименовывать, копировать, удалять, вставлять новый лист в рабочую книгу. Чтобы выполнить аналогичные действия с объектом Worksheet, необходимо знать его свойства и методы.
При работе с этим объектом вы в основном будете использовать его свойства. Одно из часто используемых свойств - свойство Name (Имя). В VBA задание свойства Name эквивалентно двойному щелчку на ярлыке рабочего листа и вводу нового имени. Для задания активному листу нового имени Бюджет применяется код
ActiveSheet.Name = "Бюджет"
Предположим, что необходимо форматировать весь рабочий лист. Как выбрать все ячейки листа? Для этого используется свойство Cells (Ячейки). Вот небольшой пример задания шрифта для всех ячеек листа:
Worksheets("Лист1").Cells.Font.Name = "Arial"
При работе с объектом Worksheet часто применяются следующие методы (конечно, список всех методов этого объекта значительно шире):
-
Activate - активизирует рабочий лист;
-
CheckSpelling - используется для проверки орфографии содержимого рабочего листа;
-
Delete - удаляет рабочий лист из рабочей книги.
А как вставить новый лист в рабочую книгу? Ну конечно же, с помощью метода Add! Чтобы вставить и переименовать рабочий лист, выполните следующее.
-
Создайте новую процедуру с именем НовыйЛист.
-
Введите код процедуры
Dim wsNewWorkSheet As Worksheet
Set wsNewWorkSheet = Worksheets.Add
wsNewWorksheet.Name = Format(Date, "d mmmm yyyy")
-
Выполните процедуру.
-
Если вы находились в редакторе 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 (Диапазон).