Основы программирования на VBA. Регеда В.В - 76 стр.

UptoLike

ВУЗ: 

ПГУ | Пенза

Составители: 

Рубрика: 

10. АВТОМАТИЗАЦИЯ ПРОЕКТОВ С ПОМОЩЬЮ VBA и
MS Excel
При помощи MS Excel можно решить множество разнообразных за-
дач. Использование средств VBA, позволяет дополнительно создавать мак-
симально удобный и гибкий интерфейс, приспособленный для решения
конкретной задачи, предусматривать средства защиты от несанкциониро-
ванных действий, а также автоматизировать процесс создания электрон-
ных таблиц с помощью написания и использования собственных макроко-
манд.
10.1. Создание макроса в среде MS Excel
Написать макрокоманду, создающую рабочую таблицу, в которой
рассчитывается налог и итоговая цена товара. Рабочая таблица содержит
ячейку ввода и две вычисляемые ячейки вывода. В ячейку ввода необхо-
димо ввести стоимость товара, а в ячейках вывода будут отображены налог
и цена. Для этого выполните следующие действия:
1) Открыть новую рабочую книгу в среде MS Excel.
2) Выбрать команду Сервис→Запись макроса;
3) В поле Имя макроса ввести Макрос1;
4) Щелкнуть в ячейке С6 и ввести Стоимость;
5) Щелкнуть в ячейке С7 и ввести Налог;
6) Щелкнуть в ячейке С8 и ввести Всего;
7) Щелкнуть в ячейке D6 и ввести 12,43;
8) Щелкнуть в ячейке D7 и ввести =D6*0,0825;
9) Щелкнуть в ячейке D8 и ввести =D6+D7;
10) Выделить ячейки D6:D8, выбрать команду Формат Ячейки.
Выбрать Денежный формат «р.», 2 знака после запятой;
11) Щелкнуть в ячейке D7, выбрать команду Формат Ячей-
ки→Граница. Щелкнуть в поле Сверху и затем – на кнопке ОК;
12) Остановить запись макроса.
13) Запустить макрос на исполнение, в результате в среде MS Ex-
cel создается таблица (Рис. 10.1), содержащая следующие ячейки.
Стоимость 12,30р.
Налог 10,15р.
Всего 22,45р.
Рис. 10.1. 
    10.    АВТОМАТИЗАЦИЯ ПРОЕКТОВ С ПОМОЩЬЮ VBA и
MS Excel

      При помощи MS Excel можно решить множество разнообразных за-
дач. Использование средств VBA, позволяет дополнительно создавать мак-
симально удобный и гибкий интерфейс, приспособленный для решения
конкретной задачи, предусматривать средства защиты от несанкциониро-
ванных действий, а также автоматизировать процесс создания электрон-
ных таблиц с помощью написания и использования собственных макроко-
манд.
     10.1. Создание макроса в среде MS Excel
       Написать макрокоманду, создающую рабочую таблицу, в которой
рассчитывается налог и итоговая цена товара. Рабочая таблица содержит
ячейку ввода и две вычисляемые ячейки вывода. В ячейку ввода необхо-
димо ввести стоимость товара, а в ячейках вывода будут отображены налог
и цена. Для этого выполните следующие действия:
       1)   Открыть новую рабочую книгу в среде MS Excel.
       2)   Выбрать команду Сервис→Запись макроса;
       3)   В поле Имя макроса ввести Макрос1;
       4)   Щелкнуть в ячейке С6 и ввести Стоимость;
       5)   Щелкнуть в ячейке С7 и ввести Налог;
       6)   Щелкнуть в ячейке С8 и ввести Всего;
       7)   Щелкнуть в ячейке D6 и ввести 12,43;
       8)   Щелкнуть в ячейке D7 и ввести =D6*0,0825;
       9)   Щелкнуть в ячейке D8 и ввести =D6+D7;
       10) Выделить ячейки D6:D8, выбрать команду Формат Ячейки.
Выбрать Денежный формат «р.», 2 знака после запятой;
       11) Щелкнуть в ячейке D7, выбрать команду Формат Ячей-
ки→Граница. Щелкнуть в поле Сверху и затем – на кнопке ОК;
       12) Остановить запись макроса.
       13) Запустить макрос на исполнение, в результате в среде MS Ex-
cel создается таблица (Рис. 10.1), содержащая следующие ячейки.
                        Стоимость 12,30р.
                        Налог     10,15р.
                        Всего     22,45р.
                                 Рис. 10.1.

Страницы