Создание макроса и кнопки для его запуска

 

Запустите Excel

 

Запустите редактор VBA последовательностью команд

Сервис è Макрос è Редактор è Visual Basic

Выполните команду Вставкаèи создайте новый модуль. Выберите его значок в окне проекта, чтобы активизировать окно редактора для создания процедуры.

В открывшемся окне напишите на VBA программу

 

Sub hello()

MsgBox ("Привет")

End Sub

 

Активизируйте лист Excel.

Создайте новую кнопку пунктом меню Вид > Панели инструментов > Настройка.

 

В диалоге Настройка на вкладке Команды найдите категорию Макросы.

В поле Команды щелкните по пункту Настраиваемая кнопка.

 

Перетаскиваем кнопку на стандартную панель. Щелкаем по ней правой кнопкой мыши, выбираем пункт Назначить макрос.

 

В появившемся диалоге выбираем макрос Hello.

 

Нажимаем кнопку Изменить выделенный объект на диалоге Настройка или щелкаем по новой кнопке правой кнопкой мыши.

 

Выбираем пункт Изменить значок для кнопки, в появившемся списке выбираем значок в виде сердечка.

 

Проверяем, как теперь эта кнопка работает.

Лабораторная работа 7

Excel – Создание и использование форм

 

Задание 1

1. Запустить Excel, Л ист1 переименовать в Формы, файл сохранить под именем Lab_3 в своей папке (не в папке Мои Документы!)
2. Вывести на экран панель инструментов Формы (Вид„Панели инструментов„Формы)
3. На панели инструментов Формы выбрать инструмент Поле со списком и мышкой в свободном месте листа «прорисовать» элемент список.

4. На листе в диапазоне ячеек A1:B6 ввести список фамилий

A	B
	Фамилия, И.О.
	Иванов А.Л.
	Семенов А.Е.
	Николаева Я.О.
	Родионова К.П.
	Федоров П.Н.

5. Щелкнуть правой кнопкой мышки по прорисованному элементу список и в контекстном меню выбрать ФорматОбъекта На закладке ЭлементУправления в поле Формировать список по диапазону указать диапазон ячеек со списком (B1:B6), в поле Связь с ячейкой указать ячейку, в которой будет результирующий список (например, E4), указать количество строк в списке в соответствующем поле.

1. Убедиться в работоспособности поля со списком.
2. Самостоятельно сформировать поля Счетчик, Список и др.

 

Задание 2

 

1. Лист2 переименовать в Заказ
2. Сформировать таблицу заказов компьютерного оборудования следующим образом

a. Ввести шапку таблицы

Отдел	Оборудование	Кол
(*)	(**)	(***)

 

b. Ввести перечень отделов и оборудования

Отделы	Оборудование
Экономический	Принтер HP1300
Отдел кадров	Сканер Mustek
Технический	Монитор LG
Информационный	Копир Sharp AR163

c. Ячейку (*) преобразовать в поле со списком, связать с перечнем отделов, ячейку (**) – связать с перечнем оборудования, ячейку (***) преобразовать в поле Счетчик

 

Отдел	Оборудование	Кол

 

Лабораторная работа 8