Live-Forum - Die aktuellen Beiträge
Datum
Titel
25.04.2024 23:47:55
Datum ausweisen, wenn definierte Summe erreicht ist
25.04.2024 21:40:53
Excel Datenquelle aus dem Web mit Anmeldung?
25.04.2024 21:21:16
Zellkommentar in UserForm anzeigen und bearbeiten
25.04.2024 21:13:13
Kalenderwochen addieren
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
432to436
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
432to436
432to436
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

VBA -Makro mittendrin beenden

VBA -Makro mittendrin beenden
26.05.2004 12:59:57
alex
Hallo!
Mit welchem befehl kann ich ein ausgeführtes Makro vorzeitig beenden.
Habe eine Fehlerabfangroutine (if) und brauche für den fall eines fehler einen befehl, der das weitere ausführen abbricht. Die abfangroutine ist in einer untersub, dashalb reicht es nicht einfach die sub zu beenden.
danke
der alex

7
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: VBA -Makro mittendrin beenden
26.05.2004 13:01:27
Remo
Probiers mal mit
Exit Sub
Gruss Remo
AW: VBA -Makro mittendrin beenden
26.05.2004 13:04:34
alex
ja gerade das reicht nicht aus, da ich die sub mit der fehlerroutine in einer anderen sub aufrufe und mit diesem befehl ja dann nur die untersub beendet wird. oder?
gruß
alex
AW: VBA -Makro mittendrin beenden
26.05.2004 13:04:23
Uduuh
Hallo,
kannst du nicht ein paar Codeschnipsel posten? Ohne deinen Ablauf ist die Frage nur sehr ungenau zu beantworten. Und meine Glaskugel ist gerade im Pfandhaus.;-))
Gruß aus'm Pott
Udo
AW: VBA -Makro mittendrin beenden
26.05.2004 13:08:29
alex 

Sub oeffnen(Pfad As String, Datei As String)
On Error Resume Next
Workbooks.Open (Pfad & Datei)
If Err.Number > 0 Then
MsgBox ("Dateiname oder Pfad kann nicht gefunden werden.")
'>>>>> an dieser stelle soll sämtliche code-ausführung beendet werden
End If
End Sub

diese 

Sub wird aufgerufen durch eine andere 


Sub und kehrt nach beendigunig von "oeffnen" zu dieser zurück. auch diese muss im falle eines fehlers beendet werden...
danke!
der alex
Anzeige
AW: VBA -Makro mittendrin beenden
26.05.2004 13:16:07
Uduuh
Hallo,
1. deklariere eine Public-Variable: Public bolError as Boolean (in einem Modul, außerhalb einer Prozedur)
2. im Falle des Fehlers setzt du sie auf True: bolError=True
3. hinter den Aufruf von Sub oeffnen setzt du: If bolError=true Then Exit Sub.
Gruß aus'm Pott
Udo
http://www.excelerator.de
AW: VBA -Makro mittendrin beenden
26.05.2004 13:19:49
Matthias G
Hallo Alex,
es geht auch ohne Public-Variable:

Sub sub1()
Dim Fehler As Boolean
Oeffnen "C:\test\", "test.xls", Fehler
If Fehler Then Exit Sub
MsgBox "Kein Fehler"
' weiter im Text
End Sub



Sub Oeffnen(Pfad As String, Datei As String, Fehler As Boolean)
Fehler = False
On Error Resume Next
Workbooks.Open (Pfad & Datei)
If Err.Number > 0 Then
MsgBox ("Dateiname oder Pfad kann nicht gefunden werden.")
Fehler = True
End If
End Sub

Gruß Matthias
Anzeige
AW: VBA -Makro mittendrin beenden
26.05.2004 13:21:36
WernerB.
Hallo Alex,
mit dem Befehlswort "End" werden alle laufenden Makros beendet/abgebrochen.
Viel Erfolg wünscht
WernerB.

16 Forumthreads zu ähnlichen Themen

Makro abbrechen, wenn ....
WalterK

