Кто чем может помогите=) Решение задач с использованием VBA в среде Excel

Question

Вывести все значения функции Y(x) = cos(2x) + tg2(x) c заданным интервалом Х ПРИНАДЛЕЖИТ [-1, 0,8] и шагом изменения аргумента ДЕЛЬТА х = 0,12. 
Задача 2. Построить график заданной функции. Добавить подпись данных на ось х и надпись к диаграмме.

Любовь Ермилова · Accepted Answer

отвечаем только на 1 вопрос,
вот код макроса:
Sub ppp()

Cells.ClearContents

Cells(1, 1) = "X"
Cells(2, 1) = "Y"
xx = -1
kk = 2
While (xx <= 0.8)
Cells(1, kk) = xx
Cells(2, kk) = Cos(2 * xx) + Tan(2 * xx)
xx = xx + 0.12
kk = kk + 1
Wend
End Sub
вот результат:
Увеличить

Увеличить