Заглавная страница Избранные статьи Случайная статья Познавательные статьи Новые добавления Обратная связь КАТЕГОРИИ: АрхеологияБиология Генетика География Информатика История Логика Маркетинг Математика Менеджмент Механика Педагогика Религия Социология Технологии Физика Философия Финансы Химия Экология ТОП 10 на сайте Приготовление дезинфицирующих растворов различной концентрацииТехника нижней прямой подачи мяча. Франко-прусская война (причины и последствия) Организация работы процедурного кабинета Смысловое и механическое запоминание, их место и роль в усвоении знаний Коммуникативные барьеры и пути их преодоления Обработка изделий медицинского назначения многократного применения Образцы текста публицистического стиля Четыре типа изменения баланса Задачи с ответами для Всероссийской олимпиады по праву Мы поможем в написании ваших работ! ЗНАЕТЕ ЛИ ВЫ?
Влияние общества на человека
Приготовление дезинфицирующих растворов различной концентрации Практические работы по географии для 6 класса Организация работы процедурного кабинета Изменения в неживой природе осенью Уборка процедурного кабинета Сольфеджио. Все правила по сольфеджио Балочные системы. Определение реакций опор и моментов защемления |
Запуск макросов с помощью командной кнопки в форме ⇐ ПредыдущаяСтр 8 из 8
21. Создайте электронную форму для ввода данных в таблицу сведений о студентах. Форма должна содержать: - заголовок «Сведения о студенте»; - поле для ввода фамилии с инициалами; - поле со списком для выбора номера группы; - список для выбора наименования специальности; - 2 переключателя для выбора пола; - счетчик для выбора года рождения (1990—2010); - кнопку для запуска макроса, осуществляющего запись сведений о студенте в таблицу, расположенную на другом листе. Для этого выполните следующие действия: · переименуйте один из листов книги Excel в «Форма»; · разместите на листе «Форма» в ячейках А30:А39 список номеров 10 групп, например, 8271-8280. Разместите в ячейках С30-С39 список названий специальностей; · введите в ячейку D2 заголовок формы: “Сведения о студенте”. Введите в ячейки В4, В5, В7, В12, В15 следующие названия: ФИО, Группа, Специальность, Пол, Год рождения; · в ячейку D4 введите фамилию; · на вкладке Разработчик в группе Элементы управления нажмите кнопку Вставить, а затем в разделе Элементы управления формы выберите элемент Поле со списком иочертите прямоугольный контур в области ячейки F5; · щелкнув правой клавишей мыши по элементу Поле со списком, вызовите контекстное меню. Выберите пункт Формат объекта; · установите вкладку Элемент управления. Щелкните по кнопке сворачивания в поле Формировать список по диапазону и выделите диапазон ячеек с номерами групп. Разверните вкладку. Щелкните по кнопке сворачивания в поле Связь с ячейкой, затем щелкните по ячейке H5 и разверните вкладку. В поле Количество строк введите значение 5. Включите флажок Объемное затемнение, нажмите ОК; · убедитесь в возможности выбора номера группы из списка с полем и изменении порядкового номера в ячейке H5; · введите в ячейку D5 формулу для расшифровки порядкового номера группы в списке: =ИНДЕКС($А$30:$А$39;$Н$5). Используйте вариант функции со ссылкой. Убедитесь в правильности вывода номера группы в ячейке D5; · на вкладке Разработчик в группе Элементы управления нажмите кнопку Вставить, а затем в разделе Элементы управления формы выберите элемент Список иочертите прямоугольный контур в области ячеек G7:I10. Вызовите контекстное меню элемента Список и выберите пункт Формат объекта; · щелкните по кнопке сворачивания в поле Формировать список по диапазону и выделите диапазон ячеек с названиями специальностей. Разверните вкладку. Включите флажок выбора только одинарного значения, затем щелкните по кнопке сворачивания в поле Связь с ячейкой и введите адрес ячейки щелчком по кнопке K7. Разверните вкладку и включите флажок Объемное затемнение. Нажмите ОК;
· убедитесь в возможности выбора названия специальности из списка и изменении порядкового номера в ячейке К7; · введите в ячейку D7 формулу для расшифровки порядкового номера группы в списке: =ИНДЕКС($С$30:$С$39;$K$7). Убедитесь в правильности названия специальности в ячейке D7; · на вкладке Разработчик в группе Элементы управления нажмите кнопку Вставить, а затем в разделе Элементы управления формы выберите элемент Переключатель иочертите прямоугольный контур в области ячейки F12. Вызовите контекстное меню элемента Переключатель и выберите пункт Формат объекта; · на вкладке Элемент управления щелчком по ячейке D12 введите в поле Связь с ячейкой ее абсолютный адрес, включите флажок Значение установлен и нажмите ОК. Замените название флажка на «М»; · аналогично расположите значок переключателя в области ячейки F13 и замените его название на «Ж», при этом повторного связывания с ячейкой не требуется; · в разделе Элементы управления формы выберите элемент Счетчик иочертите прямоугольный контур в области ячеек F15:F16. Вызовите контекстное меню элемента Счетчик и выберите пункт Формат объекта; · на вкладке Элемент управления введите в поле Текущее значение: 1990. Введите в поле Минимальное значение: 1990. Введите в поле Максимальное значение: 2010. Введите в поле Шаг изменения: 1. Введите в поле Связь с ячейкой абсолютный адрес ячейки D15, нажмите ОК; · проверьте работу счетчика; · в разделе Элементы управления формы выберите элемент Кнопка иочертите прямоугольный контур в области ячеек C18:D18. Появится окно Назначить макрос объекту. Закройте окно, не назначая макрос. Замените название кнопки на «Запись в таблицу». 22. Создайте на новом листе с именем «Список студентов» во 2-ой строке шапку таблицы с названиями столбцов: ФИО, Группа, Специальность, Пол, Год рождения. Отрегулируйте ширину столбцов.
23. На листе «Форма» в ячейки B25, С25, D25, E25, F25 вставьте формулы, ссылающиеся на ячейки D4, D5, D7, D12 и D15. Проверьте формулы в ячейках B25:F25: В ячейке В25 должна быть формула: =$D$4 В ячейке С25 должна быть формула: =$D$5 В ячейке D25 должна быть формула: =$D$7 В ячейке Е25 должна быть формула: =$D$12 В ячейке F25 должна быть формула: =$D$15 24. Осуществите запись начального макроса макрорекордером. Для этого: · на вкладке Разработчик в группе Код нажмите кнопку Запись макроса; · в поле Имя макроса введите имя макроса(по умолчанию); · для начала записи макроса нажмите кнопку ОК; · на листе Форма выделите ячейки B25:F25; · на вкладке Главная в группе Буфер обмена нажмите кнопку Копировать; · перейдите на лист Список студентов и выделите ячейку А3; · на вкладке Главная в группе Буфер обмена раскройте список Вставить и выберите команду Вставить з начения; · на вкладке Разработчик в группе Код нажмите кнопку Остановить запись; 25. Проверьте работу созданного макроса. Для этого на листе «Список студентов» очистите диапазон ячеек А3:Е3, перейдите на лист «Форма», на вкладке Разработчик в группе Код нажмите кнопку Макросы, в диалоговом окне Макрос выделите имя созданного макроса и нажмите кнопку Выполнить. Строка сведений будет вставлена на то же место. 26. Для того, чтобы новые сведения вставлялись в таблицу в следующие по порядку строки, необходимо откорректировать текст макроса. Для этого на вкладке Разработчик в группе Код нажмите кнопку Макросы, в диалоговом окне Макрос выделите имя созданного макроса и нажмите кнопку Изменить. Откроется окно редактора Visual Basic. 27. В окне редактора Visual Basic внесите изменения в текст программы после строки Sheets("Список студентов").Select При этом должны быть следующие строки:
Sheets("Список студентов").Select Range("A2").Select If Cells(3, 1).Value <> "" Then Cells(2, 1).Select ActiveCell.End(xlDown).Cells(2).Select Else Range("A3").Select End If Selection.PasteSpecial Paste:=xlValues, Operation:=xlNone, SkipBlanks:= _ False, Transpose:=False End Sub
28. Закройте окно редактора, щелкнув по самому левому значку на инструментальной панели редактора с изображением логотипа Excel. Повторно выполните макрос. 29. Назначьте кнопке «Запись в таблицу» созданный макрос. Для этого выделите кнопку правой клавишей мыши, в контекстном меню выберите пункт Назначить макрос, в окне Назначить макрос объекту выделите соответствующий макрос и нажмите ОК. 30. Выполните макрос щелчком по кнопке. 31. С помощью созданного макроса заполните список студентов данными о принятых в университет студентах (10-15 человек). 32. Используя созданный в предыдущем задании список студентов, создайте на новом листе с именем «Справка» автоматизированную форму для выдачи справки студенту следующего образца:
Соответствующие данные должны заноситься в справку автоматически посредством выбора фамилии студента из поля со списком. Для этого выполните следующие действия: · Разместите на листе «Справка» в ячейках A1:G10 постоянный текст справки так, чтобы для ввода фамилии использовалась ячейка D4, для ввода года рождения – E4, для ввода № группы – В7, наименования специальности – D7. · На вкладке Разработчик в группе Элементы управления нажмите кнопку Вставить, а затем в разделе Элементы управления формы выберите элемент Поле со списком и очертите указателем мыши прямоугольный контур в зоне ячеек A1:В2. Вызовите контекстное меню элемента Поле со списком и выберите пункт Формат объекта;
· Установите вкладку Элемент управления. Щелкните по кнопке сворачивания в поле Формировать список по диапазону и выделите диапазон ячеек с фамилиями студентов без заголовка на листе Список студентов. Разверните вкладку. Щелкните по кнопке сворачивания в поле Связь с ячейкой. Щелкните по ячейке А20. В поле Количество строк введите значение 6; · Перейдите на вкладку Свойства. Снимите флажок Выводить объект на печать. Закройте окно Форматирование объекта кнопкой ОК. · Проверьте правильность работы поля со списком, наблюдая за номером элемента, отображаемого в ячейке А20 при выборе фамилии в списке; · Присвойте диапазону ячеек, в котором находится список, имя Список. Для этого выделите диапазон ячеек, содержащий все данные о студентах без заголовков на листе Список студентов, введите в поле имен имя Список и нажмите клавишу Enter; · Введите в ячейку D4 формулу для отображения выбранной фамилии: =ИНДЕКС(Список;$A$20;1) Примечание. Для ввода в качестве аргумента имени диапазона выберите имя Список на вкладке Формулы в группе Определенные имена из списка Использовать в формуле. · Введите в ячейку Е4 формулу для отображения года рождения: =ИНДЕКС(Список;$A$20;5); · Аналогично введите в ячейку В7 формулу для отображения номера группы, а в ячейку D7 – формулу для вывода наименования специальности. · Окончательно проверьте работу поля со списком. Выполните предварительный просмотр справки. Для этого щелкните значок Кнопка Microsoft Office, щелкните стрелку рядом с командой Печать, а затем выберите в списке команду Предварительный просмотр. При просмотре на справке не должно быть видно поле со списком для выбора студента. 32. Сохраните рабочую книгу на диске в файле с именем lab6.xlsm, причем в окне Сохранение документа в списке Тип файла выберите тип файла Книга Excel с поддержкой макросов. Примечание. Чтобы запустить макросы после открытия сохраненной книги, необходимо установить уровень безопасности, временно разрешающий выполнение всех макросов. Для этого: · на вкладке Разработчик в группе Код нажмите кнопку Безопасность макросов; · в категории Параметры макросов в группе Параметры макросов нажмите кнопку Включить все макросы (не рекомендуется, возможен запуск опасной программы), а затем нажмите ОК.
Важно! Для предотвращения запуска потенциально опасного кода по завершении работы с макросами рекомендуется вернуть параметры, отключающие все макросы.
Список литературы
1. Информатика: Учебник/ Под ред. Н.В. Макаровой.- 3-е изд., перераб..- М.: Финансы и статистика, 2007. – 768 с.: ил.
2. Симонович С. В. Информатика. Базовый курс: Учебник для вузов – Спб.: Питер, 2009. – 640 с.
3. Васильев А.А. Microsoft Office 2007. Новые возможности – Спб.: Питер, 2007. – 160 с.
4. Самоучитель Microsoft Office 2007. Все программы пакета – Спб.: Наука и техника, 2008. – 616 с.
5. Просветов Г. Анализ данных с помощью Excel: задачи и решения – М.: Альфа-Пресс, 2009. – 160 с.
6. Серогородский В. В. и др. Excel 2007: самоучитель + справочник – СПб.: Наука и Техника, 2008. – 400 с.
[1] Надстройка – вспомогательная программа, служащая для добавления в Microsoft Office специальных команд или возможностей. [2] Макрос – действие или набор действий, используемые для автоматизации выполнения задач. Макросы записываются на языке программирования Visual Basic для приложений (VBA).
|
||||||||
Последнее изменение этой страницы: 2016-08-26; просмотров: 374; Нарушение авторского права страницы; Мы поможем в написании вашей работы! infopedia.su Все материалы представленные на сайте исключительно с целью ознакомления читателями и не преследуют коммерческих целей или нарушение авторских прав. Обратная связь - 3.22.217.51 (0.033 с.) |