vbaarea
copiare il codice VBA, aprire
foglio su Excel, creare pulsante, attivarlo e incollare
codice,salvare foglio.
(per informazione per copiare e incollare vedi spiega1.htm)
Private Sub CommandButton1_Click()
Rem calcolo area triangolo
Cells(1, 5) = "calcolo area triangolo in funzione di due
lati e angolo compreso"
Cells(2, 5) = "area = lato1*lato2*seno(alfa)/2 "
Cells(1, 1) = "inserire lato1"
Cells(2, 1) = "inserire lato2"
Cells(3, 1) = "inserire alfa compreso"
Cells(4, 1) = "calcolare radianti"
Cells(5, 1) = "calcolare seno"
Cells(6, 1) = "calcolare area"
Cells(4, 2) = Cells(3, 2) * 3.14 / 180
Cells(5, 2) = Sin(Cells(4, 2))
Cells(6, 2) = Cells(1, 2) * Cells(2, 2) * Cells(5, 2) / 2
End Sub
vedi vbaarea.xls