Sådan kopieres listen over alle filnavne i en mappe til Excel-regneark via VBA

Excel Solutions Oktober 3, 2025

At samle alle filnavne i et regneark er meget vigtigt for dit arbejde. I denne artikel introducerer vi en metode til at indtaste alle filnavne i et regneark ved hjælp af VBA-makro.

I vores forrige artikel 2 Metoder til at kopiere listen over alle filnavne i en mappe til dit Excel-regneark, vi har introduceret to metoder til at liste alle filnavne i en mappe i et regneark. Og nu har vi fundet en anden metode. Du kan også bruge VBA-makroen til at afslutte denne opgave. Følg nedenstående trin og se, hvordan du bruger det.

Kopier listen over alle filnavne i en mappe

  1. Åbn den projektmappe, som du har brug for for at indtaste filnavnene.
  2. Og tryk derefter på genvejstasterne "Alt + F11" på tastaturet for at åbne Visual Basic-editoren.
  3. Klik derefter på fanen "Indsæt" i værktøjslinjen.
  4. Vælg derefter indstillingen "Modul" i rullelisten. Derfor har du indsat et nyt modul i editoren.Indsæt modul
  5. I dette trin skal du kopiere følgende koder til det nye modul:
Sub ListAllFileNames()
  Dim strTargetFolder As String, strFileName As String, nCountItem As Integer

  '  Initialization
  nCountItem = 1
  strTargetFolder = "C:\Users\Sample\Desktop\Sales Volume" & "\"
  strFileName = Dir(strTargetFolder, vbDirectory)

  '  Get the file name
  Do While strFileName <> ""
    If strFileName <> "." And strFileName <> ".." Then
      Cells(nCountItem, 1) = strFileName
      nCountItem = nCountItem + 1
    End If
    strFileName = Dir
  Loop
End Sub

I denne makro skal du ændre målmappen efter behov. Og vi indtaster filnavnene i kolonne A i et regneark. Hvis du skal indtaste filnavnene i et andet område, kan du også ændre koderne.

  1. Kør derefter denne makro. Du kan klikke på knappen "Kør under" i værktøjslinjen eller trykke på knappen "F5" på tastaturet for at køre denne makro.
  2. Derefter kommer du tilbage til regnearket. Du finder ud af, at alle filnavne i mappen allerede er vist i kolonne A.Resultat

Sammenlignet med de to andre metoder i artiklen 2 Metoder til at kopiere listen over alle filnavne i en mappe til dit Excel-regneark, vil du se, at det er meget praktisk at bruge VBA-makro. På den anden side, hvis du ikke er fortrolig med Excel VBA, vil du mødes med fejl, når du ændrer koderne. Derfor kan du bruge en af ​​de tre metoder i henhold til dit faktiske behov.

Vær opmærksom på farlig software

Du vil helt sikkert installere en masse software på din computer. Og disse applikationer kan hjælpe dig meget i dit arbejde. Nogle af dem er dog farlige applikationer. Når du har installeret dem på din computer, indsamler de dine personlige oplysninger. Hvad der er værre, dine Excel-filer vil også blive beskadiget af dem. I øjeblikket skal du straks afinstallere den farlige software. Desuden skal du også bruge et gendannelsesværktøj til reparere beskadiget xlsx-fil. Således kan du sikre dig, at dine Excel-filer er sikre.

Forfatter Introduktion:

Anna Ma er datagendannelsesekspert i DataNumen, Inc., som er verdens førende inden for datagendannelsesteknologier, herunder reparere Word docx-filproblem og Outlook-reparationssoftwareprodukter. For mere information besøg www.datanumen.com

Kommentarer er lukket.