Студопедия

КАТЕГОРИИ:


Архитектура-(3434)Астрономия-(809)Биология-(7483)Биотехнологии-(1457)Военное дело-(14632)Высокие технологии-(1363)География-(913)Геология-(1438)Государство-(451)Демография-(1065)Дом-(47672)Журналистика и СМИ-(912)Изобретательство-(14524)Иностранные языки-(4268)Информатика-(17799)Искусство-(1338)История-(13644)Компьютеры-(11121)Косметика-(55)Кулинария-(373)Культура-(8427)Лингвистика-(374)Литература-(1642)Маркетинг-(23702)Математика-(16968)Машиностроение-(1700)Медицина-(12668)Менеджмент-(24684)Механика-(15423)Науковедение-(506)Образование-(11852)Охрана труда-(3308)Педагогика-(5571)Полиграфия-(1312)Политика-(7869)Право-(5454)Приборостроение-(1369)Программирование-(2801)Производство-(97182)Промышленность-(8706)Психология-(18388)Религия-(3217)Связь-(10668)Сельское хозяйство-(299)Социология-(6455)Спорт-(42831)Строительство-(4793)Торговля-(5050)Транспорт-(2929)Туризм-(1568)Физика-(3942)Философия-(17015)Финансы-(26596)Химия-(22929)Экология-(12095)Экономика-(9961)Электроника-(8441)Электротехника-(4623)Энергетика-(12629)Юриспруденция-(1492)Ядерная техника-(1748)

Использование макросов для автоматизации наиболее часто выполняемых задач




Макрос – это записанная последовательность команд и действий пользователя, сохраненная под уникальным именем, которую может выполнить Excel. Макрос можно создать двумя способами:

1) записать программу, составленную на языке Visual Basic, традиционным образом, т.е. ввести текст программы с клавиатуры.

2) Записать с помощью макрорекордера. Excel имеет встроенное средство для записи макросов – макрорекордер. Он записывает все выполняемые пользователем действия в виде операторов языка Visual Basic. В дальнейшем макрос можно редактировать, как обычный текстовый файл.

Тексты макросов хранятся в специальных листах рабочей книги (лист Модуля).

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

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

1. Создать с помощью макрорекордера макрос с именем Пример1, который позволяет выполнить следующую последовательность действий: представить окно рабочей книги в нормальном режиме, скрыть сетку, изменить вид шрифта для ячеек и присвоить ячейкам денежный стиль, ввести в ячейку число. Для начала записи макроса в меню Сервис \ Макрос нужно выбрать Начать запись. В диалоговом окне Запись макроса необходимо ввести имя для макроса в соответствующее поле, а в поле Сохранить в книге указать Эта книга. (Если требуется, чтобы макрос был доступен независимо от того, используется ли в данный момент программой Excel, его следует сохранить в личной книге макросов.)

2. После выхода из диалога Запись макроса начинается запись (в строке состояния отображается: Запись). Теперь необходимо выполнить действия, которые должен записать макрорекордер:

· установить нормальное (занимающее часть экрана) представление окна рабочей книги;

· скрыть сетку путем выключения соответствующей опции в закладке Вид диалогового окна Параметры, которое открывается с помощью меню Сервис;

· выделить весь рабочий лист (щелчком по месту пересечения номеров столбцов и номеров строк) и присвоить всем ячейкам денежный стиль;

· задать для всех ячеек шрифт Times New Roman, 16 пунктов;

· снять выделение листа.

· в ячейку С6 занести число 12.

3. Выполнив указанные действия, остановить запись макроса с помощью кнопки Остановить запись.

4. Просмотреть текст созданного макроса. Для этого с помощью меню Сервис \ Макрос \ Макросы в открывшемся окне выбрать команду Войти. После выполнения этой команды автоматически загружается приложение Visual Basic, а в окне Модуль показывается текст созданного макроса. Переписать программу со своими комментариями.

6. Закрыть окно программы Visual Basic и вернуться в свою рабочую книгу (команда File\ Close and return Microsoft Excel).

7. Создать с помощью макрорекордера макрос Пример2, который восстанавливает исходные параметры окна и листа.

8. Перейти на Лист2. Запустить поочередно макросы Пример1 и Пример2 с помощью команды Сервис \ Макрос \ Макросы….

9. Назначение клавиши для запуска макроса. В меню Сервис\Макрос\Макросы выбрать имя того макроса, которому нужно присвоить сочетание клавиш, с помощью которых он будет выполняться. После этого в диалоговом окне нужно выбрать команду Параметры и ввести соответствующую букву в поле Сочетание клавиш. Запустить макросы через сочетание клавиш.

9. Назначение кнопки для запуска макроса. Создать кнопки на листе для запуска макросов Пример1 и Пример2. В меню Вид активизировать панель инструментов Формы. Затем выполнить следующие действия:

· На панели инструментов Формы выбрать элемент Кнопка.

· На листе с помощью мыши создать кнопку нужного размера.

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

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

· Задать кнопке соответствующую надпись.

· Запустить макросы, используя созданные кнопки.

10. Назначение команды в меню Сервис. Назначить макросам Пример1 и Пример2 команды в меню Сервис. В меню Вид \ Панель инструментов выбрать команду Настройка. Далее:

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

