Live-Forum - Die aktuellen Beiträge
Datum
Titel
16.10.2025 00:15:51
Passwort im Herbersforum ändern
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
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
776to780
776to780
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Fehlermeldung bei Datei öffnen abfangen

Forumthread: Fehlermeldung bei Datei öffnen abfangen

Fehlermeldung bei Datei öffnen abfangen
06.07.2006 13:20:22
stormy_weathers
Hallo Spezialisten,
ich habe ein in einem Excelblatt eine Schaltfläche eingebaut mit welcher ich eine andere Excel-Datei öffne. Das funktioniert auch bestens. Nun möchte ich den Code so abändern, dass ich keine Fehlermeldung erhalte, wenn die Datei bereits geöffnet ist, also im Stil von:
Datei öffnen
wenn Datei geöffnet dann Datei aktivieren (anzeigen) sonst Datei öffnen
Danke im Voraus für Tips!
mfg
stormy_weathers
PS: suche im Forum bereits erfolglos hinter mir....
Anzeige

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

Betreff
Datum
Anwender
Anzeige
AW: Fehlermeldung bei Datei öffnen abfangen
06.07.2006 13:23:14
Mustafa
Hallo Stormy,
Am anfang des Codes diese Zeile einfügen:
On error goto Errorhandler
Und am Ende dann:
Errorhandler:
Workbook("Deine Mappe").Activate
Das sollte es eigentlich sein.
Rückmeldung wäre nett.
Viele Grüße aus Köln.
AW: Fehlermeldung bei Datei öffnen abfangen
06.07.2006 13:29:23
u_
Hallo,
das dürfte falsch sein, da es keinen Fehler, sondern eine Nachfrage gibt, ob die Datei erneut geöffnet werden soll.
Andersherum wird ein Schuh daraus:
On error goto Errhandler
Workbooks("Deine Mappe.xls").activate
Exit sub
errhandler:
Workbooks.open "c:\test\deine mappe.xls"
Gruß
Geist ist geil!
(Dies ist ein allgemeines Statement und nicht an bestimmte Personen gerichtet.)
Anzeige
@ u_
06.07.2006 13:37:28
Mustafa
Hallo u_,
danke für die Erläuterung, ich habs nicht ausprobiert und in dem Augenblick nicht daran gedacht das es ja kein Fehler ist wie du sagst.
Deine Version ist natürlich die Richtige.
Viele Grüße aus Köln.
AW: Fehlermeldung bei Datei öffnen abfangen
06.07.2006 13:26:08
u_
Hallo,

Sub wb_offen()
Dim wb As Workbook, wkb As Workbook
For Each wb In Workbooks
If wb.Name = "Testmappe.xls" Then
Set wkb = wb
Exit For
End If
Next
If wkb Is Nothing Then
Set wkb = Workbooks.Open("c:\Test\testmappe.xls")
Else
wkb.Activate
End If
End Sub

Gruß
Geist ist geil!
(Dies ist ein allgemeines Statement und nicht an bestimmte Personen gerichtet.)
Anzeige
AW: Fehlermeldung bei Datei öffnen abfangen
06.07.2006 14:50:11
stormy_weathers
Super!!!
Danke für die schnellen Lösungen!!!
mfg
stormy_weathers
;

Forumthreads zu verwandten Themen

Fehler beim öffnen einer erstellen Datei
k

Hallo,
wenn ich per Makro einen Auszug aus einer Mappe (einzelne Blätter werden in eine Neue Kopiert) mache und dieser dann einen Namen gebe wie folgt:
ActiveWorkbook.SaveAs SavePath & ADM & "_Daten_" & Date & "_" & Format(Time, "hh_mm_ss") & ".xls" 'Speichert d...
03.08.2009 10:17:53
Thread-ID: 1093141
4 Beiträge
Wie aktiviere ich beim Öffnen einer Excel-Datei au
SH

Hallo,
wie aktiviere ich beim Öffnen einer Excel-Datei automatisch die Berechnung? Offenbar wird der Application.Calculation - Status mitabgespeichert? Ich möchte dass die Berechnung automatisch aktiv ist, sobald Excel bzw. eine Exceldatei gestartet wird.
danke!
19.10.2010 20:27:22
Thread-ID: 1183112
7 Beiträge
Probleme beim Öffnen einer Datei
H.Kirchhoff

