Wie liste ich alle Dateinamen in einem Ordner auf und erstelle Hyperlinks für sie in Excel?
Für Ihre tägliche Arbeit müssen Sie möglicherweise mehrere Dateinamen aus einem Ordner in ein Arbeitsblatt importieren und Hyperlinks für jede Datei erstellen, damit die Datei schnell und einfach geöffnet werden kann. Möglicherweise können Sie die Dateinamen kopieren und einfügen und nacheinander manuell einen Hyperlink erstellen. Dies verschwendet jedoch viel Zeit, wenn sich Hunderte von Dateien im Ordner befinden. Heute werde ich über einige schnelle und interessante Methoden sprechen, um mit diesem Job umzugehen.
Listen Sie alle Dateinamen in einem Ordner auf und erstellen Sie Hyperlinks mit VBA-Code
Listen Sie alle Dateinamen in einem Ordner auf und erstellen Sie Hyperlinks mit Kutools for Excel
Listen Sie alle Dateinamen in einem Ordner auf und erstellen Sie Hyperlinks mit VBA-Code
Der folgende VBA-Code kann Ihnen einen Gefallen tun, um einen Hyperlink mit Dateien aus einem Ordner aufzulisten und zu erstellen.
1. Aktivieren Sie ein neues Arbeitsblatt, um das Ergebnis zu platzieren.
2. Halten Sie die Taste gedrückt ALT + F11 Schlüssel zum Öffnen der Microsoft Visual Basic für Applikationen Fenster.
3. Klicken Sie Insert > Modulund fügen Sie den folgenden Code in das Feld ein Modul Fenster.
VBA: Listen Sie alle Dateinamen in einem Ordner auf und erstellen Sie Hyperlinks
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. Dann drücken F5 Geben Sie die Taste ein, um diesen Code auszuführen, und wählen Sie den Ordner aus, in dem Sie die Dateien auflisten möchten Entdecken Fenster, siehe Screenshot:
5. Klicken Sie nach Angabe des Ordners auf OK Klicken Sie auf die Schaltfläche, und alle Dateien im jeweiligen Ordner wurden in einem aktiven Arbeitsblatt mit Hyperlinks aufgelistet. Siehe Screenshot:
Note: Wenn sich in Ihrem Ordner Unterordner befinden, werden die Dateien in den Unterordnern nicht aufgelistet.
Listen Sie alle Dateinamen in einem Ordner auf und erstellen Sie Hyperlinks mit Kutools for Excel
Um alle Dateien in einem Ordner und seinen Unterordnern aufzulisten und Hyperlinks für jede Datei zu erstellen, Kutools for Excel Dateinamenliste kann dir einen Gefallen tun. Mit dieser Funktion werden alle Dateien in Ordnern und Unterordnern gleichzeitig mit einigen Attributen aufgelistet, z. B. Dateiname, Dateigröße, Erstellungszeit, Ordner usw.
Kutools for Excel : Mit mehr als 300 praktischen Excel-Add-Ins können Sie diese innerhalb von 30 Tagen ohne Einschränkung testen. |
Wenn Sie installiert haben Kutools for ExcelBitte machen Sie folgende Schritte:
1. Klicken Sie Kutoolen Plus > Import Export > Dateinamenliste, siehe Screenshot:
2. Im Dateinamenliste Im Dialogfeld führen Sie bitte die folgenden Vorgänge aus:
(1.) Klicken Sie auf Schaltfläche, um den Ordner auszuwählen, in dem Sie die Dateinamen auflisten möchten;
(2.) Überprüfen Dateien in Unterverzeichnisse aufnehmen Wenn Sie Dateinamen in Unterordnern auflisten möchten, aktivieren Sie diese Option Schließen Sie versteckte Dateien und Ordner ein wenn Sie die versteckten Dateien auflisten möchten;
(3.) Geben Sie die Dateitypen an, die Sie suchen möchten, und listen Sie sie unter auf Dateityp Sektion;
(4.) Wählen Sie die Dateigrößeneinheit aus, die Sie anzeigen möchten.
(5.) Überprüfen Erstellen Sie Hyperlinks am linken unteren Rand des Dialogfelds.
3. Dann klick Ok Klicken Sie auf die Schaltfläche, und alle Dateien im Ordner und in den Unterordnern wurden in einem neuen Arbeitsblatt mit den erforderlichen Hyperlinks aufgelistet. Siehe Screenshot:
Klicken Sie hier, um weitere Informationen zum Dienstprogramm "Dateinamenliste" zu erhalten.
Laden Sie Kutools for Excel jetzt herunter und testen Sie es kostenlos!
Demo: Listen Sie alle Dateinamen in einem Ordner auf und erstellen Sie Hyperlinks mit Kutools for Excel
In Verbindung stehender Artikel:
Wie liste ich alle Dateien in Ordnern und Unterordnern in einem Arbeitsblatt auf?
Beste Office-Produktivitätstools
Verbessern Sie Ihre Excel-Kenntnisse mit Kutools für Excel und erleben Sie Effizienz wie nie zuvor. Kutools für Excel bietet über 300 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 Oberfläche mit Registerkarten in Office und erleichtert Ihnen die Arbeit erheblich
- Aktivieren Sie das Bearbeiten und Lesen von Registerkarten in Word, Excel und PowerPoint, Publisher, Access, Visio und Project.
- Öffnen und erstellen Sie mehrere Dokumente in neuen Registerkarten desselben Fensters und nicht in neuen Fenstern.
- Steigert Ihre Produktivität um 50 % und reduziert jeden Tag Hunderte von Mausklicks für Sie!