Добавил:
Upload Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз: Предмет: Файл:
Бородина А.И. Макропрогр. в среде Microsoft Wor...doc
Скачиваний:
6
Добавлен:
01.03.2025
Размер:
4.03 Mб
Скачать

Занятие 2

ЗАДАНИЕ 1. Средствами Excel создать макрос с именем Формат1, который в диапазоне ячеек изменит цвет ячейки, если в ней находится отрицательное значение. Назначить макросу комбинацию клавишей [Ctrl+U].

Рекомендации по выполнению

  1. Установите табличный курсор в ячейку А1.

  2. Для начала записи макроса выполните команду Сервис ► Макрос ► Начать запись.

  3. Дайте макросу имя Формат1, набрав его в поле Имя макроса.

Имя макроса должно быть записано на языке Excel, т.е. состоять только из букв, цифр и знака подчеркивания (имя не должно содержать пробелов).

  1. Опишите назначение макроса, набрав в поле Описание текст, например, Условно форматирует ячейки.

  2. Чтобы в будущем вызывать этот макрос с помощью комбинации клавиш, в поле Сочетание клавиш введите комбинацию, например [Ctrl+U].

  3. Нажмите кнопку [ОК].

  4. Чтобы можно было использовать макрос в любой ячейке листа, на появившейся панели Остановить запись нажмите кнопку Относительная ссылка.

Если при записи макроса отсутствует панель инструментов Остановить запись, то включите ее, выбрав из контекстного меню панелей инструментов.

  1. Начните выполнение команд, которые составят содержимое макроса:

  • выполните команду Формат ► Условное форматирование…;

  • в диалоговом окне Условное форматирование выберите в текстовых полях Условия 1: значение, меньше, 0. Нажмите кнопку Формат и выберите цвет, например, оранжевый на закладке Вид. Так будет отображаться ячейка при выполнении условия. Нажмите кнопку [ОК];

  • остановите запись, нажав кнопку Остановить запись.

  1. Продемонстрируйте работу макроса на другом листе Книги, предварительно заполнив диапазон ячеек, например, А1:С5 данными, имеющими как положительные, так и отрицательные значения, и выделив его. Вызовите макрос нажатием комбинации клавиш [Ctrl+U]. И вы увидите ячейки, в которых записаны отрицательные значения, окрасятся оранжевым цветом.

ЗАДАНИЕ 2. Средствами Excel создать макрос с именем Формат2, который в столбце ячеек А1:А20 заменит отрицательные числа на 0. Назначить макросу комбинацию клавишей [Ctrl+7].

Рекомендации по выполнению

  1. Установите табличный курсор в ячейку А1.

  2. Для начала записи макроса выполните последовательные действия Сервис ► Макрос ► Начать запись.

  3. Дайте макросу имя Формат2, набрав его в поле Имя макроса.

  4. Опишите назначение макроса, набрав в поле Описание текст, например, Представление отрицательных чисел в виде 0.

  5. Чтобы в будущем вызывать этот макрос с помощью комбинации клавиш, в поле Сочетание клавиш введите комбинацию, например [Ctrl+7].

  6. Нажмите кнопку [ОК].

  7. Чтобы можно было использовать макрос в любой ячейке листа, на появившейся панели Остановить запись нажмите кнопку Относительная ссылка.

  8. Начните выполнение команд, которые составят содержимое макроса:

  • выделите столбец А1:А20;

  • установите табличный курсор в ячейку В1 и выполните команду ВставкаФункция;

  • откроется диалоговое окно Мастер функций, в котором выберите Категория: Логические, Функция: ЕСЛИ и нажмите [ОК];

  • на следующем шаге откроется окно построителя функции ЕСЛИ, в полях которого введите: Логическое выражениеА1<0; Значение_если_истина0; Значение_если_ложьА1 (адрес ячейки указывается табличным курсором). Нажмите кнопку [ОК];

  • скопируйте формулу из ячейки В1 в целую группу соседних ячеек до В20, расположив указатель мыши на маркере заполнения и перетащив его таким образом, чтобы область выделения покрыла все ячейки, в которые нужно скопировать формулу;

  • выделите столбец В1:В20 и выполните команду ПравкаКопировать;

  • выделите ячейку А1 и выполните команду ПравкаСпециальная вставка. В диалоговом окне Специальная вставка включите опцию Вставить значения и нажмите кнопку [ОК];

  • выделите столбец В1:В20 и удалите содержимое;

  • остановите запись, нажав кнопку Остановить запись.

  1. Продемонстрируйте работу макроса, используя комбинацию клавиш [Ctrl+7], на другом листе Книги, предварительно заполнив данными (отрицательными и положительными) и выделив в любом месте листа столбец ячеек 1:20. И вы увидите, что в вашем столбце отрицательные числа будут заменены 0.

ЗАДАНИЕ 3. Средствами Excel создать макрос с именем Функция, который вычисляет значения функций Y=SIN(X) и Y1=SIN(X)*COS(5*X) в заданном диапазоне, с заданным шагом и строит по ним график. Значения Х и шаг задаются пользователем.