3 этап

Для подведения итогов тестирования можно предусмотреть специальный лист, переименовав его в Результат, на котором будут подведены итоги ответов.
Создадим на листе ответов 5 макросов:
• Ваш ответ – ученик может увидеть свои ответы
• Результат – ученик может увидеть, на какие вопросы он ответил неверно.
• Верный ответ – ученик может увидеть правильные ответы.
• Оценка – ученик может увидеть свою оценку.
• Очистка – для возможности многократного тестирования.

12. В строки А2 и А3 введите записи ФИО и Класс соответственно.
13. Скопируйте с первого листа номера вопросов и сами вопросы в столбцы А6:А15 и В6:В15.
14. Введите остальные заголовки таблицы, согласно рисунку (Ваш ответ, Результат, Верный ответ).

Рисунок 7
Создадим первый макрос – Ваш ответ.
Перед созданием макросов на втором листе курсор на листе ответов устанавливайте в какую-нибудь пустую ячейку, где нет записей, например, для нашего примера F9.
15. Выполните команду Сервис – Макрос – Начать запись. Дайте имя макросу Ваш_ответ.
Чтобы на этом листе отображались фамилия и имя ученика, создадим ссылку на соответствующую ячейку первого листа.
16. Установите курсор в ячейку В2, нажмите знак «=», перейдите на лист вопросов и щелкните мышью в ячейку Е4 (Петров Вася) и нажмите клавишу «Enter». Аналогично введите класс.
17. Таким же образом в листе ответов введите в ячейку С6 ответ с листа вопросов.
18. Скопируйте остальные варианты ответов: установите курсор в ячейку С6 и подведите его в правый нижний угол этой ячейки. Когда курсор примет вид  «+», протяните вниз до ячейки С16.
19. Остановите макрос. Нарисуйте кнопку и назначьте ей макрос Ваш ответ.

Далее оформляем столбец Результат. Для этого используем логическую функцию «если».
20. Создайте второй макрос – Результат. На листе ответов установите курсор в ячейку D6.
21. Выполните команду Вставка – Функция (или кнопка fx рядом со строкой формул). Выберите в категории Логические функцию Если.
22. Заполните поля согласно Рис 7. Текстовые ответы необходимо заключать в кавычки.
23. Аналогичным образом заполните ячейки D7:D10.
24. Остановите макрос. Нарисуйте кнопку и назначьте ей макрос Результат.

Рисунок 8
Далее оформляем столбец Верный ответ.
25. Создайте третий макрос – назовите его Ответ1. Установите курсор в ячейку Е6. Введите в ячейки E6:E15 верные ответы к вопросам.
26. Остановите макрос. Нарисуйте кнопку и назначьте ей макрос Верный ответ.

Далее оформляем столбец Оценка. Для этого используем логическую функцию «если» и статистическую функцию «счетесли».
27. В строки В17 и В18  введите соответственно записи Количество верных ответов, Количество неверных ответов (см. Рис. 7).
28. Создайте четвертый макрос – назовите его Оценка.
29. Установите курсор в ячейку С17. Выполните команду Вставка – Функция ( или кнопка fx рядом со строкой формул). Выберите в категории Статистические функцию Счетесли.
30. Выделите на листе ответов диапазон D6:D15.
31. В строке критерий введите запись «верно» и нажмите кнопку ОК.

Рисунок 9
32. Аналогичным образом введите количество неверных ответов. Только в строке критерий введите запись «неверно».


Для выставления оценки используем функцию «если». Критерии оценивания:
Кол-во верных ответов Оценка
9-10 5
7-8 4
5-6 3
>4 2

Для Excel эта запись будет выглядеть следующим образом:
ЕСЛИ(C17>8;5;ЕСЛИ(C17>6;4;ЕСЛИ(C17>4;3;2)))
33. Установите курсор в ячейку С21. Выполните команду Вставка – Функция (или кнопка fx рядом со строкой формул). Выберите в категории Логические функцию Если.
34. После открытия окна Аргументы функции щелкните мышью в ячейку С17. Ее адрес появится в строке  Лог_выражение. Далее введите записи согласно Рис. 10.
35. Установите курсор в строку Значение_если_ложь и нажмите на кнопку ЕСЛИ (рядом со строкой формул) для создания следующего вложения функции Если.

Рисунок 10

При каждом последующем открытии окна Аргументы функций нужно вводить записи
Лог_выражение         С17>6 C17>4
Значение_если_истина 4 3
Значение_если_ложь (здесь нажимаем кнопку ЕСЛИ) 2

36. Остановите макрос. Нарисуйте кнопку и назначьте ей макрос Оценка.
Последнее изменение: Четверг, 11 Август 2011, 12:32