Создать программу в excel

Создать программу в excel

Для начала давайте напишем какую-нибудь совсем отвлеченную программку в макросах, используя автоматическую запись. Предположим. нам необходимо в одной из ячеек первого листа написать предложение «Это первый лист», на втором листе — «Это уже второй лист» и на третьем — «А это третий лист». Затем, вернувшись на первый, снова написать:»Все! Работа сделана!»

Для этого, запустив Excel, выберите режим работы с подключенными макросами, щелкните правой кнопкой мыши по кнопке СЕРВИС и установите галочку напротив надписи Visual Basic. У вас должно получиться что-то похожее на нижний рисунок. Сохраните свою работу под именем, скажем, s1 или задача 1.

Многие считают, что сохранять файл нужно в конце работы, я же советую вам это делать в самом начале и в дальнейшем сохранять через каждые 5-10 минут, а еще лучше включить режим автосохранения. Почему? Подумайте сами.

Далее. На панели VB найдите синий кружок и наведите курсор мыши на него. Если сделаете все правильно, то у вас должна появиться надпись-подсказка «Записать макрос». Жмите левую кнопку мыши, при этом появится окно с именнем «Запись макроса». Пока ничего менять не будем, а сразу нажмем кнопку ОК, что повлечет за собой закрытие данного окна, но вместе с тем откроется новое и, кроме того, на панели VB кнопка с синим кружком превратится в кнопку с синим квадратом, с помощью которого мы сможем остановить запись макросов. А с этого момента практически любое наше действие будет записываться, поэтому не спешите и не совершайте необдуманных действий, так как потом будет трудно разобраться в созданном макросе. Итак, вы нажали ОК, и у вас получилась примерно следующая картина:

Выделив произвольную ячейку, вводим наш первый текст, по завершению ввода нажмем клавишу ENTER. Далее внизу рабочего листа ищем ярлычки с надписью Лист1, Лист2 и Лист3. Шелкнем левой кнопкой мышы по ярлычку с надписью Лист2. Снова произведем ввод текста согласно поставленной нами выше задачи. Это же самое сделаем на третьем листе. Затем, вернувшись на первый, в ячейке, расположенной ниже записи, наберем: «Все! Работа сделана! «и, нажав ENTER, щелкаем по синему прямоугольнику для остановки записи. Остается только запрограммировать работу макроса на какое-либо действие пользователя.

Давайте для начала научимся создавать и программировать кнопку.

Как создать программу в «Excel»

Один из наиболее часто задаваемых вопросов задаваемых начинающими пользователями звучит так: «Как создать программу в «Excel» и возможно ли это сделать в принципе?»

Ответ на него не так прост.

Создать полноценную программу или продвинутую игру инструментами «Эксель» практически невозможно.

С другой стороны «Excel» обладает достаточным набором инструментов (активные элементы Activx, ViBA и т.д.), позволяющими создавать достаточно функциональные приложения внутри самих экселевских документах — макросы.

Опытные программисты при помощи макросов написанных на языке VBA даже создают примитивные игры популярные в начале 90-х прошлого столетия: тетрис, змейка, пинг-понг и т.д.

Рассмотрим азы создания программ в VBA Excel.

Самый первый этап создания программы — это написание алгоритма ее работы.
Необходимо определить для себя какие данные будут вноситься пользователем, какие данные будут константой, какой результат должна выдавать программа.
Когда определились с основными принципами работы программы, следует составить блок-схему ее работы, используя условные обозначения:

Второй этапподготовка программы «Excel» к написанию макросов: включить макросы, отобразить панель разработчика и т.д.
Подробно подготовка к написанию простого макроса описана в статье:

Как написать простой макрос в программе Excel

Третий этап — при помощи языка программирования VBA «оцифровываем» блок схему. Делаем ее понятной для компьютера. То есть пишем сам код на языке программирования VBA.

Некоторые варианты кодов макросов опубликованы на нашем сайте в разделе Макросы и VBA.

Создать программу в excel

Для начала давайте напишем какую-нибудь совсем отвлеченную программку в макросах, используя автоматическую запись. Предположим. нам необходимо в одной из ячеек первого листа написать предложение «Это первый лист», на втором листе — «Это уже второй лист» и на третьем — «А это третий лист». Затем, вернувшись на первый, снова написать:»Все! Работа сделана!»

Для этого, запустив Excel, выберите режим работы с подключенными макросами, щелкните правой кнопкой мыши по кнопке СЕРВИС и установите галочку напротив надписи Visual Basic. У вас должно получиться что-то похожее на нижний рисунок. Сохраните свою работу под именем, скажем, s1 или задача 1.

