Microsoft Excel

Herbers Excel/VBA-Archiv

Informationen und Beispiele zum Thema MsgBox
BildScreenshot zu MsgBox MsgBox-Seite mit Beispielarbeitsmappe aufrufen

Berechnung abbrechen

Betrifft: Berechnung abbrechen von: christoph
Geschrieben am: 01.09.2004 13:58:06

Hallo,

Wie kann ich ein Modul unterbrechen wenn b1 oder b2 null sind

Sub t()
If b1 = 0 Or b2 = 0 Then
MsgBox Buttons:=vbExclamation, _
prompt:="Text"

' >>> Hier soll die Berechnung abgebrochen werden
Else

` >>> Berechnung fortsetzen
 
End If

End Sub



Im voraus Danke Für Hilfe

Christoph
  


Betrifft: Breichtigungzu : Berechnung abbrechen von: christoph
Geschrieben am: 01.09.2004 14:45:21

Sorry,

habe es ein wenig mißverstandlich formuliert. Die Berechnung soll abgebrochen werden wenn die Dateneingabe nicht kommplett ist. Die Berechnung ist für einen gewöhnliche IF-ELSE- Schleife zu lang. Wird dann meines erachtens zu unübersichtlich
Meinte es so:

Sub t()
If b1 = 0 Or b2 = 0 Then
MsgBox Buttons:=vbExclamation, _
prompt:="bitte Daten vollständig eingeben"

' >>> Hier soll die Berechnung/ das Modul abgebrochen werden
End if
 >>> sehr lange Berechnung 
 
End If

End Sub
´

Benötige also einen Befehl um die das Modul t an der stelle zu unterbrechen


Im Voraus Danke für Hilfe


Christoph


  


Betrifft: Breichtigungzu : Berechnung abbrechen von: christoph
Geschrieben am: 01.09.2004 14:45:49

Sorry,

habe es ein wenig mißverstandlich formuliert. Die Berechnung soll abgebrochen werden wenn die Dateneingabe nicht kommplett ist. Die Berechnung ist für einen gewöhnliche IF-ELSE- Schleife zu lang. Wird dann meines erachtens zu unübersichtlich
Meinte es so:

Sub t()
If b1 = 0 Or b2 = 0 Then
MsgBox Buttons:=vbExclamation, _
prompt:="bitte Daten vollständig eingeben"

' >>> Hier soll die Berechnung/ das Modul abgebrochen werden
End if
 >>> sehr lange Berechnung 
 


End Sub
´

Benötige also einen Befehl um die das Modul t an der stelle zu unterbrechen


Im Voraus Danke für Hilfe


Christoph


  


Betrifft: AW: Breichtigungzu : Berechnung abbrechen von: Bert
Geschrieben am: 01.09.2004 15:52:04

Sub t()
If b1 = 0 Or b2 = 0 Then
  MsgBox Buttons:=vbExclamation, _
  prompt:="bitte Daten vollständig eingeben"
  exit sub
End if
 >>> sehr lange Berechnung 
End Sub



Bert


  


Betrifft: Danke! (o.T.) von: chrstoph
Geschrieben am: 02.09.2004 08:56:55




 

Beiträge aus den Excel-Beispielen zum Thema "Berechnung abbrechen"