Создание элементов управления интерфейса на листах MS Excel

Помимо использования стандартных возможностей, многие удачно реализованные на Excel проекты имеют удобный, максимально приспособленный для решения конкретной задачи интерфейс. Это можно осуществить, используя средства VBA.

Пример.

На ЛистеЗ поместить кнопку,при нажатии которой вызывается калькулятор из стандартных программ Windows.

Перейдем на ЛистЗ, активизируем панель инструментов Элементы управления и нажав на ней кнопку Режим конструктора переведем MS Excel

в режим конструктора. Перетащим мышью элемент Кнопка на лист в нужное местоположение. На поверхности кнопки будет автоматически отображена надпись CommandButtonl.

Нажмем кнопку Свойства на панели инструментов Элементы управления и изменим значения некоторых свойств Кнопки:

• Caption - введем надпись «Калькулятор»,

• Font - увеличим размер шрифта и установим его жирность,

• BackColor - установим красный цвет шрифта,

• ForeCblor - установим желтый цвет фона кнопки.

Нажмем кнопку Исходный текст на панели инструментов, в результате откроется редактор VBA, причем в окне кода автоматически будут создана первая и последняя инструкции обработки события Click кнопки, генерируемого при ее нажатии. Добавим строку вызова функции Shell(...), которая будет запускать на выполнение программу калькулятора calc.exe

 

 

 

Private Sub CommandButtonl click() MyAppID = Sheiil(“C:\Windows\System32\calc.exe'r) End:Sub

 

Замечание. Если функция Shell успешно запускает исполняемый файл, она возвращает ID запущенной программы - уникальный номер, который идентифицирует выполняемую программу. В противном случае, если функция Shell не может запустить программу, она возвращает значение МуАррID=0.

На ЛистеЗ получаем результат нажатия кнопки: