MS Excel. Visual Basic for Application (VBA)

  1. Создать файл под именем вида Фамилия-VBA.xls
  2. Переименовать Лист1 в ФункцияExcel
  3. Создать таблицу вида (значение функции вычисляется по формуле в соответсвии с Вашим вариантом посредством стандартных математических функций MS Excel)
  4. Переименовать Лист2 в ФункцияVBA, на котором значение функции вычислить с использованием пользовательской функции, определенной в среде VBA по средствам линейную программы на языке Basic в виде подпрограммы-функции. Вычислить в ЭТ Excel значение определенной функции, задав значения входным переменным.

    Примечание: Для того чтобы запустить среду VBA, необходимо выполнить команду Сервис - Макрос - Редактор Visual Basic . Затем необходимо выбрать команду Insert - Module .

         Краткий перечень встроенных матматических операторов и функций VBА

         Постоянная p может быть определена следующим образом: pi=4*Atn(1)

    Пояснения:

    Поскольку расчет значений идет последовательный и результатом вычислений является единственное значение , то данная программа относится к процедурам - функциям с линейной структурой . Для разработки программы следует :

    • выбрать имя процедуры - функции: Familia_Fun ;
    • выбрать обозначения всех математических величин задачи на языке VBA ;
    • составить текст функции в соответствии с порябком линейного вычислительного процесса и правилами оформления процедур-функций .

    Обратите внимание на то, что Ваша функция должна иметь два аргумента: a и x
    Для далнейшего вычисления значений функции с использованием определенной процедуры - функции Familia_Fun, необходимо из активной ячейки ( например ,B3) вызвать командой Вставка - Функция ... диалоговое окно мастера функций. В разделе категория выбрать Определенные пользователем , s затем указать функцию Familia_Fun, в поле для входных параметров установить ссылку на соответствующие ячейки. Таким образом формула примет вид : в ячейке B3 = Familia_Fun (B1;A3)

    Образец текста программы

    Образец вызова функции

     

  5. Переименовать Лист3 в ПроцедураVBA, на котором создать процедуру Familia_Sub для вывода таблицы значений функции f(x) на отрезке [0,1; 1] с шагом 0,1, а также суммирования полученных значений. Изначально на листе вводится только текст "а=" и соответствующее значение параметра а. Остальные все значения выводятся по средствам процедуры. В итоге должна получиться таблица вида


    Пример

    Обязательное требование: В созданной процедуре первоначально следует проверять, введено ли значение параметра а (если значение а не введено, принять его равным 2) . Для программирования такой структуры необходимо использовать оператор If/ Then/ Else .

    Синтаксис оператора:

    If условие Then
    Операторы_1
    Else
    Операторы_2
    End If

    Если условие выполняется, то управление переходит на группу операторов_1 , в противном случае (условие не выполняется) управление переходит на группу операторов_2 . После выполнения операторов работа оператора If заканчивается.

Варианты заданий:

1
2
3
4
5
6
7
8
9
10
11
12
13
14