6.1.13. Управление диаграммой

Предположим, что надо создать годовой отчет о доходах фирмы, причем построить диаграммы дохода только за январь, за январь и февраль, с января по март и т. д. (всего 12 диаграмм). Конечно, можно построить все эти диаграммы, а можно обойтись и одной. В этом случае надо применить инструмент, позволяющий вводить заданный временной интервал, а диаграмма автоматически должна перестраиваться в соответствии с ним. Тут понадобятся элементы управления – Список либо Поле со списком.

Для создания диаграммы нужно выполнить следующие действия:

1. В диапазон А2:А13 ввести названия месяцев (рис. 6.10).

2. В диапазон В2:В13 ввести данные о доходах фирмы.

3. По этим двум диапазонам построить диаграмму.

4. На рабочем листе расположить Поле со списком, которое и позволит произвести выбор временного интервала.

5. При помощи окна Properties установить его значение ListFillRange равным А2:А13. Это свойство заполняет список на основе данных из указанного диапазона.

Рис. 6.10. Управление диаграммой

6. В модуле рабочего листа нужно набрать следующий код:

Private Sub ComboBox1_Change()

Dim r As Integer

ActiveSheet.ChartObjects(1).Activate

r = ComboBox1.ListIndex + 2

With ActiveChart

.SetSourceData _

Source:= Sheets(1).Range(Cells(2, 2), Cells(r, 2)), _

PlotBy:=xlColumns

.SeriesCollection(1).XValues = _

Sheets(1).Range(Cells(2, 1), Cells(r, 1))

End With

End Sub

6.2. Создание диалоговых окон на vba

6.2.1. Общие сведения и применение

Диалоговые окна – наиболее общее и гибкое средство организации взаимодействия пользователя с прикладной программой в Excel. Диалоговое окно представляет собой прямоугольную область экрана, где размещены элементы управления, с которыми работает пользователь. В Excel масса встроенных элементов управления, позволяющих спроектировать и реализовать интерфейс типичной офисной программы. Если же встроенных элементов управления не хватает, можно использовать в своем диалоговом окне произвольные ActiveX-объекты.

В VBA-проекте пользовательское диалоговое окно задает класс объектов. В программе можно объявлять объекты этого класса, т. е. иметь одновременно несколько его экземпляров, динамически менять свойства этих объектов и вызывать их методы, например, показывать и скрывать их.

Каждый элемент управления – это тоже объект определенного класса с предопределенным набором свойств, методов и событий. Начальные значения свойств всего диалогового окна и его отдельных элементов можно задать при проектировании окна. Затем при работе программы некоторые свойства могут меняться пользователем (например, текст в поле ввода, состояния кнопок выбора и т. п.), а некоторые – из программы. Программные изменения происходят обычно в процедурах обработки событий, автоматически запускаемых при наступлении событий, связанных с диалоговым окном и его элементами.

Чтобы диалоговое окно стало доступно пользователю, его нужно вывести на экран в ответ на некоторое действие пользователя или автоматически при некотором изменении состояния программы. Обычно диалоговые окна выводятся командами выпадающих или вспомогательных меню. Диалоговые окна могут также вызываться из других окон. Автоматически выводятся окна, в которых программа после завершения задания сообщает о полученных результатах, окна с информацией об обнаруженных ошибках и т. п.