Простая система проверки знаний или подготовки к тестированию в Excel за 15 минут.

Простая система тестирования в Excel за 15 минут.

Часто приходится проходить тесты, которые состоят из набора вопросов, на каждый из которых предлагается несколько различных ответов. Экзаменуемый должен указать правильный ответ. Такой вид экзамена очень распространен. Его используют для проверки знаний по правилам движения, техники безопасности, электробезопасности и. т. д.

К такому тестированию, как подсказывает практика, лучше всего готовится методом многократного повторения всех вопросов теста, чтобы научится автоматически находить правильный ответ. При этом важно соблюдать одно правило, нельзя учить ответы по билетам, в которых сразу явно указаны правильные ответы. Нужно чтобы ученик сам сознательно каждый раз старался выбрать правильный ответ.

Обычно для этого используют распечатку или электронный документ, в котором отмечают варианты ответов, после чего проверяют правильно или нет. С помощью Excel можно ускорить подготовку к экзамену.

Создаем новый документ Excel, в котором оставляем две вкладки. Первой дадим название «вопросы», второй «списки». Открываем вкладку списки, на которой вводим последовательно в ячейки одной колонки заголовок «ответ», и два варианта ответа «Правильный ответ» и «Ответ не верный», которые будут использоваться на вкладке «вопросы» как элементы выпадающего списка. Для этого необходимо присвоить им имя. Выделяем курсором две ячейки «Правильный ответ» и «Ответ не верный», в основном меню выбираем Вставка -> Имя -> Присвоить как показано на рисунке ниже.

Открываем меню.

В появившемся диалоговом окне вводим имя «ответ» выделенному диапазону ячеек, и нажимаем кнопку ОК.

Присваиваем имя ответ диапазону ячеек.

Далее переходим на вкладку «вопросы», где создаем таблицу, которая представляет собой один вопрос теста с вариантами ответов.

Создаем таблицу теста.

В колонке «ответ» будем указывать «Правильный ответ» или «Ответ не верный», для чего создадим выпадающий список выбора. Выделяем курсором ячейки в столбце ответ, в основном меню выбираем Данные -> Проверка как показано на рисунке ниже.

Открываем меню проверки данных.

В появившемся диалоговом окне в поле «Тип данных» выбираем «Список», в поле «Источник» вводим «=ответ» и нажимаем кнопку ОК.

Заполняем поля.

В результате при обращении к ячейкам в столбце «ответ» расположенным рядом с вариантами ответа на вопрос появляется выпадающий список выбора.

Видим выпадающий список выбора.

На этом создание документа завершено. Остается сделать так чтобы при выборе ячейки с правильным или неверным ответом появлялось соответствующее сообщение. Для этого в основном меню выбираем Сервис -> Макрос -> Редактор Visual Basic как показано на рисунке ниже.

Сервис  -> Макрос -> Редактор Visual Basic.

В открывшемся окне редактора кликнем правой кнопкой мыши по листу «Лист1 (вопросы)» и выбираем пункт меню «View code», как показано на рисунке ниже.

Добавляем в редакторе следующий код:

Private Sub Worksheet_SelectionChange(ByVal Target As Range)

If ActiveCell.Offset(0, 2) = "Правильный ответ" Then

MsgBox "ПРАВИЛЬНЫЙ ОТВЕТ !!! ;-) " + ActiveCell.Text

End If

If ActiveCell.Offset(0, 2) = "Ответ не верный" Then

MsgBox "ОТВЕТ НЕ ВЕРНЫЙ :-("

End If

End Sub

Пишем код.

Закрываем окно редактора, сохраняем документ и пробуем выбрать один из вариантов ответа. При выборе ячейки, которая находится в строке, которая обозначена как правильный ответ

Окно сообщения.

или ответ не верный, выводится соответствующее сообщение.

Окно сообщения.

Теперь остается методом копирования вставки сделать нужное количество вопросов. Указать на них верные ответы, после чего, выделив столбец с ответами (в данном случае столбец G), скрыть его, выбрав соответствующий пункт выпадающего меню.

Окно сообщения.

После чего можно готовиться к экзамену.