- •Методические указания
- •Среде Microsoft excel
- •Лабораторная работа №1. Введение в Visual Basic for Applicрations. Структура программы. Типы данных.
- •Р ис. 1.1 Редактор vba
- •Практическое упражнение.
- •Контрольные вопросы.
- •Лабораторная работа №2. Инструкции управления порядком выполнения команд.
- •Инструкция If…Then…Else
- •Инструкция Select Case
- •Безусловный переход с помощью инструкции GoTo
- •Практическое упражнение.
- •Безусловный выход из цикла.
- •Цикл While…Wend
- •Цикл For…Next
- •Практическое упражнение.
- •Контрольные вопросы.
- •Лабораторная работа №4. Массивы. Задание собственных типов данных.
- •Многомерные массивы
- •Задание собственных типов данных
- •Область определения и время жизни переменных
- •Практическое упражнение.
- •Использование окна свойств объекта.
- •Создание форм.
- •Размещение элементов управления в форме
- •Практическое упражнение.
- •Контрольные вопросы.
- •Лабораторная работа №6. Модель объектов Excel.
- •Использование объекта Application.
- •Использование семейства Workbooks.
- •Использование семейства Worksheets.
- •Использование объекта Range.
- •Практическое упражнение.
- •Контрольные вопросы.
Использование семейства Workbooks.
Зная как работать со свойствами и методами семейства Workbooks, можно выполнять все операции над файлами.
Метод Add. Создает новую рабочую книгу (эквивалентен команде Файл/Создать). После создания книги, она становится активной, например:
Workbooks.Add
Метод Open. Используется для открытия существующей рабочей книги:
Workbooks.Open ("a:\windows\excel\video.xls")
Метод Close. Закрывает все рабочие книги:
Workbooks.Close
Свойство Count. В нем хранится число объектов Workbook в семействе Workbooks (т.е. число открытых рабочих книг):
Num = Workbooks.Count
MsgBox "Открыто " & Num & " рабочих книг"
Использование семейства Worksheets.
Семейство Worksheets представляет множество всех объектов Worksheet в рабочей книге. Семейство Worksheets включает метод Add, с помощью которого можно создать рабочий лист. Метод имеет следующий синтаксис:
Worksheets.Add
Для выбора активного листа, используется метод Select, например:
Worksheets("Лист1").Select
Для удаления рабочего листа используется метод Delete:
Worksheets("Лист1").Delete
Семейству Worksheets принадлежит свойство Visible. Если данное свойство имеет значение True (по умолчанию), то рабочий лист виден на экране. В противном случае лист не виден. С помощью этого свойства можно, например, скрыть определенный рабочий лист и пользователь не сможет его увидеть и внести в него изменения:
Worksheets("Лист1").Visible = False
Использование объекта Range.
Объект Range - наиболее часто используемый объект Excel. Характерная особенность этого объекта заключается в том, что он не входит ни в одно семейство. Объектом Range является ячейка, строка, столбец, несколько расположенных как рядом, так и отдельно ячеек. Обратите внимание, что одна ячейка - это также объект Range. Диапазон можно задать в программе следующим образом:
Используя ссылку на ячейки, например, Range ("G14") или Range ("B1:B6").
Используя имя диапазона, например, "Итоги". Чтобы сослаться на этот диапазон, требуется указать выражение Range ("Итоги").
Используя объект ActiveCell. Объект ActiveCell указывает на ячейку (или объект Range), который имеет фокус при вводе данных с клавиатуры.
Используя объект Selection. Объект Selection - это то, что выделено на рабочем листе. Он может указывать на тот же диапазон, что и объект ActiveCell, а может и не указывать. С помощью объекта Selection можно сослаться, например, на диапазон, включающий одну или несколько ячеек, на рисунок или диаграмму. Объект ActiveCell всегда указывает на диапазон, содержащий одну ячейку.
Свойство Address. В свойстве Address хранится расположение диапазона на рабочем листе, например:
MsgBox Selection.Address
или
MsgBox ActiveCell.Address
Определите, в чем сходство и отличия этих двух инструкций.
Свойство Formula. Свойство Formula используется для задания или чтения формулы. После ввода формулы в объект Range свойству HasFormula автоматически присваивается значение True. Например, если необходимо задать функцию Sum для ячейки С7, укажите следующую инструкцию:
Range ("C7").Formula = "=Sum (C1:C6)"
Свойство Name. Чтобы присвоить в программе имя диапазону, используется свойство Name. Например, для задания диапазона Title, укажите следующую инструкцию:
Range ("A1:D1").Name = "Title"
Свойство Value. Используется для установки или чтения содержимого указанной ячейки, например:
Range ("A1:A5").Value = 5
Num = Range ("A4").Value
Метод Select. Используется для выбора активной ячейки:
Range("I4").Select
