Wie zählt man Dateien in einem bestimmten Ordner/Verzeichnis in Excel?

Das folgende VBA kann Ihnen helfen, ganz einfach eine bestimmte Art von Dateien in einem bestimmten Ordner zu zählen, zum Beispiel alle .xlsx-Dateien in einem Ordner. Gehen Sie wie folgt vor:

1. Drücken Sie gleichzeitig die Tasten Alt + F11, um das Microsoft Visual Basic for Applications-Fenster zu öffnen.

2. Klicken Sie auf Einfügen > Modul, und fügen Sie dann den folgenden VBA-Code in das geöffnete Modul-Fenster ein.

VBA: Eine bestimmte Datei in einem bestimmten Ordner zählen

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

Hinweis: Der obige VBA-Code zählt die .xlsx-Dateien in einem bestimmten Ordner. Um andere Arten von Dateien zu zählen, finden Sie xPath = xFolder & "\*.xlsx" und ändern Sie die .xlsx-Endung entsprechend Ihren Bedürfnissen in eine andere Dateiendung.

3. Drücken Sie die Taste F5 oder klicken Sie auf die Schaltfläche Ausführen, um diesen VBA-Code auszuführen.

4. Wählen Sie im sich öffnenden Durchsuchen-Dialogfeld den bestimmten Ordner aus, in dem Sie die spezifische Art von Dateien zählen möchten, und klicken Sie auf die Schaltfläche OK.

5. Nun wird ein Dialogfeld erscheinen und Ihnen anzeigen, wie viele Dateien des spezifischen Typs im bestimmten Ordner vorhanden sind. Schließen Sie einfach das Dialogfeld.

Wenn Sie einen Ordner geöffnet haben, sehen Sie normalerweise die Gesamtanzahl aller Dateien am unteren Rand dieses Ordners. Diese Methode stellt das Hilfsprogramm „ Den Ordner öffnen, in dem sich das aktuelle Dokument befindet“ von Kutools für Excel vor, um den Ordner zu öffnen, der die aktuelle Arbeitsmappe enthält, und dann die Anzahl der Dateien in diesem Ordner zu erhalten.

1. Klicken Sie auf Kutools Plus > Arbeitsmappe > Den Ordner öffnen, in dem sich das aktuelle Dokument befindet. Siehe Screenshot:

2. Nun wird der Ordner, der die aktuelle Arbeitsmappe enthält, geöffnet.

Heben Sie die Auswahl einer beliebigen Datei im geöffneten Ordner auf, und Sie werden die Gesamtanzahl aller Dateien am unteren Rand dieses Ordners sehen, wie im folgenden Screenshot dargestellt:

Hinweis: Das Den Ordner öffnen, in dem sich das aktuelle Dokument befindet Hilfsprogramm wird ungültig sein, wenn Sie die aktuelle Arbeitsmappe noch nie gespeichert haben.

Manchmal möchten Sie möglicherweise mehrere Arten von Dateien in einem Ordner und dessen Unterordnern zählen. Tatsächlich bietet Kutools für Excel ein weiteres Hilfsprogramm namens Dateinamenliste, um dies mühelos zu bewältigen.

1. Klicken Sie auf Kutools Plus > Importieren/Exportieren > Dateinamenliste, um das Dateinamenlisten-Dialogfeld zu öffnen.

2. Im sich öffnenden Dateinamenlisten-Dialogfeld gehen Sie wie folgt vor:

3. Klicken Sie auf die Schaltfläche OK im Dateinamenlisten-Dialogfeld.

4. Nun werden alle Dateien bestimmter Typen in einem neuen Arbeitsblatt aufgelistet. Wählen Sie einfach die erste Spalte ohne den Spaltenkopf aus, und Sie erhalten die Anzahl der Dateien in der Statusleiste, wie im folgenden Screenshot dargestellt: