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

В этом случае исходный код будет выглядеть следующим образом:

Процедура выполняется следующим образом. В ячейку В1 заносим какое либо число (например 3), выполняем последовательность команд Сервис | Макрос | Имя макроса: Пример2 | Выполнить. В ячейке В2 появится ответ (в данном случае 21,06562).

Для просмотра текста процедуры в окне Макросы необходимо выбрать нужную процедуру и нажать кнопку Войти.

Циклические вычислительные процессы

Пример 3

Применение цикла“For … Next”

Создать пользовательскую процедуру, позволяющую рассчитывать значения функции для заданного числа аргументов, причем начальное значение аргумента х, шаг изменения аргумента h и количество аргументов n определяется пользователем.

Результат расчета представить в виде таблицы

1. Переходим в редактор Visual Basic и создаем новый модуль.

2. В модуле создаем процедуру Таблица.

3. Создаем раздел описания переменных

 

4. Записываем операторы тела процедуры. Так как в данном случае значения функции придется рассчитывать n раз (для n аргументов), где n задает пользователь, то удобно воспользоваться оператором цикла «For … Next». Этот тип циклов применяется в случаях, когда точно известно, сколько раз необходимо выполнить группу операторов.

 

 

Пример 4

Применение цикла «Do While … Loop».

1. Эту процедуру можно создать с применением цикла, с условием, проверяемым перед входом в цикл «Do While … Loop».

2. Переходим в редактор Visual Basic и создаем новый модуль.

3. В модуле создаем процедуру Пример_4.

 

4. После вызова процедуры командой Макросы…
Пример_4 | Выполнитьна экране будут последовательно появляться окна для ввода данных.

 

 

 

 

 

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

 

Дата добавления: 2014-07-19; просмотров: 679; Нарушение авторских прав

Мы поможем в написании ваших работ!