Hallo,
Ich möchten in meinen Code einen Abbruch einbauen, wenn neben der aktiven noch andere Excel-Dateien offen sind.
Es soll dann der Hinweis kommen, dass "Der Code abgebrochen wird und zuerst die anderen Excel-Dateien beendet werden sollen!".
Danke für Eure Hilfe und
Servus,...
05.06.2011 17:58:16
Thread-ID: 1217358
11 Beiträge
Anzeige
VBA Code vorzeitig beenden
WalterK

Hallo
benötige nochmals Hilfe bei einem Codeteil:
Dim ws As Worksheet
Dim ZELLE As Range
Dim wsNamen
Set wsNamen = CreateObject("Scripting.Dictionary")
For Each ws In ThisWorkbook.Worksheets
wsNamen.Add ws.Name, ws.Name
Next
For Each ZELLE In Range("1.Einstel...
23.03.2013 17:24:44
Thread-ID: 1305682
13 Beiträge
VBA Makro ausführen wenn Feld geändert wird
Tobias

Hallo,
ich bin gerade dabei ein Makro zu erstellen, dass wenn ein Wert in einem Feld geändert wird ein Makro ausgelöst wird.
Folgender Code habe ich schon erstellt:
Private Sub Worksheet_Change(ByVal Target As Range) If Not Intersect(Target, Range("B1")) Is Nothing Then Aktualisiere...
27.11.2013 15:16:03
Thread-ID: 1340252
5 Beiträge
Anzeige
Makro abbrechen wenn....
Spenski

huhu ich mal wieder
wie muss ich das schreiben das wenn Private Sub CommandButton1_Click() Select Case -1 * OptionButton1.Value & -1 * OptionButton2.Value & -1 * OptionButton9.Value Case "000" MsgBox "Bitte Schicht wählen" End Select zutrifft (also die meldung kommt) der rest des m...
31.03.2014 21:21:19
Thread-ID: 1355596
13 Beiträge
VBA Makro: Spalten ausblenden wenn Bereich = "0 x"
hual

Hallo zusammen!
Ich bin mit VBA wenig bis gar nicht vertraut und hätte gerne ein Makro welches mir die Spalten F:O ab Zeile 8 durchsucht und wenn dort nur "0" UND "0 x" vorkommen, sollte diese Spalte ausgeblendet werden.
ich hab dazu schon was in die Richtung gefunden, etwas editiert ab...
22.09.2014 15:18:58
Thread-ID: 1382850
6 Beiträge
Zählenwenn direkt?,- Leitfaden Makrorekorder->VBA
urs

Guten Abend
ich habe heute versucht dieses Zählenwenn mit Direktadressierung zum Laufenzu bringen. Doch ohne Erfolg. Stelle mir vor, dass ein Freak den Fehler sofort erkennt.

Range("L2").Select
ActiveCell.FormulaR1C1 = "=IF(A2grösser0,COUNTIF($K$2:K2,K2),"""")"

Eine Fr...
05.10.2014 22:04:46
Thread-ID: 1384958
3 Beiträge
VBA Excel Makro WENN Funktion mit ChrW 10004
braun

Guten Abend,
und zwar habe ich eine Excel Mappe mit zwei verschiedenen Tabellenreitern.
In dem ersten Tabellenreiter ist ein Makro abgelegt, dass mir bei nacheinanderfolgendem Klicken einer Zelle (A3) einen Haken (ChrW Unicode), Kreuz (auch über Unicode) oder NA anzeigt.
Das klappt...
28.01.2015 19:04:39
Thread-ID: 1405856
14 Beiträge
VBA Makro (Mit Copy Befehl)
chris

Hallo Leute!
Ich habe folgendes Problem. Ich lasse via Makro/VBA eine txt Datei formatiert einlesen und möchte jetzt gerne die Eingabe so umformatieren das die Anordnung sich verändert und ggf. Dinge wegfallen. Das ist ja erstmal nicht schwer via Makro. Mein Problem ist, dass ich nicht weiß...
13.02.2015 10:56:22
Thread-ID: 1409264
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
10
4
12
4
2
12
5
2
13
3
2
11
2
5
2
20