
- •Введение
- •1 Индивидуальное задание
- •1.1 Описание предметной области
- •1.2 Запросов в ms Access
- •Запросов в ms Excel
- •2 Разработка базы данных в ms Access
- •2.1 Определение объектов предметной области
- •2.2 Определение атрибутов каждой сущности
- •2.3 Программирование базы данных
- •2.4 Разработка запросов к базе данных
- •3 Разработка пользовательского интерфейса в ms Access
- •4 Разработка пользовательского интерфейса в ms Excel
- •4.1 Импортирование базы данных
- •4.2 Построение диаграмм
- •4.3 Обработка данных с помощью языка программирования vba
- •4.4 Описание созданных функций
- •Заключение
- •Список использованных источников
- •Приложение а Код макросов
- •Приложение б Код кнопок
4.4 Описание созданных функций
Для выполнения поставленных задач были написаны макросы на VBA в Microsoft Excel. Макросы фильтруют и отбирают необходимые данные из таблицы на основе запросов пользователя. Рассмотрим один из макросов, выполняющий отбор записей в таблице с ценой выше либо равной заданной пользователем (Таблица А.3). Создается переменная FilterValue, которой присваивается значение, которое вводит пользователь с клавиатуры с помощью InputBox. Затем на активном листе в соответствующей таблице устанавливается фильтр на поле, в котором указаны цены изделий, с критерием “>=” и значением переменной FilterValue.
Таблица А.3 – Код макроса «ФильтрМинЦена»
Sub ФильтрМинЦена()
FilterValue = InputBox("Введите минимальную цену", "Фильтр по цене")
ActiveSheet.ListObjects("Таблица4").Range.AutoFilter Field:=8, Criteria1:=">=" & FilterValue
End Sub
Другие макросы устроены аналогично рассмотренному, их код представлен в Приложении А.
Каждая кнопка в пользовательской форме вызывает соответствующий макрос. Рассмотрим код кнопки «Продажи за текущий год», при событии CommandButton1_Click() мы вызываем макрос, просто указав его имя (Таблица Б.1).
Таблица Б.1 – Код кнопки «Продажи за текущий год»
Private Sub CommandButton1_Click()
ПродажиЗаТекущийГод
End Sub
Другие кнопки устроены аналогично, их код представлен в Приложении Б.
Заключение
В результате выполнения данного курсового проектирования мы успешно достигли поставленных целей и выполнения задач, связанных с разработкой информационной системы с использованием программных инструментов MS Office.
В ходе проектирования была разработана база данных ювелирной мастерской в MS Access. Была проведена работа по созданию таблиц, определению полей и связей между ними, обеспечивающих целостность данных. Это позволило эффективно хранить и управлять информацией в рамках информационной системы.
Также были созданы сложные запросы к данным, позволяющие извлекать и анализировать информацию из базы данных. Мы использовали возможности MS Access для объединения данных, фильтрации и агрегации, получая необходимые результаты.
Важной частью проектирования была динамическая связь между приложениями MS Office. Были установлены связи и интеграции между MS Access, MS Excel и другими приложениями, что обеспечило обмен данными и повысило эффективность работы с информацией.
Для визуализации данных мы использовали возможности MS Excel, построив различные диаграммы и сводные диаграммы. Это позволило наглядно представить информацию и выявить закономерности и тренды.
В рамках проекта было проведено также обработка данных средствами VBA. Мы разработали скрипты и макросы, позволяющие автоматизировать процессы и улучшить функциональность информационной системы.
В результате выполнения данного курсового проектирования мы приобрели ценный опыт работы с программными инструментами MS Office и разработкой информационных систем. Полученные знания и навыки будут полезны для решения задач в сфере управления и анализа данных в различных организациях и предприятиях.
В заключение, разработка информационной системы программными инструментами MS Office является важным и актуальным направлением. Продукты MS Office, такие как MS Access, MS Excel, предоставляют широкий спектр возможностей для эффективного управления и анализа данных. Приобретенный опыт и знания в данной области будут полезными для будущих проектов и профессионального развития в сфере информационных технологий.