1. Э лементы управления (ActiveX).
1.1. Добавление кнопки:
- Разработчик / Вставить 6/ Элементы ActiveX, Кнопка, режим конструктора,
- растянуть кнопку на листе,
- правой кнопкой по кнопке / Свойства:
| Свойство | Значение |
| Name (имя) | cmdNumber1 |
| Caption (заголовок) | Закрыть |
1. 2. Программирование кнопки:
- правой кнопкой по кнопке / Исходный текст – окно VBA,
- ввести код:
| Private Sub cmdNumber1_Click() | Начало процедуры для события Click – щелчок по кнопке |
| 'Загрузка формы | Комментарий |
| Load frmNumber1 | Загрузка формы с именем Number1 |
| frmNumber1.Show | Вывод на экран формы Number1 |
| End Sub | Окончание процедуры |
1.3. Пользовательские формы:
- Insert / User Form, View / Properties Window
- визуальные компоненты диалога: View / ToolBox
| Визуальный компонент | Назначение | Префикс |
Label
| Текстовая метка – ввод текста | lbl |
TextBox
| Тестовое поле - ввод – вывод строки текста | txt |
ListBox
| Список - выбор значения из набора | lst |
CheckBox,
OptionButton
| Переключатели | chk,opt |
ToggleButton
| Кнопка – выбор значения | tgb |
CommandButton
| Командная кнопка - выполнение действия | cmd |
Frame
| Кадр - группировка элементов формы | fra |
1.4. Создание формы «Закрыть»:
- создать на рабочем листе командную кнопку с заголовком «Закрыть форму!», запрограммировать ее:
Private Sub cmdForm1_Click()
| Начало процедуры для события Click – щелчок по кнопке |
| 'Загрузка формы | Комментарий |
| Load Form1 | Загрузка формы с именем Form1 |
| Form1.Show | Вывод на экран формы Form1 |
| End Sub | Окончание процедуры |
- создать форму Form1 с текстовой меткой и командной кнопкой:
Текстовая метка:
| Свойство | Значение |
| Caption (Заголовок) | Первая форма |
| AutoSize (Автоподбор) | True |
| BackColor (Цвет заливки) | Выбрать |
| Font (Шрифт) | Гарнитура шрифта |
| ForeColor (Цвет шрифта) | Выбрать |
| Picture (Рисунок) | Выбор рисунка |
| TextAlign(Выравнивание текста) | 2 - … Center |
Командная кнопка: имя – CloseButton, заголовок – Закрыть!, изменить шрифт, заливку.
Программирование кнопки:
- открыть редактор VBA,
- ввести End между операторами:
Label
TextBox
ListBox
CheckBox,
OptionButton
ToggleButton
CommandButton
Frame
Private Sub cmdForm1_Click()