Читать еще:  В excel

Многие считают, что сохранять файл нужно в конце работы, я же советую вам это делать в самом начале и в дальнейшем сохранять через каждые 5-10 минут, а еще лучше включить режим автосохранения. Почему? Подумайте сами.

Далее. На панели VB найдите синий кружок и наведите курсор мыши на него. Если сделаете все правильно, то у вас должна появиться надпись-подсказка «Записать макрос». Жмите левую кнопку мыши, при этом появится окно с именнем «Запись макроса». Пока ничего менять не будем, а сразу нажмем кнопку ОК, что повлечет за собой закрытие данного окна, но вместе с тем откроется новое и, кроме того, на панели VB кнопка с синим кружком превратится в кнопку с синим квадратом, с помощью которого мы сможем остановить запись макросов. А с этого момента практически любое наше действие будет записываться, поэтому не спешите и не совершайте необдуманных действий, так как потом будет трудно разобраться в созданном макросе. Итак, вы нажали ОК, и у вас получилась примерно следующая картина:

Выделив произвольную ячейку, вводим наш первый текст, по завершению ввода нажмем клавишу ENTER. Далее внизу рабочего листа ищем ярлычки с надписью Лист1, Лист2 и Лист3. Шелкнем левой кнопкой мышы по ярлычку с надписью Лист2. Снова произведем ввод текста согласно поставленной нами выше задачи. Это же самое сделаем на третьем листе. Затем, вернувшись на первый, в ячейке, расположенной ниже записи, наберем: «Все! Работа сделана! «и, нажав ENTER, щелкаем по синему прямоугольнику для остановки записи. Остается только запрограммировать работу макроса на какое-либо действие пользователя.

Давайте для начала научимся создавать и программировать кнопку.

Создание пользовательского интерфейса с применением макросов в приложении Excel

Цель предлагаемого задания:

Активизировать и интегрировать разрозненные знания по отдельным темам, полученные при изучении электронных таблиц; провести плавное “погружение” учащихся в изучение нового серьезного материала по созданию макросов в приложении Excel и расшифровки команд, полученных с помощью MacroRecordera, и хранящихся в форме программ на языке VBA; ввести понятие объекта и метода и выполнить при этом задание, которое впоследствии может послужить примером для разработки автоматизированной информационной системы.

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

Предложенную задачу можно представит как объединение 4 задач:

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

2. Проведение статистической обработки полученных результатов с использованием специальных встроенных функций. При использовании статистических функций мы их записываем с помощью MacroRecordera, то есть, сохраняем в виде процедуры.

3. Построение диаграмм и графиков по полученным расчетным данным в таблицах.

4. Создание пользовательского интерфейса (Меню), позволяющего объединить все решенные задачи (с применением макросов).

Объектно-ориентированный язык программирования Visual Basic for Application (VBA) является версией языка Visual Basic и предназначен для использования в среде приложений Microsoft Office (Word, Excel, Access и др.)

Существует достаточно простая возможность создания программы (макроса) на языке VBA с использованием MacroRecorder.

MacroRecorder – это транслятор, который переводит все действия пользователя с момента запуска MacroRecorder до окончания записи макроса на язык VBA.

Макрос – это имеющая имя последовательность заданных пользователем команд, хранящаяся в форме программы на языке VBA.

I этап — Создание пользовательского интерфейса

Подготовка листа Excel для дальнейшей работы:

1. В рабочей книге должно быть 5 листов. Переименуйте листы следующим образом:

l Лист3 – “Фабрика”

l Лист4 – “Холдинг”

l Лист5 – “Турагенство”

2. С помощью коллекции WordArt подготовьте на созданном листе “Меню” надписи “Меню” и “4 задания”.

3. Вызовите на экран дополнительную панель “Рисование”.

4. Используя элемент “Автофигура” нарисуйте на листе одну кнопку (всего кнопок будет 4).

Читать еще:  Excel вставить в примечание картинку

5. Используя контекстно-зависимое меню этого объекта, добавьте надпись на кнопке “Турагенство”.

6. Измените, дизайн кнопки, т.е. поменяйте фон кнопки, а также начертание, название шрифта и размер букв надписи на кнопке.

Рис. 1. Так выглядит пользовательский интерфейс “4 задания”

II этап — Создание макросов.

1. Установим курсор на листе “Меню”.

2. Активизируем MacroRecoder с помощью команды Сервис-Макрос-Начать запись.
Появится диалоговое окно “Запись макроса”. Это диалоговое окно позволяет задать параметры макроса.

