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 run 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.

Z łatwością łącz wiele arkuszy / skoroszytów / plików CSV w jeden arkusz roboczy / skoroszyt

Łączenie dziesiątek arkuszy z różnych skoroszytów w jeden arkusz może być żmudne. Ale z Kutools dla Excela Połącz (arkusze i skoroszyty) narzędzie, możesz to zrobić za pomocą kilku kliknięć!

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 > skoroszyt > 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: