На этом шаге мы рассмотрим способ вызова встроенных диалоговых окон.
VBA позволяет отображать программно на экране встроенные диалоговые окна в Excel наряду с пользовательскими диалоговыми окнами. Все встроенные диалоговые окна в Excel образуют семейство Dialogs, индекс которого специфицирует активизируемое диалоговое окно. Отображение встроенного диалогового окна на экране осуществляется методом Show. Например, следующая процедура при нажатии кнопки активизирует диалоговое окно Открытие документа (Open) (рисунок 1).
Рис.1. Диалоговое окно Открытие документа
Private Sub CommandButton1_Click() Application.Dialogs(xlDialogOpen).Show End Sub
Перечислим еще несколько параметров, которые используются для доступа к специфическим втсроенным диалоговым окнам.
- xlDialogFindFile - диалоговое окно Открытие документа (Open) при поиске файла;
- xlDialogPivotTableWizard - диалоговое окно Мастер сводных таблиц (Pivot Table Wizard);
- xlDialogSaveAs - диалоговое окно Сохранить как (Save as);
- xlDialogSaveWorkbook - диалоговое окно Сохранить (Save);
- xlDialogPrint - диалоговое окно Печать (Print).
Со следующего шага мы начнем рассматривать программирование панели инструментов.
