Naslednji VBA vam lahko pomaga enostavno prešteti določeno vrsto datotek v določeni mapi, na primer prešteti vse datoteke .xlsx v mapi. Naredite naslednje:

1. Pritisnite druga + F11 tipke hkrati, da odprete okno Microsoft Visual Basic for Applications.

2. klik Vstavi > Moduliin nato v spodnje okno modula prilepite spodnjo kodo VBA.

VBA: preštejte določeno datoteko v določeni mapi

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

Opombe: Zgornja koda VBA bo štela . Xlsx datotek v določeni mapi. Za štetje drugih vrst datotek se pozanimajte xPath = xFolder & "\ *. xlsx", in spremenite . Xlsx na drugo pripono datoteke glede na vaše potrebe.

3. Pritisnite F5 ali kliknite Run za zagon te kode VBA.

4. V začetnem pogovornem oknu Brskaj izberite določeno mapo, v katero boste šteli določeno vrsto datotek, in kliknite OK gumb.

5. Zdaj se bo odprlo pogovorno okno in vam pokazalo, koliko določenih vrst datotek obstaja v določeni mapi. Samo zaprite pogovorno okno.

Preprosto združite več delovnih listov / delovnih zvezkov / datotek CSV v en delovni list / delovni zvezek

Morda je dolgočasno kombinirati na desetine listov iz različnih delovnih zvezkov v en list. Toda s Kutools za Excel Združite (delovni listi in delovni zvezki) pripomoček, lahko to storite z nekaj kliki!

Če ste odprli mapo, boste običajno dobili število vseh datotek na dnu te mape. Ta metoda bo predstavila Kutools za Excel Odprite vsebuje mapo pripomoček, da odprete mapo, ki vsebuje trenutni delovni zvezek, in nato pridobite število datotek v tej mapi.

1. klik Kutools Plus > Delovni zvezek > Odprite vsebuje mapo. Oglejte si posnetek zaslona:

2. Zdaj se odpre mapa s trenutnim delovnim zvezkom.

V uvodni mapi odstranite katero koli datoteko in na dnu te mape boste videli število vseh datotek, kot je prikazano spodaj:

Opombe: Odprite vsebuje mapo pripomoček bo neveljaven, če še nikoli niste shranili trenutnega delovnega zvezka.

Včasih boste morda želeli prešteti več vrst datotek v mapi in njenih podmapah. Pravzaprav Kutools za Excel ponuja še eno Seznam imen datotek pripomoček za enostavno rešitev.

1. klik Kutools Plus > Uvozno-izvoznih > Seznam imen datotek da odprete pogovorno okno Seznam imen datotek.

2. V začetnem pogovornem oknu Seznam imen datotek naredite naslednje:

3. Kliknite Ok v pogovornem oknu Seznam imen datotek.

4. Zdaj so vse datoteke določenih vrst na novem delovnem listu. Preprosto izberite prvi stolpec brez glave stolpca in v vrstici stanja boste dobili število datotek, kot je prikazano spodaj: