Live-Forum - Die aktuellen Beiträge
Datum
Titel
15.10.2025 16:22:17
Datum ist nicht Datum :(
15.10.2025 15:02:20
Blockpfeile mit Makro gehen nicht mehr nach freigabe
15.10.2025 13:51:13
VBA - Fortschrittsbalken unabhängig von Zellen
15.10.2025 13:31:47
WENN Formel mit zwei Bedingungen über 4 Spalten...
Keine passende Antwort im Forumarchiv gefunden?
Stelle deine Frage im Live-Forum
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
148to152
148to152
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Exit sub

Forumthread: Exit sub

Exit sub
21.08.2002 11:03:14
Didier
Hallo Exelfreunde!
Grosses Kompliment an dieses Forum!
Habe eine Frage an euch:
wie kann man ein Makro stoppen? Habe eine Bedingung im Code mit if.......und sobald ich ans end if.... komme, möchte ich direkt aussteigen, ohne weiteren Code laufen zu lassen.
Danke!
Gruss
Didier
Anzeige

11
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
Re: Exit sub
21.08.2002 11:05:38
Charlie
Hallo, Didier!

Die Antwort hast Du Dir doch im Betreff schon selbst gegeben:
Schreib einfach dort, wo Schluss sein soll Exit Sub in die Prozedur.

Gruß,
Charlie

Re: Exit sub
21.08.2002 11:07:33
Andreas S
Hallo,

Du hast es ja selber schon geschrieben:

If ... then Exit Sub

Gruss

Andreas

Re: Exit sub
21.08.2002 11:08:59
Regina
Hallo Didier,

du kannst mit elseif

also wenn if nicht zutrifft

sagen EXIT SUB

also

elseif
exit sub

probiers mal

Gruß #Regina

Anzeige
klappt leider nicht.....der Code läuft weiter
21.08.2002 11:09:31
Didier
Gibt es keine andere Möglichkeit?
Re: Exit sub
21.08.2002 11:12:01
Andreas
Probier es mit End anstatt Exit Sub

Re: klappt leider nicht.....der Code läuft weiter
21.08.2002 11:15:13
Charlie
Hallo, Didier!

Bist Du sicher, dass das Exit Sub an der richtigen Stelle steht. Wenn der Code weiterläuft, dann sicher nur deshalb, weil der Code davor (im If..) das Makro am Exit Sub vorbeischleust.

Poste doch einmal, was Du Dir bisher überlegt hast mit einer kurzen Erklärung, was passieren soll, damit es zum Exodus kommt.

Gruß,
Charlie

Anzeige
Re: klappt leider nicht.....der Code läuft weiter
21.08.2002 11:26:28
Didier
on error goto gestionerreur
gestionerreur:
if Err.Number = 1004 then
msgbox "bla bla bla"
'hier möchte ich aussteigen (exit sub)
else
Sheets ("data").activate......'und dann passieren die Einträge. Aber wenn es den Error 1004 gibt, möchte ich ja direkt aussteigen, ohne dass die Einträge passieren, doch trotzdem läuft der Code weiter!
Anzeige
Re: klappt leider nicht.....der Code läuft weiter
21.08.2002 11:30:02
Charlie
Hallo Didier,

dann kann es nur daran liegen, dass ein anderer Fehler als 1004 den Sprung zur Fehlerbehandlungsroutine auslöst. Das musst Du abklären, denn jeder andere Fehler lässt selbstverständlich das Makro weiterlaufen.

Gruß,
Charlie

Re: klappt leider nicht.....der Code läuft weiter
21.08.2002 11:54:41
Didier
nein, es ist dieser Fehler 1004.
Der Name der Textbox erstellt eine neue Tabelle. Falls dieser Name schon mal vorkommt, soll ja nicht eine neue Tabelle erstellt werden, also mit exit sub aussteigen. Die Fehlermeldung klappt so weit so gut, aber die Tabelle wird trotzdem erstellt.
Verstehe ich nicht!
Anzeige
Re: klappt leider nicht.....der Code läuft weiter
21.08.2002 14:00:08
Charlie
Hallo Didier,

das kann ich mir nicht erklären und auch nicht nachvollziehen.

Da es aber offensichtlich darum geht, ein Blatt zu erstellen und wenn es das schon gibt --> Fehler 1004 <-- eben nicht. Keine Ahnung, warum Dir die Prozedur die Prozedur zwar die MsgBox anzeigt, dann aber nicht aussteigt, sondern im Else-Code weitermacht.

Da ich nicht weiß, wie Dein Problem zu lösen ist, hier eine Alternative, die das Problem umgeht bzw. gar nicht verursachen sollte. Frag einfach vorher ab, ob es das Blatt schon gibt und wenn nein, dann erstell es:

Viel Erfolg,
Charlie

Anzeige
Danke viel Mal
21.08.2002 15:57:48
Didier
endlich klappt es! vielen Dank für deine Mühe!!!
Gruss
Didier
;

Forumthreads zu verwandten 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
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
Kalender jahresübergreifend
Alex

Guten Morgen,
ich habe 2 Probleme mit meinem jahresübergreifenden Kalender
vll. könnt ihr mir ja helfen:
1. Problem:
mit betätigen einer Schaltfläche „Neu erstellen“ soll per InputBox der Startmonat und das Startjahr eingegeben werden,
dieser soll dann in A4 eingetragen wer...
28.11.2010 10:05:55
Thread-ID: 1189096
3 Beiträge
SUB exit und IF Fehler
geri

Hallo
Habe Code zusammengefügt jeder Code für sich geht sollte aber beim Ereignis in blatt beide
Funktionen ausführen
in Spalte 13 oder 14 der CALL
und in Spalte D die MSGBOX scheiter denke ich an den Sub und if Anweisungen wenn ich der MSGBOXTEIL einfüge funktioniert dieser ko...
15.03.2011 12:01:53
Thread-ID: 1205721
5 Beiträge
Anzeige
VBA arbeitsmappenübergreifend
Thomas Stache

Hallo,
ich würde gern meinen VBA-Code aus der Arbeitsmappe mit den Eingabe- bzw. Steuerdaten auslagern, so dass ich von vielen Steuer-Arbeitsmappen auf eine Code-Basis zugreifen kann. Bisher hab ich es nur geschafft, innerhalb eines Projektes Zugriff zu bekommen. Weiß jemand Rat?Thomas(S)
24.05.2002 11:35:25
Thread-ID: 123424
2 Beiträge
Anzeige
VBA Endlosschleife beim Drucken unterbinden
Jonathan

Hallo liebe Experten,
ich stehe mal wieder vor einem Problem und hoffe ihr könnt mir weiterhelfen.
In einem Arbeitsblatt befinden sich mehrere Checkboxen (~ 20) . Jeder dieser Checkboxen ist beim aktivieren ein fester Druckbereich zugewiesen. Soweit so gut... =)
Nun habe ich mir ei...
20.07.2011 10:03:27
Thread-ID: 1222876
9 Beiträge
Spalten anhand Überschriften ausblenden (VBA)
Meppi

