Hoe alle bestandsnamen in een map weergeven en er hyperlinks voor maken in Excel?
Voor uw dagelijkse werk moet u wellicht meerdere bestandsnamen uit een map naar een werkblad importeren en hyperlinks voor elk bestand maken, zodat u het bestand snel en gemakkelijk kunt openen. Misschien kunt u de bestandsnamen kopiëren en plakken en er handmatig een voor een een hyperlink voor maken, maar dit zal veel tijd verspillen als er honderden bestanden in de map staan. Vandaag zal ik het hebben over enkele snelle en interessante methoden om met deze baan om te gaan.
Maak een lijst van alle bestandsnamen in een map en maak hyperlinks met VBA-code
Maak een lijst van alle bestandsnamen in een map en maak hyperlinks met Kutools voor Excel
Maak een lijst van alle bestandsnamen in een map en maak hyperlinks met VBA-code
Om een hyperlink met bestanden uit een map weer te geven en te maken, kan de volgende VBA-code u een plezier doen.
1. Activeer een nieuw werkblad om het resultaat te plaatsen.
2. Houd de ALT + F11 toetsen om de te openen Microsoft Visual Basic voor toepassingen venster.
3. Klikken Invoegen > Moduleen plak de volgende code in het Module Venster.
VBA: maak een lijst van alle bestandsnamen in een map en maak 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. Druk vervolgens op F5 key om deze code uit te voeren, en kies de map waarvan u de bestanden wilt weergeven uit het Blader venster, zie screenshot:
5. Klik na het specificeren van de map op OK knop, en alle bestanden in de specifieke map zijn vermeld in een actief werkblad met hyperlinks, zie screenshot:
Note: Als uw specifieke map submappen bevat, worden de bestanden in de submappen niet weergegeven.
Maak een lijst van alle bestandsnamen in een map en maak hyperlinks met Kutools voor Excel
Om alle bestanden in een map en zijn submappen weer te geven en hyperlinks voor elk bestand te maken, Kutools for Excel's Bestandsnaam lijst kan je een plezier doen. Met deze functie worden alle bestanden in map en submappen in één keer weergegeven met een aantal attributen, zoals bestandsnaam, bestandsgrootte, aangemaakte tijd, bevattende map enzovoort.
Kutools for Excel : met meer dan 300 handige Excel-invoegtoepassingen, gratis te proberen zonder beperking in 30 dagen. |
Als je hebt geïnstalleerd Kutools for Excel, voer de volgende stappen uit:
1. Klikken Koetools Plus > Importeren en exporteren > Bestandsnaam lijst, zie screenshot:
2. In het Bestandsnaam lijst dialoogvenster, voer dan de volgende bewerkingen uit:
(1.) Klik knop om de map te selecteren waarvan u de bestandsnamen wilt weergeven;
(2.) Controleer Voeg bestanden toe aan submappen Als u bestandsnamen in submappen wilt weergeven, vinkt u aan Inclusief verborgen bestanden en mappen als u de verborgen bestanden wilt weergeven;
(3.) Specificeer de bestandstypen die u wilt zoeken en vermeld ze onder het Bestanden type sectie;
(4.) Selecteer de bestandsgrootte-eenheid die u wilt weergeven;
(5.) Controleer Maak hyperlinks links onder in het dialoogvenster.
3. Dan klikken Ok knop, en alle bestanden in de map en submappen zijn weergegeven in een nieuw werkblad met de hyperlinks die je nodig hebt, zie screenshot:
Klik voor meer informatie over het hulpprogramma Bestandslijst ...
Download en gratis proef Kutools voor Excel nu!
Demo: maak een lijst van alle bestandsnamen in een map en maak hyperlinks met Kutools voor Excel
Gerelateerd artikel:
Hoe alle bestanden in mappen en submappen in een werkblad weergeven?
Beste Office-productiviteitstools
Geef uw Excel-vaardigheden een boost met Kutools voor Excel en ervaar efficiëntie als nooit tevoren. Kutools voor Excel biedt meer dan 300 geavanceerde functies om de productiviteit te verhogen en tijd te besparen. Klik hier om de functie te krijgen die u het meest nodig heeft...
Office-tabblad Brengt een interface met tabbladen naar Office en maakt uw werk veel gemakkelijker
- Schakel bewerken en lezen met tabbladen in Word, Excel, PowerPoint in, Publisher, Access, Visio en Project.
- Open en maak meerdere documenten in nieuwe tabbladen van hetzelfde venster in plaats van in nieuwe vensters.
- Verhoogt uw productiviteit met 50% en vermindert honderden muisklikken voor u elke dag!