Problem mit Excel VBA
27.05.2014 20:54:49
Ralph
Eine Aktientabelle überwacht live viele Kurse auf Trading-Chancen, verändert und aktualisiert sich dadurch aber auch ständig, wenn sich Kurse und Taxierungen ändern.
Nun möchte ich eine neue Kauffunktion einbauen, die, wenn in einem Feld mit einer Formel eine 1 _ erscheint, einen Kauf ausführt. Ich hab das meiste soweit fertig, nur mit der Überwachung habe ich ein Problem. Mit
Private Sub Worksheet_Change(ByVal Target As Excel.Range)
If Target.Address = "$T$21" Then
Mein Code für den Kauf
End Sub
im Objektmodul des Tabellenblattes wird überwacht, ob diese Zelle sich zu einer 1 ändert und in den folgenden Zeilen dann der Kauf ausgelöst.
Problem ist nun aber, der Wert 1 dieser Formel bleibt möglicherweise noch stehen und da das Blatt sich ständig aktualisiert, wird diese Kauffunktion immer wieder ausgeführt und läuft sich tot..
Wie kann ich erreichen, dass der Code nur einmal ausgeführt wird, selbst wenn sich das Blatt ständig aktualisiert. Er wird bisher immer wieder ausgeführt und ich kann nur mit ESC stoppen. Das wäre aber fatal.
Vielen Dank für die Hilfe
Ralph