Рис. 2. Диалоговое окно “Запись макроса”

По умолчанию макросам присваиваются имена Макрос1, Макрос2 и т.д. Чтобы легче было распознать макрос, лучше присвоить ему имя, поясняющее его назначение. Присвоим макросу имя “Турагенство” и нажмем кнопку Ок. Появится плавающая панель инструментов с кнопкой “Остановить запись”. Теперь все производимые нами действия будут записываться до тех пор, пока не будет нажата эта кнопка.
Не выполняйте никаких лишних действий. Все ваши действия фиксируются и записываются. Надо выполнить только одно действие.

l Перейдите на лист “Турагенство”.

Остановите запись макроса, нажав на кнопку “Остановить запись”.

3. Просмотрите записанную программу. Для этого выполните команду Сервис-Макрос-Макросы. Созданная программа записалась в Модуле1.

Рис. 3. Главное окно редактора VBA

Таким образом, MacroRecorder записал нужную нам программу из одной строки:
Sheets(“Турагенство”).Select – выбрать лист “Турагенство”.

III этап — “Оживление” кнопок.

1. Для того чтобы эта программа выполнялась, то есть, происходил переход на лист “Турагенство” при нажатии на одноименную кнопку, выполните следующие действия:

l закройте окно редактора VBA;
l на листе “Меню” вызовите контекстно-зависимое меню на автофигуре с надписью “Турагенство”

Рис. 4. Контекстно-зависимое меню автофигуры “Турагенство”

l в появившемся меню выберите команду “Назначить макрос
l в окне “Назначить макрос объекту” выберите имя макрос “Турагенство” и подтвердите выполнение операции, нажав на кнопку ОК.
l снимите выделение с кнопки и проверьте ее работоспособность, щелкнув по ней.

2. Создайте и оживите оставшиеся кнопки пользовательского интерфейса.

IV этап Решение задачи на листе “Турагенство”

Сформируйте и заполните накопительную ведомость по продаже путевок туристической фирмой «Пять континентов» за май 2003 г.

Фирма имеет семь постоянных маршрутов. Цена каждого маршрута и количество проданных путевок представлены в таблице. Если количество проданных путевок в месяц по каждому из маршрутов более 50, то путевки, проданные сверх этих пятидесяти, реализуются со скидкой в 15% от указанной цены.

Рассчитайте по формулам стоимость всех проданных путевок; количество проданных путевок со скидкой; для путевок, проданных со скидкой, рассчитайте размер скидки в евро и итоговую выручку по каждому туру.

Подведите итог за месяц по всем графам таблицы: количество проданных путевок фирмой за месяц, стоимость всех проданных путевок без учета скидки, общая сумма скидки, итоговая выручка за месяц по туристической фирме. Расчеты производите в евро.

Определите максимальное количество путевок, проданных со скидкой.

Определите минимальную стоимость тура.

Рассчитайте среднюю скидку за проданные путевки.

Продажа путевок туристической фирмой

«Пять континентов» за декабрь 2003 г.

Цена за тур (в евро)

Кол-во проданных путевок

Стоимость проданных путевок (в евро)

Количество путевок, проданных со скидкой

Размер скидки за проданные путевки (в евро)

Итоговая выручка (в евро)

1. Круговую диаграмму по графе «Количество проданных путевок».

2. Гистограмму по графе «Итоговая выручка».

1. Процент скидки (15%) и пограничное количество путевок (50) вынесите в отдельные ячейки с комментариями.

2. При расчете количества путевок, проданных со скидкой, используйте логическую функцию ЕСЛИ.

3. Создайте макросы для расчета максимального, минимального и среднего значений. Нарисуйте автофигуры. Привяжите созданные макросы к этим автофигурам. А также создайте еще один дополнительный макрос и кнопку для очистки ячеек с результатами вычислений этих значений.

4. На листе “Турагенство” создайте кнопку для перехода на лист “Меню”.

5. Создайте копию листа “Турагенство”. Переименуйте лист в “Формулы” и выведите в созданной таблице формулы расчета.

Образец выполненной работы представлен на рис. 5. Работу выполнила ученица Ломоносовской школы 10 класса “В” Дубровская Ксения.

Рис. 5. Выполненная работа

Проверка выполненного задания

При проверке выполненного задания учащиеся должны представить:

1. Таблицу со значениями.

2. Таблицу с формулами (рис.6). Уметь объяснить работу формулы ЕСЛИ и применение абсолютной адресации в формулах.

Читать еще:  Макросы в excel 2016

Рис. 6. Выполненная работа с формулами

