ich habe eine .txt datei, die sich im zehnsekundentakt aktualisiert. wenn sie sich aktualisert hat, soll mein makro "go" gestartet werden. untenstehendes makro funktioniert theoretisch ganz gut doch praktisch entsteht folgendes problem: wenn excel im selben moment die zeit der .txt datei überprüft wie die datei geschrieben wird, dann stürzt das andere programm ab. kann man das makro dahingehend optimieren, dass es nicht mehr zu den konflikten kommt und wenn ja wie ?
vielen dank im voraus und
lg
bernd
Makro ( hinterlegt im codeteil des arbeitsblattes)
Private Sub Worksheet_SelectionChange(ByVal target As Range)
Dim zeit1, zeit2 As Date
If Range("C1").Value = 1 Then
Range("C1").Value = 11
Application.EnableEvents = False
zeit1 = Format(FileDateTime("C:\Test.txt"), "hh:mm:ss")
Do
start = Timer
Do While Timer < start + 1
DoEvents
Loop
Ende = Timer
zeit2 = Format(FileDateTime("C:\Test.txt"), "hh:mm:ss")
Loop While zeit2 <= zeit1
start = Timer
Do While Timer < start + 1
DoEvents
Loop
Ende = Timer
Application.Run "go"
End If
End Sub