Live-Forum - Die aktuellen Beiträge
Datum
Titel
24.04.2024 08:01:34
Textbox Inhalt prüfen und Code abbrechen
24.04.2024 06:38:45
Kumulierte Daten für Intervalllaufeinheiten
24.04.2024 04:37:43
Mit Word erstellte PDF als Anhang an E-Mail anhängen
24.04.2024 00:20:14
Bestimmte Spalten als xls exportieren per Makro
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
136to140
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
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
136to140
136to140
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

On Error GoTo Errorhandler

On Error GoTo Errorhandler
23.07.2002 13:55:42
andré
also ich hab folgenden code:

wenn ich den Code ausführe kommt als erstes halt die Fehlermeldung Pfad nicht gefunden, danach bricht das Programm ab, besser gesagt bringt das debuggenzeugl ...

ist on error ... nur einmal verfügbar und danach ist es ungültig oder wie?

mfg andré

5
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
Re: On Error GoTo Errorhandler
23.07.2002 14:03:25
Udo RiHü
Hallo,
mit Resume 1: anstatt Goto 1: klappt's

Gruss Udo

Re: On Error GoTo Errorhandler
23.07.2002 14:04:25
Nayus

Hallo,
die Sprungmarke "1:" kannst Du Dir sparen

On Error GoTo errorhandler
ChDir "testpfaddenesnichtgibt:\"
Exit Sub
errorhandler:
MsgBox Error
Resume Next



Re: On Error GoTo Errorhandler
23.07.2002 14:04:52
unbekannt
On Error GoTo errorhandler
ChDir "testpfaddenesnichtgibt:\"
On Error GoTo 0


Exit Sub
errorhandler:
MsgBox "Error"

End Sub

Re: On Error GoTo Errorhandler
23.07.2002 14:12:46
Charlie
Hallo, André!

So wie ich das sehe, wird der Befehl 1x ausgeführt, wenn eben ein Fehler auftritt. Soll die Fehlerprüfung im Anschluss an die Fehlermeldung wieder (weiter) aktiv sein, dann musst Du den Befehl On Error Goto errorhandler NACH der Sprungmarke positionieren, damit sie nach dem Sprung wieder aktiviert wird.

Aber: Was soll in Deinem Beispiel der Sprunt zur Marke 1 bewirken? Die Fehlerprozedur wird offensichtlich ausgelöst, wenn ChDir ... einen Fehler produziert. Dann wird der Hinweis angzeigt und Du springst wieder unmittelbar zu dem Befehl, der den 1. Fehler ausgelöst hat. Willst Du Dich in eine Endlosschleife reinmanövrieren?

Dass die "On Error Goto" - Anweisung nur 1x ausgeführt wird, ergibt sich logischerweise daraus, dass man beim Auftreten eines Fehlers üblicherweise eine geeignete (Gegen-)Maßnahme ergreift. Dass man danach den 1. Fehler gezielt wieder produziert, ist wohl nicht im Sinne des Erfinders.

Gruß,
Charlie

Anzeige
Danke o. T.
23.07.2002 14:13:35
andré

174 Forumthreads zu ähnlichen Themen

On Error GoTo ErrorHandler
Heinz

Hallo Leute
Habe unteres Makro von " Timo " erhalten...besten Dank
Nun habe ich "On Error GoTo ErrorHandler" selbst eingebaut,aber es funkt. nicht so richtig, läuft wenn kein Fehler nicht weiter.
Könntet ihr mir bitte nochmals helfen ?
Danke Heinz
Option Explicit
Dim Gel...
23.12.2008 18:27:00
Thread-ID: 1035039
14 Beiträge
Anzeige
VBA Resume vier mal, dann Resume next
MBorn

Hallöle,
gibt es eigentlich sowas wie in der Überschrift beschrieben:
Resume 4 times: versuche das gleiche vier mal
Wenn es 4 x nicht klappt dann
Resume next: mach weiter
Ich hab noch nichts dazu gefunden, ihr vielleicht?
Danke,
Born
31.01.2009 16:52:00
Thread-ID: 1045686
6 Beiträge
On Error resume next
Dirk

Hallo zusammen,
habe Probleme mit dem Befehl on Error resume next. gilt dies nur für den nächsten Befehl, oder dann den rest der Prozedur? Kann ich die Fehlermeldungen wieder einschlten?
Mein Wissen langt nicht dafür :-)
03.02.2009 17:52:00
Thread-ID: 1046737
3 Beiträge
Anzeige
Excel4Makro - on error resume next
Michael

Hallo allerseits,
ich habe hier eine historisch gewachsenes sehr sehr umfangreiche Tabelle mit einer Mischung aus Excel4Makros und VBA.
Da liegt meine Problem. Ich suche den Befehl "on error resume next" also "fehler überspringen" für Excel4Makros. Kann mir da jemand helfen?
LG
...
16.12.2009 08:42:38
Thread-ID: 1124248
2 Beiträge
On Error Resume ohne Funktion an einem PC
Günter

Hallo Zusammen,
ich habe eine Fehler bei der Anwendung von "On Error Resume Next".
Hier die Funktion in der is es einsetze:
Public Function shape_Exists(Blatt As Object, shpName As String) As Boolean Dim Bild As Shape On Error Resume Next Set Bild = Blatt.Shapes(shpName) shape_Exi...
05.07.2010 15:01:05
Thread-ID: 1165466
8 Beiträge
OptionButtons per VBA: Automation Error
Sven

Hallo liebe Herber-Gemeinde,
ich hab grad das Problem, dass ich in einer langen Liste in einem Arbeitsblatt Optionbuttons _ per VBA hinzufügen möchte. Dazu benutze ich folgenden Code: With ActiveSheet For i = 2 To ende .OLEObjects.Add(ClassType:="Forms.OptionButton.1", Link:=False, Displa...
20.07.2010 19:50:33
Thread-ID: 1167914
3 Beiträge
VBA: deutsche OK - englische Version: Error 13
Dominik

Folgeproblem:In einem Arbeitsblatt, erstellt in Excel 2000, kann in einer Zelle die Zeit ohne ":" eingegeben werden. Der ":" wird durch folgendes Makro ersetzt:Private Sub Worksheet_Change(ByVal Target As Excel.Range)
If Target.Row 20 Or Target.Column 9 Then Exit Sub
FormatTime (Target....
03.05.2002 12:58:38
Thread-ID: 118198
4 Beiträge
On Error Goto bleibt hängen
Jemp

Hallo Freunde
Ich habe eine Datei aus der ich jeden Montat verschiedene Zellen in eine separate Datei kopieren möchte und diese Datei wird dann gespeichert.
Weil mehrer Dateien auf diese Zieldatei zurückgreifen und die Datei ggfs schon erstellt oder offen ist muss das überprüft werden.<...
10.09.2010 10:03:54
Thread-ID: 1176789
4 Beiträge

Beliebteste Forumthreads (12 Monate)

Anzeige
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige
Archiv - Verwandte Themen
Forumthread
Beiträge
13
3
5
2
5
1
7
2
3
3
7
1
4
8
6
3
4
6
1
2
4
2
2
2
3