Thema Datum  Von Nutzer Rating
Antwort
29.11.2005 16:27:49 Danwe
NotSolved
Blau Aw:Unterbrechung von If Next Schleife geht nicht
29.11.2005 16:52:20 Rasta
NotSolved
29.11.2005 17:43:04 Danwe
NotSolved
30.11.2005 11:44:56 Oliver
NotSolved

Ansicht des Beitrags:
Von:
Rasta
Datum:
29.11.2005 16:52:20
Views:
972
Rating: Antwort:
  Ja
Thema:
Aw:Unterbrechung von If Next Schleife geht nicht
Hi Danwe,

das ist so der falsche lösungsansatz.

wenn du schon eine schleife laufen lassen musst, würde ich die bedingung um den mailversand drumrum stricken.

wobei eine schleife beim hochzählen von irgendwas wahrscheinlich schneller fertig ist, als du blinzeln kannst -- ausser es sind riesige datenmengen die da durchlaufen werden.....

blöde frage meinerseits -- warum versendest du die mails nicht bei klick auf den button?

viele grüße erstmal

rasta

Danwe schrieb am 29.11.2005 16:27:49:

Ich habe ein Problem, das sieht folgendermaßen aus:
ich möchte eine For next sChleife starten. Wenn diese fast einmal durchgeloffen ist, soll sie anhalten bis ein bestimmter Button geklickt wurde.

Dieser Button sieht so aus:

Private Sub nextMailPrev_Click()
MailPrevStop = True
End Sub

Die Schleife sieht dann so aus:

For i = startMailAdr To endeMailAdr
CelltoVar

Mailnumber 'mail/mail

count.Caption = txtMail.TextLength

lblPreviewCopy.Text = lblPreview.Caption
CountPrev.Caption = lblPreviewCopy.TextLength

If MailPrevStop = True Then

Next i

Leider funktioniert es nicht.
Ich bekomme immer eine Fehlermeldung "Next ohne For"
Das if dazwischen macht wohl probleme.
Folgendes geht ebenfalls nicht:

For i = startMailAdr To endeMailAdr

MailPrevStop = False
CelltoVar
Mailnumber 'mail/mail

count.Caption = txtMail.TextLength

lblPreviewCopy.Text = lblPreview.Caption
CountPrev.Caption = lblPreviewCopy.TextLength

If MailPrevStop = True Then
GoTo Weiter
End If

Weiter: Next i

Ihre Antwort
  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen
Thema: Name: Email:



  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen

Thema Datum  Von Nutzer Rating
Antwort
29.11.2005 16:27:49 Danwe
NotSolved
Blau Aw:Unterbrechung von If Next Schleife geht nicht
29.11.2005 16:52:20 Rasta
NotSolved
29.11.2005 17:43:04 Danwe
NotSolved
30.11.2005 11:44:56 Oliver
NotSolved