Трудности с Vba

[Core2Duo]

Друзья, помогите пожалуйста решить практическую задачу :

на VBA (именно на нем,хотя я не понимаю все равно в нем ничего) написать ЧТОТО
которое будет выводить график функции, построенной по точкам. Функция - косинусоида вида
Acos(wt). по точкам потому что с интервалом для t 0.2 ...интервал от 0 до 19.

Помогите пожалуйста кто чем может!!!!
не могу разобраться как этим ваще пользоваться , вечно вылетает ошибка при запуске файлов VBS (если ваще надо именно так)

 

[Vlanib]

ACOS(wt) - t от 0 до 19 с интервалом 0,2, а w чему?

 

[Core2Duo]

>>ACOS(wt) - t от 0 до 19 с интервалом 0,2, а w чему?
да W задано константой, типа частота!

 

[Vlanib]

Sub Acos_Fnc()
Dim t, w, i
w = 0.052
i = 1
For t = 0 To 19 Step 0.2
Cells(i, 1) = t
Cells(i, 2) = WorksheetFunction.Acos(t * w)
i = i + 1
Next
With Charts.Add
.ChartType = xlXYScatterSmooth
.SeriesCollection.NewSeries
.SeriesCollection(1).XValues = Range("A1:A96")
.SeriesCollection(1).Values = Range("B1:B96")
End With
End Sub

 

[Core2Duo]

Спасибо тебе огромное!!!
а чего теперь с кодом то делать ?
почитал про VBA - ну вот впишу я ее как макрос с Ексэль, появится новая функция, а что дальше ?

тока сча обратил внимание - AcosWT это А - амплитуда не так важно, поидее,все равно в таких скриптовых языках COS() и в африканских языках COS(), мой касяк ,извиняюсь

продолжил пробовать - вот ято получилось http://gyazo.com/3ea3c281979f2d4f7ebc8dffeff0b0f1.png

 

[Vlanib]

Вот рабочий пример

 

[Core2Duo]

Все !!! разобрался, работает!!!!
Еще рас спасибо!