49041 (Создание информационного справочника в Excel), страница 2
Описание файла
Документ из архива "Создание информационного справочника в Excel", который расположен в категории "". Всё это находится в предмете "информатика" из 1 семестр, которые можно найти в файловом архиве . Не смотря на прямую связь этого архива с , его также можно найти и в других разделах. Архив можно найти в разделе "контрольные работы и аттестации", в предмете "информатика, программирование" в общих файлах.
Онлайн просмотр документа "49041"
Текст 2 страницы из документа "49041"
Ввод формул можно существенно упростить, если после ввода знака равенства щелкнуть мышью по первой ячейке, затем ввести операцию деления и щелкнуть по второй ячейке.
5. Содержание работы.
Описание справочника
В качестве информациооного справочника, в настоящей работе создан справочник “Домашняя библиотека”. Справочник содержит информацию об авторе, названии и жанре книги. На основании таблицы книг, вычисляется распределение книг по жанрам. Рассчитывается количество книг в стеллажах и на полках. Ведется учет книг взятых друзьями. Справочник организован в виде файла рабочей книги Excel «библиотека.xls»
Информация представлена в виде таблиц и лиаграмм.
В состав рабочей книги входят следующие страницы:
“все книги”
“информация о библиотеке”
“читатели”
“Диаграмма читатели”
Страница “все книги”
на странице “все книги” размещена таблица, в которую занесена информация о книгах, и элементы управления таблицей. Информация о книгах скопирована с компакт-диска «электронная библиотека»
Здесь и далее приведена часть таблицы “все книги”. Всего в таблице 3284 записи.
Диапазону ячеек A10:F3294 присвоено имя «книги»
Элементы управления:
1. кнопка добавить книгу. Нажатие на кнопку запускает макрос:
Sub добавить()
Rows("11:11").Select
Selection.Insert Shift:=xlDown
Range("A11").Select
End Sub
В результате исполнения добавляется пустая строка над первой строкой в таблице книги.
Группа «сортировка» содержит кнопки, нажатие на которые производит сортировку записей в таблице.
2. группа сортировка, кнопка автор.
Sub сортировка_автор()
Range("A12").Select
Range("книги").Sort Key1:=Range("A12"), Order1:=xlAscending, Header:= _
xlGuess, OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, _
DataOption1:=xlSortNormal
End Sub
В результате выполнения макроса, записи в таблице сортируются по полю «автор»
3. группа сортировка, кнопка жанр.
Sub сортировка_жанр()
Range("B11").Select
Range("книги").Sort Key1:=Range("B11"), Order1:=xlAscending, Header:= _
xlGuess, OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, _
DataOption1:=xlSortNormal
End Sub
В результате выполнения макроса, записи в таблице сортируются по полю «жанр»
4. группа сортировка, кнопка наименование.
Sub сортировка_название()
Range("C11").Select
Range("книги").Sort Key1:=Range("C11"), Order1:=xlAscending, Header:= _
xlGuess, OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, _
DataOption1:=xlSortNormal
End Sub
В результате выполнения макроса, записи в таблице сортируются по полю «Название»
4. группа сортировка, кнопка стеллаж.
Sub сортировка_стеллаж()
Range("D11").Select
Range("книги").Sort Key1:=Range("D11"), Order1:=xlAscending, Header:= _
xlGuess, OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, _
DataOption1:=xlSortNormal
End Sub
В результате выполнения макроса, записи в таблице сортируются по полю «стеллаж»
5. группа сортировка, кнопка полка.
Sub сортировка_полка()
Range("E12").Select
Range("книги").Sort Key1:=Range("E11"), Order1:=xlAscending, Header:= _
xlGuess, OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, _
DataOption1:=xlSortNormal
End Sub
В результате выполнения макроса, записи в таблице сортируются по полю «полка»
Таблица отсортированная по полю Автор:
Таблица отсортированная по полю Наименование:
При помощи включенного автофильтра, (пункт меню данные фильтр автофильтр)
Возможно применение фильтра для выбора определенных записей:
Критерий фильтра жанр = детская
Страница “информация о библиотеке”
На странице «информация о библиотеке», расположена сводная таблица и диаграмма, показывающие количество книг в библиотеке, с распределением по стеллажам и по жанрам.
кнопка «обновить данные» запускает макрос:
Sub обновить()
Range("E14").Select
ActiveSheet.PivotTables("СводнаяТаблица2").PivotCache.Refresh
End Sub
В результате происходит обновление сводной таблицы и диаграммы.
Страницы “Читатели” и “Диаграмма читатели”
Информационный справочник «Домашняя библиотека» содержит информацию о книгах, которые взяли почитать. Информация о читателях представлена в сводной таблице и на диаграмме:
в ячейке «А5» введена формула: =СЦЕПИТЬ("Мои друзья взяли почитать ";ПОЛУЧИТЬ.ДАННЫЕ.СВОДНОЙ.ТАБЛИЦЫ("Наименование";$A$11);" книг")
диаграмма:
Кнопка «обновить данные» запускает макрос аналогичный макросу на предыдущей странице.
6. Техника безопасности.
Компьютер является высокотехнологичным электронным устройством. Работа на компьютере требует знаний и четкого выполнения некоторых правил техники безопасности. Не соблюдение техники безопасности может привести к ухудшению здоровья и травмам, а также к повреждению компьютерного оборудования. В технике безопасности следует обратить внимание на следующие ключевые моменты:
-
Знать где находится пульт выключения оборудования (выключатель, красная кнопка, рубильник).
-
Не работать в верхней одежде.
-
Не включать и не выключать без разрешения оборудование.
-
Не трогать провода и разъемы.
-
Не допускать порчи оборудования.
-
Не допускать попадания жидкости на компьютер.
-
Монитор должен располагаться на уровне глаз и перпендикулярно углу зрения.
-
Экран монитора должен быть чистым.
-
Освещение в помещении должно быть таким, чтобы на мониторе не было бликов. Не должно быть сильного контраста с внешним освещением.
-
Мышь располагается так, чтобы было удобно работать с ней. Провод должен лежать свободно. При работе с мышью по периметру коврика должно оставаться пространство не менее 2-5 сантиметров.
-
Клавиатуру следует располагать прямо перед пользователем, работающим на компьютере. По периметру оставляется свободное место 2-5 сантиметров.
-
Необходимо проверять используемые диски и дискеты на наличие вирусов.
Знание и выполнение этих правил позволят не только уменьшить вредное воздействие при работе за компьютером, но и помогут в организации рабочего места, рабочего времени:
7. Список используемой литературы.
-
Додж М., Стинсон К. Эффективная работа с Microsoft Excel 2000 - СПб:Питер, 2000.
-
Карлберг К. Бизнес – анализ с помощью Excel. – К.: Диалектика, 1997.
-
Амелина Н.И., Мачулина Л.А., Чердынцева М.И. Практикум по электронным таблицам в экономике. – М.: «Издательство ПРИОР», 2000.
-
Гарнаев А.Ю. Использование MS Excel и VBA в экономике и финансах.- СПб.:БХВ- Санкт-Петербург, 2000.