Comment lister tous les noms de fichiers d'un dossier et de ses sous-dossiers dans une feuille de calcul ?

Si vous avez besoin de générer une liste de noms de fichiers à partir d'un répertoire dans une feuille de calcul Excel, les méthodes suivantes vous aideront à le faire rapidement et efficacement. Choisissez l'approche qui convient le mieux à vos besoins.

• Lister tous les noms de fichiers d'un dossier dans une feuille de calcul en utilisant un navigateur web
• Lister tous les noms de fichiers d'un dossier dans une feuille de calcul en utilisant une formule
• Lister tous les noms de fichiers d'un dossier dans une feuille de calcul en utilisant du code VBA
• Lister tous les noms de fichiers d'un dossier et de ses sous-dossiers dans une feuille de calcul en utilisant Kutools

Lister tous les noms de fichiers d'un dossier dans une feuille de calcul en utilisant un navigateur web

Si vous souhaitez lister les fichiers d'un dossier en utilisant un navigateur web, assurez-vous que l'un des navigateurs (Firefox, Opera ou Google Chrome) est installé sur votre ordinateur. Supposons que vous deviez lister les fichiers du dossier suivant dans une feuille de calcul, voir la capture d'écran :

1. Allez copier le chemin du dossier ("Dossier Test") dans l'Explorateur. Par exemple, le chemin de ce dossier est : "C:\Users\AddinTestWin10\Desktop\Dossier Test".

2. Ouvrez l'un des navigateurs web (FireFox, Opera ou Google Chrome) et collez le chemin du dossier dans la barre d'adresse, puis appuyez sur la touche Entrée. Voir la capture d'écran :

3. Cliquez sur "Ctrl+A" pour sélectionner tout le contenu dans le navigateur web et appuyez sur "Ctrl+C" pour le copier.

4. Ouvrez Excel et collez directement (en utilisant les raccourcis "Ctrl+V" pour coller) dans une feuille de calcul. Voir la capture d'écran :

Lister tous les noms de fichiers d'un dossier dans une feuille de calcul en utilisant une formule

Dans Excel, vous pouvez également utiliser une formule pour obtenir la liste de tous les noms de fichiers ou des types spécifiques de noms de fichiers d'un dossier, suivez les étapes ci-dessous :

1. Copiez et collez le chemin du fichier dans une cellule, puis tapez \* après le chemin du fichier comme indiqué dans la capture d'écran ci-dessous :

2. Ensuite, cliquez sur "Formule" > "Gestionnaire de noms", voir la capture d'écran :

3. Dans la boîte de dialogue "Gestionnaire de noms", cliquez sur le bouton "Nouveau", voir la capture d'écran :

4. Dans la fenêtre contextuelle "Nouveau nom", spécifiez un nom dans la zone de texte "Nom", puis entrez la formule ci-dessous dans la zone de texte "Fait référence à", voir la capture d'écran :

Remarque : Dans cette formule, "Feuil1!$A$1" est la cellule de la feuille de calcul contenant le chemin du fichier que vous avez inséré à l'étape 1.

5. Puis, cliquez sur "OK" > "Fermer" pour fermer les dialogues, puis entrez la formule suivante dans une cellule vide où vous souhaitez lister les noms de fichiers, et faites glisser la poignée de remplissage vers le bas jusqu'à ce que des cellules vides soient affichées, maintenant tous les noms de fichiers du dossier spécifié ont été listés comme le montre la capture d'écran ci-dessous :

Remarque : Dans cette formule, "NomsFichiers" est le nom de plage que vous avez créé à l'étape 4, et "A1" est la cellule contenant le chemin du fichier.

Lister tous les noms de fichiers d'un dossier dans une feuille de calcul en utilisant du code VBA

Utilisez le code VBA suivant pour lister les fichiers d'un dossier dans une feuille de calcul :

1. Ouvrez une feuille de calcul et cliquez pour sélectionner une cellule où vous souhaitez placer les noms de fichiers.

2. Maintenez les touches "ALT + F11" enfoncées dans Excel, cela ouvre la fenêtre "Microsoft Visual Basic pour Applications".

3. Cliquez sur "Insérer" > "Module", et collez le code suivant dans la fenêtre "Module".

Code VBA : Lister tous les noms de fichiers d'un dossier dans une feuille de calcul

Sub listfiles()
'Updateby Extendoffice
    Dim xFSO As Object
    Dim xFolder As Object
    Dim xFile As Object
    Dim xFiDialog As FileDialog
    Dim xPath As String
    Dim I As Integer
    Set xFiDialog = Application.FileDialog(msoFileDialogFolderPicker)
    If xFiDialog.Show = -1 Then
        xPath = xFiDialog.SelectedItems(1)
    End If
    Set xFiDialog = Nothing
    If xPath = "" Then Exit Sub
    Set xFSO = CreateObject("Scripting.FileSystemObject")
    Set xFolder = xFSO.GetFolder(xPath)
    For Each xFile In xFolder.Files
        I = I + 1
        ActiveSheet.Hyperlinks.Add Cells(I, 1), xFile.Path, , , xFile.Name
    Next
End Sub

4. Appuyez ensuite sur la touche F5 pour exécuter le code, une nouvelle fenêtre "Parcourir" s'affichera. Sélectionnez le dossier dont vous souhaitez lister les noms de fichiers.

5. Cliquez ensuite sur OK, les fichiers du dossier spécifique ont été listés dans la feuille de calcul avec des hyperliens. Voir la capture d'écran :

Lister tous les noms de fichiers d'un dossier et de ses sous-dossiers dans une feuille de calcul en utilisant Kutools

L'utilitaire "Liste des noms de fichiers" de "Kutools pour Excel" peut facilement générer une liste de fichiers d'un répertoire dans une feuille de calcul.

1. Ouvrez Excel, cliquez sur "Kutools Plus" > "Importer / Exporter" > "Liste des noms de fichiers…", voir la capture d'écran :

2. Dans la boîte de dialogue "Liste des noms de fichiers", effectuez les opérations suivantes :

(1) Cliquez sur le bouton pour spécifier le dossier contenant les fichiers que vous souhaitez lister ;

(2) Cochez l'option "Inclure les fichiers dans les sous-dossiers" pour lister tous les noms de fichiers dans les sous-dossiers ou cochez l'option "Inclure les fichiers et dossiers masqués" pour lister tous les noms des fichiers masqués ainsi que les noms de fichiers dans les dossiers masqués ;

(3) Spécifiez le type de fichier que vous souhaitez lister dans la section "Type de fichier" ;

(4) Sélectionnez l'unité de taille de fichier que vous souhaitez afficher dans la section "Unité de taille de fichier" selon vos besoins.

(5) Cochez l'option "Créer des hyperliens" si nécessaire.

3. Cliquez sur OK. Cela générera une liste des fichiers du répertoire ou sous-répertoire dans une nouvelle feuille de calcul. Voir la capture d'écran :

Articles connexes :