Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
212to216
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
212to216
212to216
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

DoEvents

DoEvents
05.02.2003 18:33:35
Bernhard Ebermann
Hallo Leute,

Aus einer UserForm heraus starte ich eine Sub in einem Standartmodul.
In diesem Modul/Sub läuft jetzt eine ForNext Suchschleife ab.
Ich möchte diese Suchschleife nun mittels eines Buttons aus der UserForm unterbrechen können.
Ich habe mit "DoEvents" hin und her probiert.
Es klappt nicht.

Kann mir da jemand helfen?

Gruß
Bernhard

1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
Re: DoEvents
05.02.2003 18:52:59
Nepumuk

Hallo Bernd,
das geht so:

in deiner Userform:

Private Sub CommandButton1_Click()
halt = True
End Sub

in deinem Modul:

Public halt As Boolean

Sub Schleife()
Dim index As Integer
For index = 1 To 300000

Dein Code

DoEvents
If halt Then Exit For
Next

oder:

Do

Dein Code

DoEvents
Loop Until halt
End Sub

Gruß
Nepumuk


Anzeige

29 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige