sinusoide e cosinusoide

aprire excell, vba, creare pulsante, incollare o scrivere codice
disegnare grafico selezionando colonne A,B

Private Sub CommandButton1_Click()
Rem sinusoide e cosinusoide
Rem righe indicate da k , colonna 1
k = 0
For a = 0 To 360
k = k + 1
x = a * 3.14 / 180
seno = Sin(x)
coseno = Cos(x)
Cells(k, 1) = a
Cells(k, 2) = seno
Cells(k, 3) = coseno
Next a
End Sub

excelvba.htm

vedi sinusoide2.xls