Bonjour à tous,
Voila j'ai fais un programme que je ne peux pas encore tester et je voudrais savoir si la syntaxe vous parait bonne et si j'ai le droit de faire tout cela.
J'aimerais juste mettre dans 2 colonnes d'excel les valeurs des variables volts et volts1 et une fois que je clique sur le bouton stop, enregistrer ma feuille excel.
J'ai garder que les lignes interessantes
Option Explicit
Private Sub cmdStart_Click()
Dim ligne As integer
Ligne=1
Dim exc As New Excel.Application 'création de la feuille excel
Workbooks.Add
Sheets("Feuil1").Select
Sheets("Feuil1").Name = "mafeuille"
Range("A1").Select
ActiveCell.FormulaR1C1 = "Voie 1" 'Entete de la premiere colonne
Range("B1").Select
ActiveCell.FormulaR1C1 = "Voie 2" 'Entete de la deuxième colonne
Timer1.Interval = 500 '500 ms
Timer1.Enabled = True 'start timer 'déclenchement du timer
End Sub
Private Sub Timer1_Timer()
Dim Volts As Single
Dim Volts1 As Single
Dim ligne As integer
Ligne=ligne+1
DTPlot321.SinglePoint = Volts
DTPlot321.SinglePoint = Volts1
Range("A"+ligne).Select
ActiveCell.FormulaR1C1 = Volts
Range("B"+ligne).Select
ActiveCell.FormulaR1C1 = Volts1
End Sub
Private Sub cmdStop_Click()
Timer1.Enabled = False 'timer off
ActiveWorkbook.SaveAs FileName:="C:\essaivb.xls", FileFormat:= _
xlNormal, Password:="", WriteResPassword:="", ReadOnlyRecommended:=False _
, CreateBackup:=False
ActiveWorkbook.Close
Set exc = Nothing
End Sub
Private Sub Form_Load()
End Sub
merci pour vos réactions