Jak liczyć pliki w określonym folderze / katalogu w programie Excel?

Poniższy VBA może pomóc w łatwym policzeniu określonego typu plików w określonym folderze, na przykład policzeniu wszystkich plików .xlsx w folderze. Wykonaj następujące czynności:

1. wciśnij inny + F11 klawisze jednocześnie, aby otworzyć okno Microsoft Visual Basic for Applications.

2. kliknij wstawka > Moduł, a następnie wklej poniższy kod VBA do otwierającego okna modułu.

VBA: Policz określony plik w określonym folderze

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

Note: Powyższy kod VBA zlicza pliki . Xlsx pliki w określonym folderze. Aby policzyć inne typy plików, sprawdź xPath = xFolder & „\ *. xlsx”i zmień . Xlsx do innego rozszerzenia pliku w zależności od potrzeb.

3. wciśnij F5 lub kliknij Uruchom przycisk, aby uruchomić ten kod VBA.

4. W otwartym oknie dialogowym Przeglądaj wybierz folder, w którym chcesz policzyć określony typ plików, i kliknij OK przycisk.

5. Teraz pojawi się okno dialogowe pokazujące, ile plików określonego typu znajduje się w określonym folderze. Po prostu zamknij okno dialogowe.

Jeśli otworzyłeś folder, zwykle otrzymasz liczbę wszystkich plików na dole tego folderu. Ta metoda wprowadzi Kutools dla Excela Otwórz folder zawierający narzędzie, aby otworzyć folder zawierający bieżący skoroszyt, a następnie uzyskać liczbę plików w tym folderze.

1. kliknij Kutools Plus > Podręcznik z ćwiczeniami > Otwórz folder zawierający. Zobacz zrzut ekranu:

2. Teraz otwiera się folder zawierający bieżący skoroszyt.

Odznacz dowolny plik w folderze otwierającym, a zobaczysz liczbę wszystkich plików na dole tego folderu, jak pokazano na poniższym zrzucie ekranu:

Note: the Otwórz folder zawierający narzędzie będzie nieprawidłowe, jeśli nigdy wcześniej nie zapisałeś bieżącego skoroszytu.

Czasami możesz chcieć policzyć kilka typów plików w folderze i jego podfolderach. W rzeczywistości Kutools dla programu Excel zapewnia inny Lista nazw plików narzędzie do łatwego rozwiązania.

1. kliknij Kutools Plus > Import / Export > Lista nazw plików aby otworzyć okno dialogowe Lista nazw plików.

2. W otwartym oknie dialogowym Lista nazw plików wykonaj następujące czynności:

3. Kliknij Ok w oknie dialogowym Lista nazw plików.

4. Teraz wszystkie pliki określonego typu zostaną umieszczone w nowym arkuszu. Po prostu wybierz pierwszą kolumnę bez nagłówka kolumny, a otrzymasz liczbę plików na pasku stanu, jak pokazano na poniższym zrzucie ekranu: