End Sub. 1.3. Сформируйте процедуры обработки событий для трех флажков CheckBox1, CheckBox2 и CheckBox3 и события Click

Рис.15.3

1.3. Сформируйте процедуры обработки событий для трех флажков CheckBox1, CheckBox2 и CheckBox3 и события Click. В этих процедурах будет установлена связь между флажками и соответствующими ячейками листа «склад» (А11 – А13). В этих ячейках будет помещен результат установки флажка – логическое значение ИСТИНА, если флажок установлен, и логическое значение ЛОЖЬ - если не установлен. (Начальное значение False в этих ячейках устанавливается в процедуре инициализации формы).

Процедуры имеют вид, показанный для первого флажка:

Private Sub CheckBox1_Click()

Sheets("склад").Range("A11").Value = CheckBox1.Value