Hallo,
ich habe folgendes Problem und hoffe, dass mir jemand von euch weiterhelfen kann:
Ich habe in einer Excel-Datei mehrere Tabellenblätter in denen sich Webabfragen (in jedem Tabellenblatt bis zu 3 Webabfragen) befinden. Sie müssen täglich aktualisiert werden. Dabei wird auch automa...
14.12.2011 13:40:07
Thread-ID: 1242082
6 Beiträge
VBA end if
Frank

Hallo Zusammen,
ich sehe irgendwie vor lauter Code die Lösung nicht mehr.
Ich habe ein Excelsheet mit dem Name Daten
Über eine Userform beim Öffen der Datei erkenne ich wer von 3 möglichen Benutzern sich anmeldet.
In der Tabelle Daten pflege ich wie folgt
User...
18.01.2012 15:11:34
Thread-ID: 1246755
3 Beiträge
Endlosschleife beenden
Peter

Ich würde gerne eine Endlosschleife durch Drücken der Taste A beenden.
Wie kann man das mit VBA realisieren?
Danek im Voraus.
Grüße
Peter
29.01.2012 22:22:55
Thread-ID: 1248519
3 Beiträge
Anzeige
Daten jahresübergreifend abrufen
Daniel

Hallo Forum,
aus einer Tabelle mit Basisdaten (12 Monatsspalten, 5 Jahreszeilen) will ich z.B. die Summe der Werte von Monat 3 des Jahres 2008 bis zum Monat 7 des Jahres 2012 abfragen. Für die Jahre 2008 und 2012 werden die Werte für ausgewählte Monate, für die Jahre 2009 bis 2011 die Werte...
27.03.2013 20:32:13
Thread-ID: 1306241
4 Beiträge
Daten jahresübergreifend abrufen
Daniel

