1.5.5. Функция InputBox
Функция InputBox выводит диалоговое окно с сообщением, полем ввода и двумя кнопками ОК и Отмена. Значение, возвращаемое InputBox, зависит от того, какую кнопку нажмет пользователь. Если это – ОК, возвращается введенная строка, если – Cancel, то пустая.
Синтаксис:
InputBox(prompt[, title] [, default] [, xpos] [, ypos] [, helpfile, context])
Синтаксис функции InputBox содержит следующие именованные аргументы:
Аргумент |
Описание |
prompt |
Сообщение в диалоговом окне. Может состоять из нескольких строк. Для разделения строк можно использовать символ возврата каретки (Chr(13)), перевода строки (Chr(10)) или комбинацию этих символов (Chr(13) & Chr(10)) |
title |
Заголовок диалогового окна |
default |
Строковое значение в поле ввода, установленное по умолчанию. Если это значение не указано, то поле ввода пусто. |
Примеры:
1. Следующая команда запрашивает ваше имя:
Имя = InputBox ("Введите Ваше имя:")
В результате на экране появляется диалоговое окно
После того как вы введете своё имя и нажмете кнопку ОК, это значение будет присвоено переменной Имя.
1.6. Объект Worksheet
Объект Worksheet содержится в объекте Workbook. Этот объект представляет рабочий лист Excel – мощное средство для ввода и изменения данных. Рабочие листы содержат около 400 встроенных функций, позволяющих в мгновение ока производить сложные вычисления. Табличная структура листов делает их идеальным средством для хранения и обобщения данных небольшого объема.
1.6.1. Свойства объекта Worksheet и семейства Worksheets
Свойство |
Значение |
Name |
Имя рабочего листа. String; доступно для чтения/записи. Worksheets(1).Name = "Мой рабочий лист" |
Count |
Возвращает число рабочих листов в книге. Long; доступно только для чтения. КолЛистов = ActiveWorkbook. _ Worksheets.Count |
Index |
Возвращает номер рабочего листа в семействе. Variant; доступно только для чтения. ActiveSheet.Name = "Лист" & _ ActiveSheet.Index |
Columns (Rows) |
Возвращает семейство всех столбцов (строк) рабочего листа или конкретный столбец (строку), если указан его порядковый номер. В следующем примере на листе1 удаляется 3-я строка: Worksheets("Лист1").Rows(3).Delete |
1.6.2. Методы объекта Worksheet и семейства Worksheets
Метод |
Действие |
||||||||
Activate |
Активизирует рабочий лист. Аргументов нет. Worksheets("Moй рабочий лист").Activate |
||||||||
Select |
Выбирает указанный рабочий лист(листы): Worksheets("Moй лист").Select Sheets(Array("Лист1", "Лист2")).Select |
||||||||
Add |
Добавляет лист в рабочую книгу, при этом он становится активным. Синтаксис: Add(Before, After, Count, Type) Аргументы:
Если оба аргумента Before и After опущены, то новый лист вставляется перед активным листом. ActiveWorkbook.Sheets.Add _ Before:=Worksheets(Worksheets.Count) |
||||||||
Delete |
Удаляет рабочий лист из книги. Аргументов нет. Worksheets("Moй рабочий лист").Delete |
||||||||
Copy
|
Копирование рабочего листа. Синтаксис: Copy (Before, After) Аргументы:
Sheets("Лист1").Copy _ After:=Workbooks("ИиЭ.xls").Sheets(1) |
||||||||
Calculate |
Пересчитывает все формулы на рабочем листе. Аргументов нет. Worksheets(1).Calculate |