В Vba Есть Функции Аналогичные Функциям Рабочего Листа Excel
Активизация кнопки — Элементы управления, приведёт к открытию дополнительной панели инструментов с таким же названием, на которой находятся основные элементы управления, её внешний вид представлен на рис 6. Если подвести указатель мыши к любой пиктограмме на панели инструментов, то будет показана подсказка с наименованием элемента.
Рис. 8. Элементы управления, размещённые на листе Excel
Рис. 9. Внешний вид окна для записи программных кодов в процедуру
Обработка события Click , которое вызывает пользователь, нажав на кнопку с наименованием «Посмотреть список», осуществляется процедурой Private Sub CommandButton1_Click(), внутри которой расположена программа. Программные коды представлены на рис 10.
Рис. 10. Программа обработки события – нажать на кнопку «Посмотреть список»
Пользователь может добавлять в исходную таблицу новые строки или вводить исправления в данные, поэтому для того, чтобы посмотреть новый список, целесообразно его очистить. Для этой цели и была создана кнопка «Удалить сведения», текст этой программы приведён на рис 11.
Рис.11. Программа для очистки текстовых окон на листе Excel
На рис 13 представлена книга со списком сотрудников, созданная в Excel 2007, на которой расположены элементы управления для автоматизации работы пользователя.
Рис. 13. Отображение панели инструментов для Excel 2007 с размещённой таблицей и элементами управления
Решение поставленной задачи осуществим средствами Excel . Алгоритм формирования файла из таблицы Excel состоит из ряда последовательных действий, которые включают:
— выбор из списка фамилий и других данных, кому потребуются пропуска;
— формирование файла с данными и отправка его отделу охраны предприятия.
Подготовим интерфейс для работы сотрудника отдела кадров с приложением Excel , внешний вид заготовки представлен на рис 14.
Рис. 14. Интерфейс пользователя для подготовки файла с данными
Рис. 15. Программа для обработки события — нажать на кнопку «Ввести условие отбора»
y = InputBox(«Введите год, ниже которого будут отобраны сведения из таблицы», _
Рис. 16. Диалоговое окно для ввода критерия отбора данных из таблицы
Передача, отобранных сведений из таблицы, осуществляется после того, как пользователь нажмёт на кнопку «Подготовить файл». В этом случае будет запущена процедура, текст которой представлен на рис 18.
Рис. 18. Программные коды процедуры — запись данных в файл
Рис. 19. Отображение в приложении Блокнот, записанных сведений в файл
Пользователь получает на экране компьютера подтверждение (рис 20), которое создано с помощью функции MsgBox (). Обратите внимание, что при задании в функции аргумента – vbInformation, на диалоговом окне отображается только одна кнопка и символ информация.
Рис. 20. Сообщение пользователю о завершении записи данных в файл
Процедура очистки окон запускается нажатием на кнопку «Очистить список», как она создавалась описание дано в предыдущем примере.
Список сотрудников из файла поместим на листе Excel с наименованием «Список», для чего откроем в строке Меню→ Данные→ Импорт внешних данных→ Импортировать данные, как показано на рис 22.
Рис. 22. Подготовительные действия для импорта таблицы из файла
При импорте внешних данных на лист Excel , сначала следует найти местоположение файла (с помощью окна – Импорт текстового файла), а затем провести три последовательных шага в приложении – Мастер текстов.
Рис. 23. Импортирование внешних данных, созданных в виде текста
Приложение Мастер текстов преобразует строки в отдельные записи (создаёт списки), поэтому при выполнении второго шага, следует указать, что является символом-разделителем в файле. На рис 24 показано окно Мастер текстов, в котором отмечен символ-разделитель – запятая.
Рис. 24. Пример преобразования строк текста в табличные данные с помощью приложения Мастер текстов
Теперь следует позаботиться, чтобы данные о сотруднике с листа «Список» попали на лист «Пропуск». Передача сведений о сотруднике, которые предварительно выделяют в списке, будет осуществляться после нажатия на кнопку с наименованием «Подготовить пропуск» на листе с наименованием «Список», как показано на рис 25.
Рис. 25. Пример импортированного списка на лист Excel для подготовки пропуска сотруднице Вавиловой
Так как на листе Excel размещена одна кнопка, то только для неё создаётся программный код, представленный на рис 26. Рассмотрим некоторые особенности программы, с помощью которой создаётся диалоговое окно для ввода диапазона ячеек со сведениями о сотруднике, а затем эти сведения передаются на лист «Пропуск» в шаблон.
Prompt :=»Выделите в таблице ячейки в строке,» & Chr (13) _
Зададим имя переменной — input _ sveden , которой будут передаваться сведения из текстовой строки диалогового окна. Application . InputBox — это новый объект (на основе функции InputBox ). Объекту следует задать параметры, которые являются атрибутами функции, к которым относятся:
Title – строковое выражение, отображаемое в строке заголовка диалогового окна;
Prompt – строковое выражение, отображаемое как сообщение в диалоговом окне;
Type – параметр, указывающий что должно отображаться в текстовом окне (код 8 – адрес выделяемой ячейки на листе).
Рис. 26. Программные коды для обработки выделенной строки после свершения события Click при передаче в шаблон документа
Для того, чтобы осуществить работу с выделенными ячейками на листе, необходимо выяснить их количество (количество столбцов и количество строк), что осуществляется операторами:
Рис. 27. Пример использования оператора MsgBox для формирования сообщения в виде диалогового окна
Сохранив значения в переменных FIO и Mas (4) для заполнения пропуска (так можно собрать из таблицы большое количество данных, а в нашем примере показано, как выбирать данные и объединять в одну строку), осталось их передать на другой лист, что выполняется с помощью следующих кодов:
Пример, который работает только в Excel 2007 и выше
Рис. 28. Проект интерфейса пользователя на листе Excel
Рис. 29. Выбор дополнительного объекта в разделе Windows – Другие элементы
Пиктограмма — Общий диалог появится на листе Excel , после чего необходимо установить свойства элемента. В данном примере, свойству Name (Имя) присвоим – CD 1. Напомним, что элементы управления, которые относятся к интерфейсу пользователя, по умолчанию имеют заданные свойства, изменим некоторые свойства, которые перечислены в таблице 2.
Listbox vba excel примеры
Для того чтобы вставить в рабочий лист возвращаемое функцией значение, следует использовать функцию таким же образом, как используется любая из встроенных функций: внести имя функции в ячейку после знака равенства. После имени печатаются круглые скобки с любым аргументом внутри. Скобки необходимы даже в случае, когда аргументы отсутствуют, как в следующем примере:
