Live-Forum - Die aktuellen Beiträge
Datum
Titel
19.04.2024 19:41:34
Bei VBA Ausführung Anzeige einfrieren
19.04.2024 17:05:40
Zählen von Zeilen, in denen in bestimmten Bereich Daten sind
19.04.2024 16:34:52
gemeinsamer Filter über drei Spalten
19.04.2024 15:39:42
Exceltabelle daten per combobox zu word Datei
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
252to256
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
252to256
252to256
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

On Error -> Ende?

On Error -> Ende?
08.05.2003 11:53:41
BernhardStock
Hi Forum,
ich habe in meinem Script Sprungmarken zu verschiedene "On Error" Verweisen
Wie grenze ich die untereinander ab?
Wenn der Erste angesprungen wird, werden die darunter stehenden gleich mit abgearbeitet.
Bernhard

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
Re: On Error -> Ende?
08.05.2003 11:55:17
Forum

Jallo Bernhard

ohne Code würde ich schreibewn Exit Sub

Gruß Hajo

Re: On Error -> Ende?
08.05.2003 12:05:35
BernhardStock

Hallo Forum,
wäre zu schön gewesen...
hier der Code:
On Error GoTo DateiNichtDa
Workbooks.Open ("C:\angebote\angebotsverfolgung.xls")

.......... rest-Code

DateiNichtDa:
MsgBox ("Datei fehlt")
Application.SheetsInNewWorkbook = 1
Workbooks.Add
ActiveWorkbook.SaveAs FileName:=("C:\angebote\angebotsverfolgung.xls"), FileFormat:= _
xlNormal, Password:="", _
ReadOnlyRecommended:=False, CreateBackup:=True

und jetzt bitte wieder nach oben, zum rest des Codes

nächste On Error

noch eine on Error

End Sub

Bernhard

Anzeige
Resume Next oder?
08.05.2003 12:41:57
Andreas Walter

Auszug aus Hilfe

Sub InitialisiereMatrix(Var1, Var2, Var3, Var4)
On Error GoTo ErrorHandler
. . .
Exit Sub
ErrorHandler:
. . .
Resume Next
End Sub

In diesem Beispiel steht der Fehlerbehandlungs-Code hinter der Exit Sub-Anweisung und vor der End Sub-Anweisung, um ihn vom normalen Programmablauf in der Prozedur zu trennen. Sie können Fehlerbehandlungs-Code ansonsten beliebig innerhalb einer Prozedur positionieren.


Danke! so gehts! o.T.
08.05.2003 12:56:32
BernhardStock

Danke

222 Forumthreads zu ähnlichen Themen

FIFO mit VBA (Endlosschleife?)
Bernhard

Hallo liebe Experten,
da ich in VBA noch ziemlich unbeleckt bin, habe ich zur Lösung einer FIFO Aufgabenstellung u.a. VBA Lösung ergoogelt, die eigentlich funktioniert, lediglich der 2. Teil Starting_Inventory läuft scheinbar in eine Endlosschleife. Was ist falsch? Habe auch ein Beispielda...
21.08.2008 21:06:36
Thread-ID: 1003636
24 Beiträge
Anzeige
On error 10 sekunden pause and resume
MBorn

Hallo,
weiß jemand, wie man bei einer Fehlermeldung (Fehlermeldung Laufzeitfehler 1004)
eine 10 sekündige Pause macht und dann Resume?
Gruß aus Berlin,
Born
25.01.2009 20:51:00
Thread-ID: 1043679
4 Beiträge
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
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
If Rows.Hidden = True Then End
Karsten

Hallo,
Eine Frage:
Der folgende Code besagt doch, wenn Zeilen versteckt (ausgeblendet) sind, dann gehe zu End. Warum läuft er in beiden Fällen bei mir weiter? Oder wie wird er richtig geschrieben?
If Rows.Hidden = True Then End
Danke für eure Hilfe.
Gruß
Karsten
20.11.2010 16:32:04
Thread-ID: 1187947
12 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
23
8
3
5
2
1
7
2
3
11
7
1
4
8
5
2
3
8
2
6
30
12
4
2
3