Live-Forum - Die aktuellen Beiträge
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender

Forumthread: Pfad einer offenen Arbeitsmappe auslesen

Pfad einer offenen Arbeitsmappe auslesen
20.02.2009 10:50:00
Fred
Hallo,
möchte eine neue Datei unter dem Pfad einer schon geöffneten Arbeitsmappe speichern. Den Namen der geöffneten Mappe kann ich auslesen. Auch den Pfad kann ich einstellen, wohin die neue Datei gespeichert werden soll. Doch wie lese ich den Pfad einer offenen Arbeitsmappe aus?
Gruß
Fred
Anzeige

10
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Pfad einer offenen Arbeitsmappe auslesen
20.02.2009 10:55:00
Ramses
Hallo
Vielleicht verstehe ich die Frage falsch
Workbooks("DeineMappe.xls").Path
Gruss Rainer
AW: Pfad einer offenen Arbeitsmappe auslesen
20.02.2009 10:56:00
Beverly
Hi Fred,

ActiveWorkbook.Path




Anzeige
AW: Pfad einer offenen Arbeitsmappe auslesen
20.02.2009 11:00:00
Fred
Danke,
sorry, bin ich einfach nicht drauf gekommen.
Gruß
Fred
Das ist nicht korrekt...
20.02.2009 11:15:00
Ramses
Hallo
Wenn du mehrere Mappen, wie in deinem Fall, geöffnet hast, gibt dir diese Anweisung den Wert der gerade aktiven Mappe zurück !!
Das muss nicht die Mappe sein, in deren Pfad du deine Mappe speichern willst.
Gruss Rainer
Anzeige
Das ist schon korrekt...
20.02.2009 11:51:00
Beverly
Hi Rainer,
...es hängt nur davon ab, welcher Pfad ausgelesen werden soll - mit ActiveWorkbook.Path der der gerade aktiven, mit ThisWorkbook.Path der Pfad der Arbeitsmappe mit dem Code und mit deinem geposteten Code der Pfad einer definierten Arbeitsmappe.


Anzeige
Nein...
20.02.2009 14:28:00
Ramses
Hallo
Die Frage lautete, den Pfad von einer spezifischen Mappe auslesen.
Gruss Rainer
Doch...
20.02.2009 14:49:00
Beverly
Hi Rainer,
...denn die genaue Frage von Fred war:
Doch wie lese ich den Pfad einer offenen Arbeitsmappe aus?

und ThisWorkbook und ActiveWorkbook sind stets offen, wenn ich einen Code laufen lasse - oder irre ich mich da?


Anzeige
Nun denn...
20.02.2009 18:10:00
Ramses
Hallo Karin
Eben:
EINER offenen Mappe, aber nicht welcher.
Lass es gut sein, er soll sich was raus suchen.
Gruss Rainer
Da kann...
20.02.2009 18:47:00
Beverly
Hi Rainer,
...ich nur darauf hinweisen, dass Fred die Antwort bereits gefunden hatte bevor die Diskussion begann.


Anzeige
einen häufig gemachten Fehler ausnutzen
20.02.2009 11:10:00
WF
Hi Fred,
schreibe in eine Zelle der neuen Datei:
=ZELLE("Dateiname")
hier bewußt NICHT: =ZELLE("Dateiname";A1)
Wurde diese Datei noch nicht gespeichert siehst Du erstmal nix - ansonsten den Pfad dieser Datei.
Wechsele in die Datei, deren Pfad Du auslesen möchtest und berechne diese.
Und zurück in die neue Datei - voilà !
WF
Anzeige
;

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Anzeige
Anzeige
Anzeige
Anzeige

Infobox / Tutorial

Pfad einer offenen Arbeitsmappe auslesen


Schritt-für-Schritt-Anleitung

Um den Pfad einer offenen Arbeitsmappe in Excel mit VBA auszulesen, kannst du die folgenden Schritte befolgen:

  1. Öffne Excel und drücke ALT + F11, um den VBA-Editor zu starten.

  2. Füge ein neues Modul hinzu, indem du mit der rechten Maustaste auf "VBAProject (DeineDatei.xls)" klickst und "Einfügen" > "Modul" auswählst.

  3. Kopiere den folgenden Code in das neue Modul:

    Sub PfadAuslesen()
       Dim aktuellerPfad As String
       aktuellerPfad = ActiveWorkbook.Path
       MsgBox "Der Pfad der aktuellen Datei ist: " & aktuellerPfad
    End Sub
  4. Schließe den VBA-Editor und kehre zu Excel zurück.

  5. Führe das Makro PfadAuslesen aus, um den Pfad der geöffneten Datei anzuzeigen.

