Dateinamen in Excel auslesen mit VBA
Schritt-für-Schritt-Anleitung
Um den Dateinamen der aktuell geöffneten Excel-Datei auszulesen, kannst Du ein einfaches VBA-Makro verwenden. Folge diesen Schritten:
-
Öffne Excel und drücke ALT + F11, um den VBA-Editor zu öffnen.
-
Klicke auf Einfügen und wähle Modul, um ein neues Modul zu erstellen.
-
Kopiere den folgenden Code in das Modul:
Sub DateinameAuslesen()
MsgBox ActiveWorkbook.Name
End Sub
-
Schließe den VBA-Editor.
-
Führe das Makro aus, indem Du ALT + F8 drückst, das Makro DateinameAuslesen auswählst und auf Ausführen klickst.
Mit diesem Code wird der Name der aktuell aktiven Arbeitsmappe in einer MsgBox angezeigt. Du kannst auch ThisWorkbook.Name verwenden, aber beachte, dass dies den Namen der Datei enthält, in der das Makro gespeichert ist.
Häufige Fehler und Lösungen
Alternative Methoden
Falls Du den Dateinamen ohne VBA auslesen möchtest, kannst Du die folgende Excel-Formel verwenden:
=ZELLE("Dateiname")
Diese Formel gibt den vollständigen Pfad einschließlich des Dateinamens zurück. Um nur den Dateinamen zu extrahieren, könntest Du zusätzliche Textfunktionen verwenden, um den Pfad zu entfernen.
Praktische Beispiele
Hier sind einige praktische Anwendungen für das Auslesen von Dateinamen:
-
Makro zur Anzeige des vollständigen Pfads:
Sub VollerPfadAuslesen()
MsgBox ThisWorkbook.FullName
End Sub
-
Dateinamen aus einem bestimmten Ordner auslesen (ohne VBA):
Du kannst eine Liste der Dateinamen in einem Ordner mit der Funktion =DATEINAMEN() in Excel 365 erstellen.
Tipps für Profis
- Nutze den VBA-Befehl
ThisWorkbook.FullName, um den vollständigen Pfad der Datei auszulesen, wenn Du mehr Informationen benötigst.
- Experimentiere mit VBA, um Dateinamen aus mehreren geöffneten Arbeitsmappen auszulesen. Dies kann nützlich sein, wenn Du mit mehreren Projekten gleichzeitig arbeitest.
- Speichere Deine Makros in einer persönlichen Arbeitsmappe (
PERSONAL.XLSB), um sie in allen Excel-Sitzungen zu nutzen.
FAQ: Häufige Fragen
1. Wie kann ich den Dateinamen eines bestimmten Arbeitsblatts auslesen?
Du kannst den Namen des Arbeitsblatts mit ActiveSheet.Name auslesen.
2. Kann ich Dateinamen aus einem Ordner ohne VBA auslesen?
Ja, in Excel 365 kannst Du die Funktion =DATEINAMEN() verwenden, um Dateinamen aus einem Ordner zu extrahieren, ohne VBA zu verwenden.