Wie kann man alle Dateinamen in einem Ordner auflisten und dafür Hyperlinks in Excel erstellen?
Für Ihre tägliche Arbeit müssen Sie möglicherweise mehrere Dateinamen aus einem Ordner in ein Arbeitsblatt importieren und für jede Datei Hyperlinks erstellen, damit Sie die Dateien schnell und einfach öffnen können. Vielleicht könnten Sie die Dateinamen kopieren und einfügen und dann manuell einen Hyperlink für jeden davon erstellen, aber das würde viel Zeit kosten, wenn es Hunderte von Dateien im Ordner gibt. Heute werde ich über einige schnelle und interessante Methoden sprechen, um diese Aufgabe zu bewältigen.
Alle Dateinamen in einem Ordner auflisten und mit VBA-Code Hyperlinks erstellen
Alle Dateinamen in einem Ordner auflisten und mit Kutools für Excel Hyperlinks erstellen
Alle Dateinamen in einem Ordner auflisten und mit VBA-Code Hyperlinks erstellen
Um eine Liste zu erstellen und Hyperlinks für Dateien aus einem Ordner zu erstellen, kann der folgende VBA-Code Ihnen helfen.
1. Aktivieren Sie ein neues Arbeitsblatt, um das Ergebnis einzufügen.
2. Halten Sie die Tasten ALT + F11 gedrückt, um das Microsoft Visual Basic for Applications-Fenster zu öffnen.
3. Klicken Sie auf Einfügen > Modul und fügen Sie den folgenden Code im Modulfenster ein.
VBA: Alle Dateinamen in einem Ordner auflisten und Hyperlinks erstellen
Sub Example1()
'Updateby Extendoffice
Dim xFSO As Object
Dim xFolder As Object
Dim xFile As Object
Dim xFiDialog As FileDialog
Dim xPath As String
Dim I As Integer
Set xFiDialog = Application.FileDialog(msoFileDialogFolderPicker)
If xFiDialog.Show = -1 Then
xPath = xFiDialog.SelectedItems(1)
End If
Set xFiDialog = Nothing
If xPath = "" Then Exit Sub
Set xFSO = CreateObject("Scripting.FileSystemObject")
Set xFolder = xFSO.GetFolder(xPath)
For Each xFile In xFolder.Files
I = I + 1
ActiveSheet.Hyperlinks.Add Cells(I, 1), xFile.Path, , , xFile.Name
Next
End Sub
4. Drücken Sie dann die F5-Taste, um diesen Code auszuführen, und wählen Sie den Ordner aus, aus dem Sie die Dateien auflisten möchten, aus dem Durchsuchen-Fenster, siehe Screenshot:
5. Nachdem Sie den Ordner angegeben haben, klicken Sie auf die Schaltfläche OK, und alle Dateien im spezifischen Ordner werden mit Hyperlinks im aktiven Arbeitsblatt aufgelistet, siehe Screenshot:
Hinweis: Wenn es Unterverzeichnisse in Ihrem spezifischen Ordner gibt, werden die Dateien in den Unterverzeichnissen nicht aufgelistet.
Alle Dateinamen in einem Ordner auflisten und mit Kutools für Excel Hyperlinks erstellen
Um alle Dateien sowohl in einem Ordner als auch in dessen Unterverzeichnissen aufzulisten und für jede Datei Hyperlinks zu erstellen, kann Kutools für Excel’s Dateinamenliste helfen. Mit dieser Funktion werden alle Dateien im Ordner und in den Unterverzeichnissen auf einmal mit einigen Attributen wie Dateiname, Dateigröße, Erstellungsdatum, enthaltendem Ordner usw. aufgelistet.
Wenn Sie Kutools für Excel installiert haben, führen Sie bitte die folgenden Schritte aus:
1. Klicken Sie auf Kutools Plus > Import & Export > Dateinamenliste, siehe Screenshot:
2. Im Dialogfeld „Dateinamenliste“ führen Sie bitte die folgenden Aktionen aus:
(1.) Klicken 
Sie auf die Schaltfläche, um den Ordner auszuwählen, aus dem Sie die Dateinamen auflisten möchten;
(2.) Aktivieren Sie „Dateien in Unterverzeichnissen einschließen“, wenn Sie Dateinamen innerhalb von Unterordnern auflisten möchten, aktivieren Sie „Versteckte Dateien und Ordner einschließen“, wenn Sie versteckte Dateien auflisten möchten;
(3.) Geben Sie die Dateitypen an, die Sie finden und auflisten möchten, im Abschnitt „Dateityp“;
(4.) Wählen Sie die Einheit der Dateigröße aus, die Sie anzeigen möchten;
(5.) Aktivieren Sie „Hyperlinks erstellen“ am linken unteren Rand des Dialogfelds.
3. Klicken Sie dann auf die Schaltfläche OK, und alle Dateien im Ordner und in den Unterverzeichnissen werden in einem neuen Arbeitsblatt mit den benötigten Hyperlinks aufgelistet, siehe Screenshot:
Klicken Sie hier, um weitere Details über das Hilfsprogramm „Dateinamenliste“ zu erfahren…
Jetzt Kutools für Excel herunterladen und kostenlos testen!
Demo: Alle Dateinamen in einem Ordner auflisten und mit Kutools für Excel Hyperlinks erstellen
Verwandter Artikel:
Die besten Produktivitätstools für das Büro
Stärken Sie Ihre Excel-Fähigkeiten mit Kutools für Excel und genießen Sie Effizienz wie nie zuvor. Kutools für Excel bietet mehr als300 erweiterte Funktionen, um die Produktivität zu steigern und Zeit zu sparen. Klicken Sie hier, um die Funktion zu erhalten, die Sie am meisten benötigen...
Office Tab bringt die Tab-Oberfläche in Office und macht Ihre Arbeit wesentlich einfacher
- Aktivieren Sie die Tabulator-Bearbeitung und das Lesen in Word, Excel, PowerPoint, Publisher, Access, Visio und Project.
- Öffnen und erstellen Sie mehrere Dokumente in neuen Tabs innerhalb desselben Fensters, statt in neuen Einzelfenstern.
- Steigert Ihre Produktivität um50 % und reduziert hunderte Mausklicks täglich!
Alle Kutools-Add-Ins. Ein Installationspaket
Das Kutools for Office-Paket bündelt Add-Ins für Excel, Word, Outlook & PowerPoint sowie Office Tab Pro und ist ideal für Teams, die mit mehreren Office-Anwendungen arbeiten.
- All-in-One-Paket — Add-Ins für Excel, Word, Outlook & PowerPoint + Office Tab Pro
- Ein Installationspaket, eine Lizenz — in wenigen Minuten einsatzbereit (MSI-kompatibel)
- Besser gemeinsam — optimierte Produktivität in allen Office-Anwendungen
- 30 Tage kostenlos testen — keine Registrierung, keine Kreditkarte erforderlich
- Bestes Preis-Leistungs-Verhältnis — günstiger als Einzelkauf der Add-Ins