Der oben stehende Code verwendet ActiveWorkbook.Path, um den Pfad der aktuell aktiven Arbeitsmappe auszulesen.


Häufige Fehler und Lösungen

  1. Fehler: "Das Makro kann nicht ausgeführt werden."

    • Lösung: Stelle sicher, dass Makros in Excel aktiviert sind. Gehe zu "Datei" > "Optionen" > "Trust Center" > "Einstellungen für das Trust Center" > "Makroeinstellungen" und aktiviere die erforderlichen Optionen.
  2. Fehler: "Der Pfad ist leer."

    • Lösung: Stelle sicher, dass die Arbeitsmappe gespeichert ist. Der Pfad wird nur angezeigt, wenn die Datei bereits gespeichert wurde.
  3. Fehler: "Das Makro gibt den falschen Pfad zurück."

    • Lösung: Überprüfe, welche Arbeitsmappe aktiv ist. Wenn du mehrere Arbeitsmappen geöffnet hast, könnte der ActiveWorkbook nicht die Mappe sein, von der du den Pfad auslesen möchtest.

Alternative Methoden

Es gibt verschiedene Ansätze, um den Pfad einer Arbeitsmappe auszulesen:

  • ThisWorkbook.Path: Dieser Befehl gibt den Pfad der Arbeitsmappe zurück, die den VBA-Code enthält.

    Sub PfadThisWorkbook()
       MsgBox "Der Pfad der Arbeitsmappe mit dem Code ist: " & ThisWorkbook.Path
    End Sub
  • Zelle verwenden: Du kannst auch eine Formel in eine Zelle eingeben, um den Pfad anzuzeigen:

    =ZELLE("Dateiname")

Diese Formel gibt den vollständigen Pfad zurück, einschließlich des Dateinamens, sofern die Datei gespeichert ist.


Praktische Beispiele

  1. Pfad und Dateiname auslesen: Um sowohl den Pfad als auch den Dateinamen auszulesen, kannst du den folgenden Code verwenden:

    Sub PfadUndDateinameAuslesen()
       Dim dateiInfo As String
       dateiInfo = ActiveWorkbook.FullName
       MsgBox "Der Pfad und Dateiname der aktuellen Datei ist: " & dateiInfo
    End Sub
  2. Aktuellen Pfad speichern: Wenn du den aktuellen Pfad in einer Zelle speichern möchtest, kannst du folgenden Code verwenden:

    Sub AktuellenPfadSpeichern()
       Range("A1").Value = ActiveWorkbook.Path
    End Sub

Tipps für Profis

  • Verwende ActiveWorkbook und ThisWorkbook bewusst, um Verwirrung zu vermeiden. ActiveWorkbook bezieht sich auf das aktuell aktive Fenster, während ThisWorkbook die Mappe beschreibt, in der der Code ausgeführt wird.
  • Wenn du den Pfad für mehrere Arbeitsmappen benötigst, erstelle eine Schleife, die durch alle geöffneten Arbeitsmappen iteriert.

    Sub AllePfadAuslesen()
       Dim wb As Workbook
       For Each wb In Workbooks
           Debug.Print wb.Name & ": " & wb.Path
       Next wb
    End Sub

FAQ: Häufige Fragen

1. Wie kann ich den Pfad einer bestimmten Arbeitsmappe auslesen?
Du kannst den Pfad einer spezifischen Arbeitsmappe mit folgendem VBA-Befehl auslesen:

Workbooks("DeineMappe.xls").Path

2. Was passiert, wenn die Datei noch nicht gespeichert ist?
Wenn die Datei noch nicht gespeichert wurde, gibt der Befehl ActiveWorkbook.Path eine leere Zeichenfolge zurück. Du musst die Datei zuerst speichern, um den Pfad zu erhalten.

Beliebteste Forumthreads (12 Monate)

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