- •Оглавление1
- •Примерный порядок выполнения курсовой работы
- •Задание на курсовую работу
- •Выполнение работы
- •Лист 1. Титульный лист
- •Лист 2. Цены
- •Лист 3. Продажи
- •Обработка информации на листе продажи (сортировка и фильтрация данных)
- •3.1. Сортировка Сортировка по столбцам «фио продавца» и «Наименование»
- •Сортировка в особом порядке по полю «Наименование»
- •Отмена сортировки
- •3.2. Автофильтр
- •Использование автофильтра
- •3.3. Расширенный фильтр
- •Фильтрация по наименованию
- •Фильтрация по фио двух продавцов
- •Фильтрация по диапазону количество
- •Фильтрация по дате и фамилии
- •П ромежуточные итоги
- •Отмена фильтрации
- •Лист 4. Итоги
- •Итоги по фио продавца
- •Итоги по наименованию фруктов
- •Итоги по дате и наименованию фруктов
- •О тмена итогов
- •Л ист 5. Отчеты и функции
- •5.1. Отчеты
- •5 .2. Функции бд
- •Ф ункция дмакс
- •Функция дмин
- •Функция дсрзнач
- •Функция бдсумм
- •Функция бсчет
- •Отмена функций
- •Лист 6. Сводная таблица
- •Лист 7. Сводная диаграмма
- •Лист 8. Инструкция пользователя
Отмена сортировки
Для отмены сортировки необходимо выполнить следующие действия:
Устанавливаем курсор за переделами таблицы
Выбираем меню Сервис/Макрос/Начать запись (Разработчик/Записать макрос).
Вводим имя макроса «сорт_отмена».
Нажимаем кнопку ОК. После этого появится панель «Остановить запись».
Выделяем ячейку A10, выполняем команду Данные/Сортировка и задаем сортировку по полю «№ п/п» по возрастанию.
Нажимаем кнопку ОК.
Выбираем команду Сервис/Макрос/Остановить запись.
Текст полученного макроса:
Sub сорт_отмена()
Range("A10").Select
Range("A10:G40").Sort Key1:=Range("A11"), Order1:=xlAscending, Header:= _
xlGuess, OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, _
DataOption1:=xlSortNormal
End Sub
Для кнопки «Отмена сортировки» назначаем созданный макрос «сорт_отмена».
Модулю, в котором записаны все программы для работы с листом «сортировка» задаем имя «№1_сортировка».
3.2. Автофильтр
С помощью автофильтра проводится отбор данных в таблице в соответствии с решаемой задачей. Создается макрос запуска и выключения автофильтрации и кнопка для его выполнения.
Для создания макроса необходимо выполнить следующие действия:
Установить курсор за пределы таблицы и выбрать меню Сервис/Макрос/Начать запись (Разработчик/Записать макрос). Ввести имя макроса «Автофильтр». Нажать ОК.
Выделить ячейку A10 и выполнить команду Данные/Фильтр/Автофильтр. После этого в строке заголовка таблицы появятся кнопки раскрывающихся списков
Выбрать меню Сервис/Макрос/Остановить запись (Разработчик/Остановить запись)
Текст полученного макроса:
Sub автофильтр()
Range("A10").Select
Selection.AutoFilter
End Sub
Для кнопки «Включение/выключение автофильтра» назначаем созданный макрос «Автофильтр».
Использование автофильтра
При работе с автофильтром можно выполнять следующие действия:
фильтрация простым выбором критерия из раскрывающегося списка. Например, если необходимо просмотреть записи только на определенную дату – откройте список в столбце «дата продажи» и выберите нужную дату:
В результате получим таблицу следующего вида
фильтрация с помощью пользовательского фильтра по одному условию. Например, если нужно получить сведения о товарах, количество которых больше 30 кг - откройте список в столбце «количество» и выберите пункт «условие» (числовые фильтры) в появившемся окне введите следующие параметры:
В результате получим таблицу следующего вида
фильтрация с помощью пользовательского фильтра по двум условиям. Например, если нужно получить сведения о товарах, сумма продаж для которых больше 1000 руб. и меньше 2000 руб. - откройте список в столбце «сумма» и выберите пункт «условие» в появившемся окне введите следующие параметры:
просмотр наибольших или наименьших элементов списка только для числовых данных. Для этого необходимо выбрать в соответствующем столбце пункт «первые 10» (числовые фильтры – первые 10) и ввести необходимые параметры.
отображение всех данных с помощью пункта «все» для соответствующих столбцов с заданными ранее условиями отбора.