Hallo Excel-Freunde,
ich habe Probleme bei der Öffnung einer csv-Datei. Die Datei ist ca.430 MB groß. Da die Version Excel 2010 schon ca 1.024.000 Zeilen darstellen und öffnen kann, wird der Öffnungsvorgang bei ca.30 % abgebrochen. Der Hinweis lautet :"Datei konnte nicht vollständig geladen...
28.02.2011 21:54:46
Thread-ID: 1203493
3 Beiträge
Anzeige
AddIn lädt nicht beim Öffnen einer csv.Datei
Jürgen

Hallo Excel Forum,
ich habe ein Problem, bei dem ich jetzt überhaupt nicht weiterkomme. Auch meine Recherche hat
mich nicht weitergebracht.
Habe für Excel ein AddIn geschrieben was auch wunderbar läuft wenn ich Excel "normal" öffne.
Das AddIn fügt einen neuen Menüpunkt hinzu übe...
09.03.2012 17:52:12
Thread-ID: 1254340
2 Beiträge
Anzeige
Fehlermeldung beim Öffnen einer UserForm...
Niko

Hallo zusammen,
ich möchte, dass beim Öffnen meiner Arbeitsmappe die Tabelle 'Tagebuch' geöffnet, und meine UserForm 'Klassenbuch' angezeigt wird. Dazu habe ich den folgenden Code eingegeben: Private Sub Workbook_Open() Worksheets("Tagebuch").Activate frmKlassenbuch.Show End Sub
Die T...
14.03.2012 16:04:19
Thread-ID: 1254975
4 Beiträge
Symbolleiste anlegen beim Öffnen einer Datei
Werner

Hallo Excel-Freunde
ich habe eine Datei, bei der mir automatisch zwei Symbolleisten mit
angelegt wird. Diese Symbolleisten sind (vermutlich) ein Teil der
Standard-Linien bzw. Rahmen - Symbolleiste.
Nur interessanterweise wurden sie dabei automatisch neu benannt.
Frage wie...
03.11.2012 19:34:35
Thread-ID: 1285120
5 Beiträge
NOTIFY beim Öffnen einer Datei
Ralf

Hallo,
ich habe da mal ein Problem.
ich verwende für unsere Abteilung viele Excel-Dateien.
In denen laufen einige Makros (über Buttons aufgerufen), die über Add-In-Dateien aufgerufen werden, um die Makros zentral bearbeiten zu können.
Selbst die Bearbeitung von Worksheet-Ereigni...
15.11.2013 11:39:02
Thread-ID: 1338655
4 Beiträge
Anzeige
Problem beim öffnen einer 2010 Datei in 2007
Marc

Hallo zusammen,
leider musste ich heute ein Problem feststellen als ich meine Datei bei einem Bekannten auf dem Rechner offnen wollte. Also ich den erste Code ausegeführt habe, kam eine Fehlermeldung.
Er hatte Probleme mit diesem Code hier:
Sub ZeilenAusWE() 'Wochenende Dim i As In...
25.12.2013 00:05:21
Thread-ID: 1343481
24 Beiträge
Problem beim Öffnen einer Datei
Rosenfeld

Hallo zusammen,
ich habe mit Excel 2007 eine Datei geschrieben, die auch problemlos lief.
Seit der Umstellung auf Excel 2013 erhalte ich die Meldung: "Excel funktioniert nicht mehr".
Nach Inanspruchnahme der angebotenen Online-Suche nach einer Lösung, folgt eine weitere Meldung: "Au...
29.09.2015 19:13:00
Thread-ID: 1450018
5 Beiträge
Problem beim Öffnen einer *.txt-Datei
Ingo

Hallo
Ich habe hier eine Textdatei.
Wenn ich diese mit Excel öffne, erscheint ja dieser Textkonvertierungs-Assistent.
Und schlussendlich wird die Datei dann in einem neuen Excel-Fenster geöffnet.
Ist es auch möglich, die Datei mit Hilfe des Textkonvertierungs-Assistenten so zu ö...
04.03.2016 14:42:38
Thread-ID: 1479815
5 Beiträge
Fehlermeldung beim Öffnen einer Excel-Datei
Florian

Hallo zusammen!
Ich habe in Excel seit Tagen ein Problem mit dem Abspeichern und Öffnen einer Excel-Datei und hoffe, dass mir hier geholfen werden kann. Danke im Voraus für Hilfestellungen!
Konkret ergibt sich das Problem wie folgt:
- Die Excel-Datei, um die es sich handelt, stellt...
13.12.2016 09:20:58
Thread-ID: 1529819
4 Beiträge
Probleme beim Öffnen einer Datei
Bernhard

