Følgende VBA kan hjælpe dig med let at tælle en bestemt filtype i en bestemt mappe, såsom at tælle alle .xlsx-filer i en mappe. Gør som følger:

1. Tryk på andre + F11 taster samtidigt for at åbne vinduet Microsoft Visual Basic til applikationer.

2. klik indsatte > Moduler, og indsæt derefter nedenstående VBA-kode i modulets åbningsvindue.

VBA: Tæl en bestemt fil i en bestemt mappe

Sub CountFiles()
Dim xFolder As String
Dim xPath As String
Dim xCount As Long
Dim xFiDialog As FileDialog
Dim xFile As String
Set xFiDialog = Application.FileDialog(msoFileDialogFolderPicker)
If xFiDialog.Show = -1 Then
xFolder = xFiDialog.SelectedItems(1)
End If
If xFolder = "" Then Exit Sub
xPath = xFolder & "\*.xlsx"
xFile = Dir(xPath)
Do While xFile <> ""
xCount = xCount + 1
xFile = Dir()
Loop
MsgBox xCount & " files found"
End Sub

Bemærk: Ovenstående VBA-kode tæller . Xlsx filer i en bestemt mappe. For at tælle andre typer filer, bedes du finde ud af det xPath = xFolder & "\ *. xlsx", og ændre . Xlsx til en anden filudvidelse baseret på dine behov.

3. Tryk på F5 eller klik på Kør knappen for at køre denne VBA-kode.

4. I den åbne dialogboks Gennemse skal du vælge den bestemte mappe, som du vil tælle den specifikke filtype i, og klikke på OK .

5. Nu kommer en dialogboks ud, der viser dig, hvor mange den specifikke filtype findes i den bestemte mappe. Luk bare dialogboksen.

Kombiner let flere regneark / projektmapper / CSV-filer i et regneark / projektmappe

Det kan være kedeligt at kombinere snesevis af ark fra forskellige projektmapper til ét ark. Men med Kutools for Excel's Kombiner (regneark og projektmapper) værktøj, kan du få det gjort med blot flere klik!

Hvis du har åbnet en mappe, vil du normalt få antallet af alle filer i bunden af ​​denne mappe. Denne metode vil introducere Kutools for Excel's Åbn Indeholdende Mappe værktøj til at åbne den mappe, der indeholder den aktuelle projektmappe, og derefter hente antallet af filer i denne mappe.

1. klik Kutools Plus > Workbook > Åbn Indeholdende Mappe. Se skærmbillede:

2. Nu åbnes mappen, der indeholder den aktuelle projektmappe.

Fjern markeringen af ​​en fil i åbningsmappen, og du vil se antallet af alle filer i bunden af ​​denne mappe som vist nedenstående skærmbillede:

Bemærk: The Åbn Indeholdende Mappe værktøjet er ugyldigt, hvis du aldrig har gemt den aktuelle projektmappe før.

Nogle gange vil du måske tælle flere typer filer i en mappe og dens undermapper. Rent faktisk Kutools for Excel giver en anden Liste over filnavne værktøj til at løse det med lethed.

1. klik Kutools Plus > Import Eksport > Liste over filnavne for at åbne dialogboksen Filnavnsliste.

2. I dialogboksen Filenavn åbner skal du gøre som følger:

3. Klik på Ok knappen i dialogboksen Filnavnliste.

4. Nu vises alle filer af bestemte typer i et nyt regneark. Vælg bare den første kolonne uden kolonneoverskriften, og du får antallet af filer i statuslinjen som vist nedenstående skærmbillede: