Application.OnTime stoppen
05.04.2016 15:30:42
Luzi
hab folgendes Problem mit NextTime. Das Makro "Intervall" funktioniert .Allerdings
sollte er mit den nächsten Makro "Abbruch" seine Arbeit einstellen was er nicht macht.Gesteuert wird das ganze über Formalsteuerelemente .Hab gestern viel gelesen im Netz .Tipps versucht umzusetzen .Nach 4 Std. aufgegeben .Ihr seid meine letzte Hoffnung.
Grüß Luzi67
Public Sub Intervall()
Dim NextTime As Date
NextTime = Now + TimeValue("00:00:10") 'Zeitintervall festlegen, hier 10 Sec
Application.OnTime NextTime, "Intervall"
Call letzte_zeile 'hol Daten aus einer Text Datei die sich aktualisiert
End Sub
Public Sub Abbruch()
Application.OnTime NextTime, "Intervall", Schedule:=True
End Sub