Pfad einer Arbeitsmappe in Excel ermitteln

19. Februar 2008
Martin Althaus Von Martin Althaus, Excel, Office ...

Wie Sie festellen, wo Mappen gespeichert sind

Sie möchten zu einer Arbeitsmappe in einem Makro ermitteln, unter welchem kompletten Dateinamen (inklusive Pfad) sie gespeichert ist? Kein Problem! Setzen Sie das folgende Makro ein.

Sub MappenPfad()

MsgBox (ActiveWorkbook.FullName)

End Sub

Das Makro zeigt Ihnen nun den Namen der aktiven Arbeitsmappe. Dazu wird die Eigenschaft FullName abgefragt. Die folgende Abbildung zeigt, wie das Ergebnis nach dem Start des Makros aussehen kann:

Ersetzen Sie den Ausdruck ActiveWorkbook im Namen durch das Arbeitsmappen-Objekt, dessen Namen Sie feststellen möchten. Um die Pfade aller geöffneten Arbeitsmappen in einer Liste innerhalb einer neuen Tabelle anzuzeigen, verwenden Sie das folgende Makro:

Sub AlleMappenInListe()

Dim shNeu As Worksheet

Set shNeu = Workbooks.Add.Worksheets(1)

For i = 1 To Workbooks.Count

If Workbooks(i).Name <> shNeu.Parent.Name Then shNeu.Cells(i, 1) = Workbooks(i).FullName

Next i

End Sub

Die folgende Abbildung zeigt, wie das Ergebnis des Makros aussehen kann:

Werden Sie mit unseren Tipps zum Excel-Profi!

Jetzt gratis per E-Mail

  • Excel Vorlagen zum Sofort-Download
  • Geprüfte Vorlagen zum Sofort-Einsatz
  • Gratis Makros & Add-Ins im Downloadcenter
DDV Ehrencodex E-Mail-Marketing
  • Wir benötigen Ihre E-Mail-Adresse für die Zusendung des Newsletters.
  • Wir geben Ihre E-Mail-Adresse garantiert nicht an Dritte weiter.
  • Jederzeit abbestellbar durch einen Link im Newsletter.

Unsere Datenschutzgarantie:

Wir benötigen Ihre E-Mail-Adresse für die Zusendung des Newsletters. Wir geben Ihre E-Mail-Adresse garantiert nicht an Dritte weiter. Jederzeit abbestellbar durch einen Link im Newsletter.

Weitere Artikel zum Thema

Newsletter

Jetzt kostenlose Excel-Hilfe anfordern!

  • die besten Tipps
  • völlig kostenlos
  • jederzeit abbestellbar
DDV Ehrencodex E-Mail-Marketing
  • Wir benötigen Ihre E-Mail-Adresse für die Zusendung des Newsletters.
  • Wir geben Ihre E-Mail-Adresse garantiert nicht an Dritte weiter.
  • Jederzeit abbestellbar durch einen Link im Newsletter.

Unsere Datenschutzgarantie:

Wir benötigen Ihre E-Mail-Adresse für die Zusendung des Newsletters. Wir geben Ihre E-Mail-Adresse garantiert nicht an Dritte weiter. Jederzeit abbestellbar durch einen Link im Newsletter.

Unsere Experten

Rudolf Ring twittert für @Computerwissen

Die von Ihnen eingegebene E-Mail Adresse ist nicht korrekt. Bitte korrgieren Sie Ihre Eingabe und klicken Sie auf "OK":

Bitte wählen Sie mindestens einen Newsletter aus und klicken Sie auf "OK"