· Открыть меню Сервис.

· Перетащить мышкой команду Настраиваемая команда меню из списка Команды в окне Настройка, удерживая клавишу «Ctrl», в меню Сервис и установить под командой Макрос.

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

· Закрыть окно Настройка.

· Запустить макросы, используя созданные команды меню.

11. Создать кнопки для запуска своих макросов на собственной панели инструментов.

· Создать собственную панель инструментов. Для этого выполнить команду Вид \ Панель инструментов \Настройка …. Выбрать закладку Панели инструментов и воспользоваться кнопкой Создать…, задать для своей панели имя.

· Не выходя из режима настройки, выбрать закладку Команды, выбрать категорию Макросы, перенести мышью на свою панель инструментов команду Настраиваемая кнопка, удерживая клавишу «Ctrl». Используя контекстное меню, назначить макрос кнопке, дать кнопке имя и выбрать или изменить значок для кнопки.

· Запустить макросы с помощью созданных кнопок на своей панели инструментов.

Лабораторная работа №22. Программирование алгоритмов линейной структуры

Цель работы: освоение простейших приемов программирования на языке Excel Visual Basic на примере алгоритмов линейной структуры, отработка различных способов ввода данных и вывода результатов.

Решение любой задачи подразделяется на три этапа: ввод данных, обработка данных и вывод результатов.

Для ввода данных в программе используется оператор присваивания. Синтаксис оператора присваивания имеет следующий вид:

[LET] имя переменной = выражение

В программе, написанной на языке Excel Visual Basic ввод данных можно осуществить тремя способами:

· Ввод данных непосредственно в программе.

В этом случае в качестве выражения, стоящего в правой части оператора присваивания, используется число(или текст, если данные текстовые).

· Ввод данных в диалоге (с клавиатуры).

В этом случае в качестве выражения, стоящего в правой части оператора присваивания, используется функция InputBox (приглашение[,заголовок][,по умолчанию][,x позиция] [,y позиция] [,файл справки]). Эта функция имеет один обязательный аргумент – приглашение – это строковое выражение, отображаемое как сообщение в диалоговом окне функции. Аргумент заголовок используется для задания текста, отображаемого в строке заголовка диалогового окна функции InputBox. В окне функции имеется поле ввода, в которое пользователь должен ввести значение. Возвращает функция строковое значение, содержащее текст, введенный в поле ввода. Т.о., переменной, имя которой указано в левой части оператора присваивания, будет присвоено значение, введенное пользователем в поле ввода окна функции InputBox. Для преобразования введенного в поле ввода диалога строкового выражения в формат вещественного числа используется функция Val (строковое выражение).

· Ввод данных из ячеек таблицы.

В этом случае в качестве выражения, стоящего в правой части оператора присваивания, используется объект WorkSheets(«имя листа»).Range(«адрес ячейки»).Value. Таким образом переменной, имя которой указано в левой части оператора присваивания, будет присвоено значение ячейки, адрес которой указан в правой части оператора.

Вывод результатов можно осуществить следующим образом:

· Вывод в окне сообщения.

В этом случае используется функция MsgBox (приглашение[,кнопки] [,заголовок] [,файл справки])

· Вывод в ячейки таблицы.

В этом случае используется следующая конструкция:

WorkSheets(«имя листа»).Range(«адрес ячейки»).Value = выражение

Т.о. значение выражения, стоящего в правой части конструкции, записывается в ячейку таблицы, имя которой указано в левой части.

 

Задача. Вычислить площадь треугольника по формулам:

где - полупериметр

Для решения задачи:

  1. Создать новую рабочую книгу в Excel
  2. Переименовать рабочий лист в «Работа 1»
  3. Ввести данные в ячейки таблицы согласно образцу:
  A B C D E F
  Исходные данные Вычисление площади
  a= 4,6   s1=    
  b= 11,7   p=    
  c= 8,7   s2=    
  h=          
  1. В ячейках Е2:Е4 задать формулы для вычисления s1,p,s2 (Внимание! s1 и s2 – это площадь одного и того же треугольника, вычисленная разными способами).
  2. Выполнить команду Сервис \ Макрос \ Редактор Visual Basic. В появившемся окне Microsoft Visual Basic выбрать пункт Insert (Вставка) операционного меню, а в нем команду Module (в рабочую книгу будет добавлен Модуль1 – Module1)
  3. Ввести следующую программу (Внимание! Во избежание ошибок текст программы должен быть набран в английском регистре, включая символы “.,: Допускается использование русского шрифта при записи комментариев и текста, заключенного в кавычки в операторах InputBox, MsgBox)

Sub prog1()




Поделиться с друзьями:


Дата добавления: 2014-12-27; Просмотров: 1003; Нарушение авторских прав?; Мы поможем в написании вашей работы!


Нам важно ваше мнение! Был ли полезен опубликованный материал? Да | Нет



studopedia.su - Студопедия (2013 - 2024) год. Все материалы представленные на сайте исключительно с целью ознакомления читателями и не преследуют коммерческих целей или нарушение авторских прав! Последнее добавление




Генерация страницы за: 0.011 сек.