Материал: LS-Sb87076

на вкладке «Главная» в группе «Буфер обмена» нажмите кнопку «Копировать»;

перейдите на лист «Список студентов» и выделите ячейку А3;

на вкладке «Главная» в группе «Буфер обмена» раскройте список «Вставить» и выберите команду «Вставить значения»;

на вкладке «Разработчик» в группе «Код» нажмите кнопку «Остановить запись»;

5.Проверьте работу созданного макроса. Для этого на листе «Список студентов» очистите диапазон ячеек А3:Е3, перейдите на лист «Форма», на вкладке «Разработчик» в группе «Код» нажмите кнопку «Макросы», в диалоговом окне «Макрос» выделите имя созданного макроса и нажмите кнопку «Выполнить». Строка сведений будет вставлена на то же место.

6.Для того чтобы новые сведения вставлялись в таблицу в следующие по порядку строки, необходимо откорректировать текст макроса. Для этого на вкладке «Разработчик» в группе «Код» нажмите кнопку «Макросы», в диалоговом окне «Макрос» выделите имя созданного макроса и нажмите кнопку «Изменить». Откроется окно редактора Visual Basic.

7.В окне редактора 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

8.Закройте окно редактора, щелкнув по самому левому значку на инструментальной панели редактора с изображением логотипа Excel. Повторно выполните макрос.

9.Назначьте кнопке «Запись в таблицу» созданный макрос. Для этого выделите кнопку правой клавишей мыши, в контекстном меню выберите

26

пункт «Назначить макрос», в окне «Назначить макрос объекту» выделите соответствующий макрос и нажмите «OK».

10.Выполните макрос щелчком по кнопке.

11.С помощью созданного макроса заполните список студентов данными о принятых в университет студентах (10–15 человек).

12.Используя созданный в предыдущем задании список студентов, создайте на новом листе с именем «Справка» автоматизированную форму для выдачи студенту справки следующего образца:

СПРАВКА

Настоящая справка выдана студенту_____________ _____ года рождения в том, что он (она) в настоящее время учится в Санкт-Петербургском государственном электротехническом университете в группе _____ по специальности ____________ .

Соответствующие данные должны заноситься в справку автоматически посредством выбора фамилии студента из поля со списком.

Список рекомендованной литературы

Информатика: Учебник/ Под ред. Н. В. Макаровой.– 3-е изд., перераб. – М.: Финансы и статистика, 2007. – 768 с.: ил.

Кожевников С. А., Никифоров И. Б. Сборник индивидуальных контрольных заданий в среде табличного процессора Excel 2007, СПбГЭТУ, 2009. – 38 с.

Симонович С. В. Информатика. Базовый курс: Учебник для вузов – СПб.: Питер, 2009. – 640 с.

27

Редактор Н. В. Лукина

––––––––––––––––––––––––––––––––––––––––––––––––

Подписано в печать 26.12.11. Формат 60 84/16. Бумага офсетная. Печать офсетная. Печ. л. 1,75.

Ганитура «Times New Roman». Тираж 40 экз. Заказ 166.

––––––––––––––––––––––––––––––––––––––––––––––––

Издательство СПбГЭТУ «ЛЭТИ» 197376, С.-Петербург, ул. Проф. Попова, 5

28