Hallo, ich habe ein Problem mit dem Öffnen einer bestimmten Exceldatei. Wenn man doppelklickt geht Sie nicht auf, sondern es erscheint die Meldung dass sie schon geöffnet ist. Wenn man hinreichend langsam klickt, gelingt es nach zahlreichen Versuchen, die Datei zu öffnen.
Die Datei liegt a...
15.02.2017 20:09:58
Thread-ID: 1541818
3 Beiträge
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken
Anzeige
Anzeige

Infobox / Tutorial

Fehlermeldung bei Datei öffnen abfangen in Excel

Schritt-für-Schritt-Anleitung

  1. Öffne den VBA-Editor: Drücke ALT + F11, um den Visual Basic for Applications (VBA) Editor in Excel zu öffnen.

  2. Füge ein neues Modul hinzu: Klicke im Projekt-Explorer mit der rechten Maustaste auf deinen VBA-Projektordner, wähle "Einfügen" und dann "Modul".

  3. Code einfügen: Kopiere den folgenden Code in das Modul:

    Sub wb_offen()
    Dim wb As Workbook, wkb As Workbook
    For Each wb In Workbooks
        If wb.Name = "Testmappe.xls" Then
            Set wkb = wb
            Exit For
        End If
    Next
    If wkb Is Nothing Then
        Set wkb = Workbooks.Open("c:\Test\testmappe.xls")
    Else
        wkb.Activate
    End If
End Sub

  4. Anpassen des Dateipfades: Stelle sicher, dass du den Dateipfad und den Dateinamen ("Testmappe.xls") an deine Bedürfnisse anpasst.

  5. Makro ausführen: Schließe den VBA-Editor und führe das Makro über ALT + F8 aus.

Häufige Fehler und Lösungen

  • Fehler: "Datei nicht gefunden": Überprüfe, ob der Dateipfad korrekt ist. Achte darauf, dass die Datei existiert und du die richtige Dateiendung (.xls, .xlsx) verwendest.
  • Keine Aktion bei bereits offener Datei: Stelle sicher, dass der Name der Arbeitsmappe exakt übereinstimmt (inklusive der Dateiendung).
  • Excel Fehlermeldung beim Öffnen einer Datei: Wenn du eine Fehlermeldung erhältst, versuche den Code mit On Error Resume Next zu erweitern, um die Fehlermeldungen zu unterdrücken.

Alternative Methoden

  • Verwendung von On Error: Eine weitere Möglichkeit, um Excel Fehlermeldungen beim Öffnen einer Datei abzufangen, ist die Verwendung von On Error GoTo. Hier ein Beispiel:

    On Error GoTo ErrorHandler
Workbooks.Open "c:\Test\testmappe.xls"
Exit Sub
ErrorHandler:
MsgBox "Die Datei ist bereits geöffnet oder konnte nicht gefunden werden."

  • Benutzerdefinierte Dialoge: Du kannst auch eine Benutzerinteraktion hinzufügen, um dem Benutzer die Möglichkeit zu geben, eine Aktion auszuwählen, falls die Datei bereits geöffnet ist.

Praktische Beispiele

  • Beispiel 1: Wenn du eine Schaltfläche auf deinem Excel-Blatt hast, die diese Funktion ausführen soll, kannst du den oben genannten Code mit dem Schaltflächen-Click-Ereignis verbinden.

    Private Sub CommandButton1_Click()
    Call wb_offen
End Sub

  • Beispiel 2: Um die Benutzerfreundlichkeit zu erhöhen, könntest du eine MessageBox hinzufügen, die den Benutzer informiert, wenn die Datei bereits geöffnet ist.

Tipps für Profis

  • Dokumentation: Halte deinen Code gut dokumentiert, sodass andere (oder auch du selbst in der Zukunft) schnell verstehen, was jeder Teil des Codes macht.
  • Fehlerprotokollierung: Überlege, eine Fehlerprotokollierung einzurichten, um Probleme in deiner Excel-Anwendung leichter nachverfolgen zu können.
  • Testen: Teste deinen Code gründlich, insbesondere wenn du mit verschiedenen Excel-Versionen arbeitest. Nicht alle Versionen unterstützen die gleichen Funktionen.

FAQ: Häufige Fragen

1. Wie kann ich sicherstellen, dass mein Makro nur für eine bestimmte Datei funktioniert?
Du kannst den Code so anpassen, dass er nur für eine Datei funktioniert, indem du den Namen der Datei im Code angibst und die Abfrage entsprechend anpasst.

2. Was mache ich, wenn ich die Fehlermeldung nicht abfangen kann?
Überprüfe die Syntax deines Codes und stelle sicher, dass die Datei tatsächlich existiert. Du kannst auch On Error Resume Next verwenden, um das Problem zu umgehen.

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