pro23

VBA per Excel con istruzioni,dati,grafici sullo stesso foglio

creare PULSANTE per istruzioni

Private Sub CommandButton1_Click()
'disegna grafico spazio=velocità*tempo
'inserire valore per la velocità in cella(1,5)=(E1)
'cliccare Pulsante per creare serie numerica per spazio
'selezionare colonna B e disegnare grafico lineare
'disegnare altro grafico tipo istogrammi
Dim spazio, velocità, tempo As Integer
Dim k As Integer
velocità = Cells(1, 5)
For k = 1 To 10
tempo = k
spazio = velocità * tempo
Cells(k, 1) = tempo
Cells(k, 2) = spazio
Next k

End Sub

inserire valore per velocità in E1 (1,5) e cliccare PULSANTE per generare calcoli

selezionare colonna B e disegnare con Linee e poi con Istogrammi

inizio