ign="justify"> ThisWorkbook цілком допустимо.
Private Sub Workbook_Open (). Show Sub
8. Користувальницькі форми і обробка подій
Зовнішній вигляд користувача форми OptionsForm зображений на малюнку 8.1. На формі розташовані стандартні кнопки ОК і Скасувати, підпис з описом і рамка Options, а також два перемикача, включені в рамку, - Option1 і Option2.
В
Малюнок 8.1. - Зовнішній вигляд користувача форми Options Form
Користувацька форма InputsForm містить 10 текстових полів введення даних і відповідні підписи (малюнок 8.2), стандартні кнопки ОК і Скасувати , а також кілька підписів з описом призначення діалогового вікна зліва від кнопок. Поля введення даних, кожне для свого дня тижня, називаються Day1Box , Day2Box і т.д. до Day7Box (з понеділка по неділю). Поля для вказівки ставки заробітної плати називаються WeekdayBox і WeekendBox , а поле для введення максимально допустимої кількості співробітників з несуміжними вихідними (у процентному відношенні) називається MaxPctBox .
Як тільки розробка користувача форми буде завершена, можна приступати до написання коду обробки подій. Для діалогового вікна OptionsForm в процедурі UserForm_Initialize перший перемикач встановлюється за замовчуванням. Процедура OKButton_Click заносить встановлене значення в змінну Choice. Процедура CancelButton_Click вивантажує призначену для користувача форму і завершує виконання програми.
8.1 Код обробки подій форми OptionsForm
Sub UserForm_Initialize ()
'Встановлення першого перемикача за замовчуванням
Optionl = True SubSub OKButton_Click ()
'Збереження перемикача у змінній Choice
If Option1 = True Then
Choice = 1
Choice = 2If
'Вивантаження діалогового вікна
Unload Me Sub
Private Sub CancelButton...