Hallo Tino,
vielen Dank für Deinen Tipp, eine gute Idee.
Ich übernehme die Formel.
Grüße
Daniel B.
28.03.2013 14:38:00
Thread-ID: 1306355
2 Beiträge
If then Anwendung
Sebastian

Hallo zusammen,
ich habe folgendes Problem, vielleicht kann mir ja dabei jemand helfen:
Ich habe eine 412*412 Matrix, die mit 169744 Werten gefüllt ist.
Jetzt möchte ich mit den Zahlen folgendes machen: Ab einer gewissen Größe einer Zahl, soll ein entsprechender Wert zu der Zahl hin...
25.04.2013 19:24:42
Thread-ID: 1310523
9 Beiträge
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken
Anzeige

Infobox / Tutorial

Exit Sub in Excel VBA: So stoppst du dein Makro

Schritt-für-Schritt-Anleitung

  1. Öffne den VBA-Editor: Drücke ALT + F11, um den VBA-Editor in Excel zu öffnen.

  2. Erstelle ein neues Makro: Klicke auf Einfügen > Modul, um ein neues Modul zu erstellen.

  3. Schreibe die Prozedur: Füge den folgenden Code ein, um ein einfaches Makro zu erstellen:

    Sub MeinMakro()
   If SomeCondition Then
       Exit Sub
   End If
   ' Weitere Codezeilen
End Sub

  4. Verwende Exit Sub: Setze Exit Sub an die Stelle, an der das Makro beendet werden soll, z.B. bei einer bestimmten Bedingung.

Häufige Fehler und Lösungen

  • Fehler 1004: Wenn du mit On Error arbeitest, kann es sein, dass dein Makro trotz Exit Sub nicht stoppt. Stelle sicher, dass keine anderen Fehler auftreten, die den Code weiterlaufen lassen.

  • Falsche Platzierung von Exit Sub: Achte darauf, dass Exit Sub innerhalb der richtigen Bedingung steht. Wenn du z.B. If ... Then Exit Sub verwendest, überprüfe, ob die Bedingung auch tatsächlich erfüllt ist.

Alternative Methoden

  • End Sub verwenden: In manchen Fällen kann es sinnvoll sein, End Sub zu verwenden, um das Makro zu beenden. Beachte jedoch, dass dies nicht empfohlen wird, wenn du Fehlerbehandlung implementiert hast.

  • Fehlerbehandlung: Mit On Error GoTo kannst du Fehler abfangen und das Makro an einer bestimmten Stelle beenden. Beispiel:

    On Error GoTo Fehlerbehandlung
' Code
Exit Sub

Fehlerbehandlung:
   MsgBox "Ein Fehler ist aufgetreten."
   Exit Sub

Praktische Beispiele

  1. Ein einfaches Makro mit Exit Sub:

    Sub BeispielMakro()
   If Range("A1").Value = "" Then
       MsgBox "A1 darf nicht leer sein!"
       Exit Sub
   End If
   ' Weitere Bearbeitung
End Sub

  2. Mit Fehlerabfrage:

    Sub FehlerPruefen()
   On Error GoTo Fehler
   ' Code, der einen Fehler verursachen kann
   Exit Sub

Fehler:
   MsgBox "Fehler aufgetreten: " & Err.Description
   Exit Sub
End Sub

Tipps für Profis

  • Vermeide Stop Sub: Anstatt Stop Sub zu verwenden, arbeite mit Exit Sub, um die Lesbarkeit deines Codes zu verbessern.
  • Kombination mit If Then: Verwende If Then Exit Sub, um den Code klar und effizient zu gestalten.
  • Debugging: Nutze den Debugger, um herauszufinden, warum dein Makro nicht wie gewünscht stoppt. Setze Breakpoints und überprüfe die Werte der Variablen.

FAQ: Häufige Fragen

1. Was ist der Unterschied zwischen Exit Sub und End Sub?
Exit Sub beendet die Ausführung der aktuellen Sub-Prozedur, während End Sub die Prozedur einfach abschließt, ohne spezifisch anzugeben, dass die Ausführung gestoppt wird.

2. Wie kann ich ein Makro in Excel VBA stoppen?
Du kannst Exit Sub verwenden, um die Ausführung an einer bestimmten Stelle zu beenden. Achte darauf, dass die Bedingungen korrekt gesetzt sind.

3. Was mache ich, wenn Exit Sub nicht funktioniert?
Überprüfe deine Bedingungen und stelle sicher, dass Exit Sub nicht übersprungen wird. Achte auch darauf, dass keine anderen Fehler den Code weiterlaufen lassen.

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige