Le VBA suivant peut vous aider à compter facilement un type spécifique de fichiers dans un certain dossier, comme compter tous les fichiers .xlsx dans un dossier. Veuillez procéder comme suit:

1. appuie sur le autre + F11 simultanément pour ouvrir la fenêtre Microsoft Visual Basic pour Applications.

2. Cliquez insérer > Module, puis collez le code VBA ci-dessous dans la fenêtre Module d'ouverture.

VBA: compter un fichier spécifique dans un certain dossier

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

Notes: Le code VBA ci-dessus comptera les . Xlsx fichiers dans un certain dossier. Pour compter les autres types de fichiers, veuillez découvrir xPath = xFolder & "\ *. xlsx"et changez le . Xlsx à une autre extension de fichier en fonction de vos besoins.

3. appuie sur le F5 ou cliquez sur la Courir bouton pour exécuter ce code VBA.

4. Dans la boîte de dialogue qui s'ouvre, sélectionnez le dossier dans lequel vous comptez le type spécifique de fichiers, puis cliquez sur le bouton OK .

5. Maintenant, une boîte de dialogue apparaîtra et vous montrera combien de types spécifiques de fichiers existent dans le certain dossier. Fermez simplement la boîte de dialogue.

Combinez facilement plusieurs feuilles de calcul / classeurs / fichiers CSV en une seule feuille de calcul / classeur

Il peut être fastidieux de combiner des dizaines de feuilles provenant de différents classeurs en une seule. Mais avec Kutools pour Excel Combiner (feuilles de calcul et classeurs) utilitaire, vous pouvez le faire en quelques clics!

Si vous avez ouvert un dossier, vous obtiendrez normalement le numéro de tous les fichiers au bas de ce dossier. Cette méthode présentera Kutools pour Excel Dossier contenant ouvert utilitaire pour ouvrir le dossier qui contient le classeur en cours, puis obtenir le nombre de fichiers de ce dossier.

1. Cliquez Kutools Plus > Classeur > Dossier contenant ouvert. Voir la capture d'écran:

2. Le dossier contenant le classeur en cours s'ouvre maintenant.

Désélectionnez n'importe quel fichier dans le dossier d'ouverture et vous verrez le nombre de tous les fichiers au bas de ce dossier, comme illustré ci-dessous:

Notes: Les Dossier contenant ouvert L'utilitaire sera invalide si vous n'avez jamais enregistré le classeur actuel auparavant.

Parfois, vous souhaiterez peut-être compter plusieurs types de fichiers dans un dossier et ses sous-dossiers. En fait, Kutools for Excel en fournit un autre Liste des noms de fichiers utilitaire pour le résoudre avec facilité.

1. Cliquez Kutools Plus > Import / Export > Liste des noms de fichiers pour ouvrir la boîte de dialogue Liste des noms de fichiers.

2. Dans la boîte de dialogue d'ouverture de la liste des noms de fichiers, procédez comme suit:

3. Cliquez sur l' Ok dans la boîte de dialogue Liste des noms de fichiers.

4. Désormais, tous les fichiers de types spécifiques sont répertoriés dans une nouvelle feuille de calcul. Sélectionnez simplement la première colonne sans l'en-tête de colonne et vous obtiendrez le nombre de fichiers dans la barre d'état comme illustré ci-dessous: