Ordnernamen auslesen in Excel
Schritt-für-Schritt-Anleitung
Um Ordnernamen in Excel auszulesen, benötigst du ein einfaches VBA-Skript. Hier sind die Schritte, wie du das umsetzen kannst:
-
Öffne Excel und drücke ALT + F11, um den VBA-Editor zu öffnen.
-
Klicke auf Einfügen -> Modul, um ein neues Modul zu erstellen.
-
Kopiere den folgenden Code in das Modul:
Sub OrdnernamenAuslesen()
Dim oFolder As Object, oSFolder As Object, oFS As Object
Set oFS = CreateObject("Scripting.filesystemobject")
Set oFolder = oFS.getfolder("C:\Dein\Pfad\Hier") ' Ersetze den Pfad mit deinem Quellordner
For Each oSFolder In oFolder.subfolders
Sheets(1).Cells(Rows.Count, 1).End(xlUp).Offset(1) = oSFolder.Name
Next
End Sub
-
Ändere den Pfad "C:\Dein\Pfad\Hier" zu dem Ordner, dessen Namen du auslesen möchtest.
-
Schließe den VBA-Editor und gehe zurück zu Excel.
-
Drücke ALT + F8, wähle OrdnernamenAuslesen aus und klicke auf Ausführen.
Das Skript wird nun die Namen der Unterordner in der ersten Spalte deines Arbeitsblattes auflisten.
Häufige Fehler und Lösungen
-
Fehler: "Pfad nicht gefunden"
- Stelle sicher, dass der angegebene Pfad korrekt ist und tatsächlich existiert.
-
Fehler: "Variable nicht definiert"
- Überprüfe, ob du die erforderlichen Objekte im Code deklariert hast. Achte darauf, dass
Scripting.filesystemobject korrekt eingegeben ist.
-
Fehler: Keine Berechtigung
- Stelle sicher, dass du die nötigen Berechtigungen hast, um auf den Ordner zuzugreifen.
Alternative Methoden
Falls du kein VBA nutzen möchtest, kannst du auch Power Query verwenden. Hier ist eine kurze Anleitung:
- Gehe zu
Daten -> Daten abrufen -> Aus Datei -> Aus Ordner.
- Wähle den Ordner aus, dessen Namen du auslesen möchtest.
- Power Query zeigt dir eine Liste der im Ordner befindlichen Dateien und Ordner an.
- Du kannst dann die Spalten filtern und nur die Ordnernamen behalten.
Praktische Beispiele
Wenn du beispielsweise die Ordnernamen für einen Projektordner auslesen möchtest, könntest du den Pfad so anpassen:
Set oFolder = oFS.getfolder("C:\Projekte\2023")
Das Skript wird dann alle Unterordner in diesem speziellen Projektordner auflisten.
Tipps für Profis
- Nutzung von Excel-Funktionen: Wenn du die Namen der Ordner zur weiteren Verarbeitung benötigst, kannst du nach dem Auslesen gleich Excel-Funktionen verwenden, um Analysen durchzuführen.
- Automatisierung: Du kannst das Skript so anpassen, dass es regelmäßig automatisch ausgeführt wird, um aktuelle Ordnernamen zu erhalten.
- Fehlersuche: Wenn das Skript nicht funktioniert, überprüfe immer zuerst den Pfad. Er ist oft die Hauptquelle für Fehler.
FAQ: Häufige Fragen
1. Muss ich Excel als Administrator ausführen, um das Skript auszuführen?
In der Regel nicht, es sei denn, du greifst auf Systemordner zu, für die höhere Berechtigungen erforderlich sind.
2. Gibt es eine Möglichkeit, nur bestimmte Ordner auszulesen?
Ja, du kannst im VBA-Skript eine Bedingung hinzufügen, um nur Ordner mit bestimmten Namen oder Mustern auszulesen.
3. Funktioniert dieses Skript in allen Excel-Versionen?
Ja, das Skript sollte in den meisten modernen Excel-Versionen funktionieren, die VBA unterstützen.