End Sub. Свойства ячеек также можно менять программно, например, если нужно вывести значения на рабочем листе «Лист1»

Свойства ячеек также можно менять программно, например, если нужно вывести значения на рабочем листе «Лист1», используя размер 14 и шрифт Times New Roman, то надо записать в процедуре перед выводом данных:

Worksheets("Лист1").Range("a2").Font.Name = "Times New Roman"

Worksheets("Лист1").Range("a2").Font.Size = 14

Отладка программы. Если при вводе оператора была допущена синтаксическая ошибка, то редактор VBA помечает строку красным цветом. При возникновении ошибки во время запуска программы (например, деление на 0) происходит прерывание выполнения программы и вывод сообщения о типе ошибки. При этом в окне сообщения можно выбрать режим остановки программы End или перехода в окно отладки программы Debug. Строка с ошибкой или процедура, где возникла ошибка, будет помечена желтым цветом.

Для исправления ошибки нужно прервать программу, нажав кнопку Reset на панели инструментов редактора VBA, исправить ее и запустить программу заново. Или исправить ошибку, затем продолжить выполнение программы, нажав кнопку Continue (Run).

Содержание заданий

1. Создать командную кнопку с заголовком «Пример расчета». Набрать для этой командной кнопки приведенный выше текст линейной программы и выполнить программу щелчком мыши по кнопке.

2. Создать командную кнопку c заголовком «Расчет по формулам» и записать для нее программу по условию, приведенному в табл. 4.2.

Выполнить программу и проанализировать результаты.

Таблица 4.2

№	Формула для вычислений	Исходные данные

Date: 2015-08-24; view: 305; Нарушение авторских прав