Hallo zusammen,
möchte gerne per RS232 Daten in Excel darstellen. Der Graph sollte sich dabei während die Daten kommen aktualisieren. Aber nicht länger werden, sondern nur eben einen vorhandenen Datensatz überschreiben. Soweit so gut. Die Daten bekomm ich rein, nur ein Timer bereitet mir Probleme.
Wenn ich auf einen Knopf drücke, soll er mir alle x Sekunden den Wert abfragen. Das macht es auch, doch der Graph aktualisiert in der Zwischenzeit nicht, erst wenn die Schleife komplett durch ist.
Habe es im Vorfeld auch mit Application.Time und OnTime und Wait versucht, aber gab nur fehler.
Hier mal der Code vom Knopf
Private Sub CommandButton3_Click()
Dim i As Integer
i = 2
While i < 12
Sleep (250)
Cells(20, i) = (i * i) / (10) 'RS232data
i = i + 1
Wend
End Sub
Das Sleep ist nicht so super, aber ich habe erst heute mit VBA angefangen und bin da nicht fit was es für Möglichkeiten gibt.
Jemand ne Idee ? Ich möchte, dass sobald ein Wert überschrieben wurde, der Graph sich anpasst.
Grüße
|