3. Показать текст макросов в редакторе VBA, созданных при нахождении статистических показателей.

Sub Средняя_цена()
Range(«C14»).Select
ActiveCell.FormulaR1C1 = «=AVERAGE(R[-11]C[3]:R[-5]C[3])»
End Sub

Sub Максимум ()
Range(«A14»).Select
ActiveCell.FormulaR1C1 = «=MAX(R[-11]C[4]:R[-5]C[4])»
End Sub

Sub Минимум()
Range(«B14»).Select
ActiveCell.FormulaR1C1 = «=MIN(R[-11]C:R[-5]C)»
End Sub

Sub Очистка()
Range(«A14:C14»).Select
Selection.ClearContents
End Sub

4. Уметь объяснить адресацию ячеек в Excel. Для ссылок на ячейки используются два формата. Формат А1 (ссылка состоит из имени строки и номера столбца). Формат R1C1 – этот формат мы видим в созданных макросах при нахождении среднего значения, максимума и минимума. В формате R1C1, после буквы “R” указывается номер строки ячейки, после буквы “С” — номер столбца. Например, абсолютная ссылка R1C1 эквивалента абсолютной ссылке $A$1 для формата А1. Для задания относительной ссылки указывается смещение по отношению к активной ячейке. Смещение указывается в квадратных скобках. Знак указывает направление смещения. Например, R[-11]C:R[-5]C) (фрагмент адресации взят из нашего макроса Минимум). Активной ячейкой в этом макросе является ячейка B14. R[-11]C – обозначает относительную ссылку на ячейку, расположенную на 11 строк выше в том же столбце, т. е. ячейку B3. R[-5]C) — обозначает относительную ссылку на ячейку, расположенную на 5 строк выше в том же столбце, т. е. ячейку B9. Таким образом, формируется диапазон В3:В9 для нахождения минимального значения.

На остальных листах также должны быть выполнены аналогичные задания. Условия задания в электронной таблице подбираются созвучно именам листов в созданной книге.

l реализация книг издательствами холдинга «Спутник» по кварталам за 2003 год и т.д.;

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

Темой для проекта можно выбрать создание информационной системы “Торгово-закупочное предприятие”, в котором применение макросов необходимо, также как и написание программ на языке VBA. На рис.7 показан пользовательский интерфейс для названного проекта.

Рис. 7. Меню “Торгово-закупочное предприятие”

Рис.8 . Таблица с формулами

Продажа путевок туристической фирмой «Пять континентов» за декабрь 2003г.

Фриланс проекты › Написание программы для обработки файлов *.xlsx Написание программы для обработки файлов *.xlsx

— 20-30 файлов *.xlsx

— объем файлов 100-150 МБ каждый

— структура файлов одинаковая: используется только первый лист, количество, наименование и расположение столбцов однотипное, в строках – текстово-цифровые символы (информация для обработки)

— количество столбцов – 30, количество строк – до 500 000.

1. создать новый файл с расширением *xlsx и скопировать в него первую строку (шапку) с указанного файла (один из файлов, в которых будет осуществлен поиск по критерию).

2. выбрать папку и файлы, в которых будет осуществлен поиск;

3. иметь возможность задать поиск по критерию/ям в определенном столбце:

— выбрать наименование столбца/ов, в котором будет осуществляться поиск элемента (пример, наименование или код товара);

— задать условие поиска «содержит» и/или «начинается на», …. (аналогично поисковому функционалу Excel);

— внести буквенно-цифровые символы для поиска;

4. найти в данном столбце все ячейки с удовлетворяющими критериями поиска;

5. строки (в которой находится найденная ячейка) скопировать целиком и отобразить ее в новом файле *xlsx (желательно, это делать сразу, а не накапливать в памяти);

6. отработать данный поиск во всех файлах.

7. Программа должна показывать состояние обработки файлов (отработанные файлы и количество найденных элементов) и возможность ее приостановки или остановки полностью.

При этом, процесс обработки файлов должен быть осуществлен с минимальными загрузками памяти и быстрой обработкой файлов. (проблема предыдущего заказа – долго обрабатывал файлы с подвисанием системы из-за недостатка памяти, хотя в наличии 12 ГБ оперативки).

П.С.: все операции, указанные выше можно осуществить в Excel, однако нужно проделывать все поисковые операции с 20-30 файлами поочередно. и накоплением в отдельном файле – что очень утомляет . Нужна программа, которая все это сделает во всех файлах и выдаст результат в новом файле.

Похожие статьи

Ссылка на основную публикацию
Похожие публикации
Adblock
detector