On Error

Informationen und Beispiele zu den hier genannten Dialog-Elementen:
Bild

Betrifft: On Error
von: Daniela
Geschrieben am: 04.11.2003 15:54:24

Hallo Ihr Könner ;-)

Ich benötige eine ganz allgemeine Abfrage für meine Excel-Datei, die, falls irgendein unerwarteter Fehler auftritt das Makro verläßt und eine Msgbox anzeigt.

Irgendwas in der Richtung:


Sub Makro1()
Dim bolerror as Boolean
if "error" then         ' hier ist das Problem: wie sage ich das?!
   bolerror = true
endif
'eigentlicher Makrocode
if bolerror = true then
   Msgbox "Irgendwas ist falsch..."
   Exit sub
end if
End Sub


Vielen Dank,
Daniela
Bild


Betrifft: AW: On Error
von: Andi_H
Geschrieben am: 04.11.2003 15:57:12

Hi Daniela,

versuchs mal so

Sub DeinMakro()
On error goto err:
' dein Code
exit sub
err:
msgbox("Es ist ein Fehler aufgetreten")
End Sub


Tritt ein Fehler auf springt der Code auf die Sprungmarke err:

Gruß
Andi


Bild


Betrifft: AW: On Error
von: Russi
Geschrieben am: 04.11.2003 15:58:13

Hallo Daniela!

On Error Goto Errorhandler

....
....

Errorhandler:
Msgbox("Ein Fehler ist aufgetreten :-(")
end sub


Bild


Betrifft: AW: On Error
von: Daniela
Geschrieben am: 04.11.2003 16:02:34

Hallo Ihr zwei,

das hab ich mir auch überlegt gehabt, aber wird die Messagebox dann nicht in jedem Fall aufgerufen?!

Wenn das Makro fehlerfrei durchläuft, dann wird doch am Ende trotzdem die Messagebox angezeigt, oder ?!

Daniela


Bild


Betrifft: AW: On Error
von: Bernhard
Geschrieben am: 04.11.2003 16:06:56

Hi,

nein, wird sie nicht. Nur wenn ein Fehler auftritt!

Gruß,
Bernhard


Bild


Betrifft: AW: On Error
von: Andi_H
Geschrieben am: 04.11.2003 16:09:21

Hi Daniela,

nein wird sie nicht, durch das Exit

Sub steigt das Makro, wenn es bis dahin fehlerfrei lief, aus. Die Meldung erscheint also nur wenn ein Fehler auftritt.
exit sub
err:
msgbox("Es ist ein Fehler aufgetreten")
End Sub

Gruß
Andi


Bild


Betrifft: Alles bestens - genau was ich wollte - DANKE EUCH!
von: daniela
Geschrieben am: 04.11.2003 16:10:59

*


Bild

Beiträge aus den Excel-Beispielen zum Thema " EURO-Zeichen im Hintergrund"