Excel-Anwendung hängt sich auf

Question

Hi Leute,
habe ein Problem dass sich meine Anwendung immer bei einem bestimmten Codeaufruf aufhängt.
Ich habe zwei Forms von denen das erste eine ListBox anzeigt. Da ich in der Listbox die Werte nicht ändern kann, lese ich den Index raus und ändere die Werte dann in der Tabelle aus der die Daten ausgelesen werden mit folgendem Code:

Sheets("HMS").Cells(i, 1) = TextBox1.Text
Sheets("HMS").Cells(i, 2) = TextBox2.Text
Sheets("HMS").Cells(i, 3) = TextBox3.Text

Es funktioniert alles, der Code läuft auch durch und tut was er tun soll...
Jedoch nach dem ich das zweite Fenster wieder schließe hängt das erste Fenster solange bis ich mit dem Mauszeiger in die ListBox "gefahren" bin. Danach läuft wieder alles normal. Kommentier ich diese drei Code Zeilen Raus hängt er sih nach dem schließen nicht mehr auf...
An was könnte das liegen??


danke schon mal für eure Hilfe...

gruß

Answer 1

Habe es auch so probiert:

Worksheets("HMS").Range("A" & i) = TextBox1.Text

Aber genau das selbe...

Answer 2

Schuss ins Blaue:
Vielleicht kannst du diesen Block in Applictaion.EnabelEvents=False und drunter dann …=True ruhigstellen?

Eric March