Друзья дали задание Решить в екселе через бейсик вот эту формулу, я пытался но выскакивает ошибка постоянно. Кому не лень распишите пожалуйтса!Нужно расписать в бейсике через ексель, что бы кнопка выдавала результат сама
Друзья дали задание Решить в екселе через бейсик вот эту формулу, я пытался но выскакивает ошибка постоянно. Кому не лень распишите пожалуйтса!
Нужно расписать в бейсике через ексель, что бы кнопка выдавала результат сама
Гость
Ответ(ы) на вопрос:
ГостьSub CommandButton1_Click()
' Dim x, a, b, c, y As Double
x = 5.2319
a = -2.9565
b = 0.8204
c = 0.05
y = -Exp(b) + (a ^ 2 - Sin(3 * (x) ^ 3) ^ 2) / (Sqr(b ^ 2 - c) + x ^ (1 / 3))
MsgBox y
End Sub
Вот так у меня выдает правильный ответ
Не нашли ответ?
Похожие вопросы