Note: The other languages of the website are Google-translated. Back to English

Comment répertorier rapidement les noms d'images / noms de fichiers d'un dossier dans des cellules Excel?

Dans ce didacticiel, je vais fournir quelques astuces pour répertorier rapidement tous les noms d'images ou noms de fichiers d'un dossier spécifique dans une feuille Excel comme la capture d'écran.

NAVIGATION RAPIDE

Liste des noms d'image d'un dossier dans Excel avec VBA
Liste des noms d'image ou des noms de fichier de format spécifique d'un dossier dans Excel avec la liste des noms de fichiers
Télécharger un exemple de fichier

liste de documents nom de l'image 1

Liste des noms d'image d'un dossier dans Excel avec VBA

Dans Excel, il n'y a pas de fonction intégrée qui peut automatiquement lister tous les noms d'image d'un dossier que vous choisissez dans une cellule d'une feuille, mais ici j'ai un code VBA qui peut vous aider à résoudre rapidement ce travail.

1. Dans Excel, appuyez sur + clés pour ouvrir Microsoft Visual Basic pour applications fenêtre.

2. Dans la fenêtre contextuelle, cliquez sur insérer > Module pour créer un nouveau script de module.

3. Copiez le code ci-dessous et collez-le dans la nouvelle fenêtre de script du module.

Sub PictureNametoExcel()
'UpdatebyExtendoffice 
    Dim I As Long
    Dim xRg As Range
    Dim xAddress As String
    Dim xFileName As String
    Dim xFileDlg As FileDialog
    Dim xFileDlgItem As Variant
    On Error Resume Next
    xAddress = ActiveWindow.RangeSelection.Address
    Set xRg = Application.InputBox("Select a cell to place name list:", "Kutools For Excel", xAddress, , , , , 8)
    If xRg Is Nothing Then Exit Sub
    Application.ScreenUpdating = False
    Set xRg = xRg(1)
    xRg.Value = "Picture Name"
    With xRg.Font
    .Name = "Arial"
    .FontStyle = "Bold"
    .Size = 10
    End With
    xRg.EntireColumn.AutoFit
    Set xFileDlg = Application.FileDialog(msoFileDialogFolderPicker)
    I = 1
    If xFileDlg.Show = -1 Then
        xFileDlgItem = xFileDlg.SelectedItems.Item(1)
        xFileName = Dir(xFileDlgItem & "\")
        Do While xFileName <> ""
            If InStr(1, xFileName, ".jpg") + InStr(1, xFileName, ".png") + InStr(1, xFileName, ".img") + InStr(1, xFileName, ".ioc") + InStr(1, xFileName, ".bmp") > 0 Then
                xRg.Offset(I).Value = xFileDlgItem & "\" & xFileName
                I = I + 1
            End If
            xFileName = Dir
        Loop
    End If
    Application.ScreenUpdating = True
End Sub

4. presse F5 , puis une boîte de dialogue apparaît pour vous permettre de sélectionner une cellule pour placer les noms d'image.
liste de documents nom de l'image 1

5. Cliquez OK pour continuer à sélectionner le dossier dont vous souhaitez lister les noms d'images dans la boîte de dialogue Parcourir.
liste de documents nom de l'image 3

6. Cliquez OK, maintenant tous les noms d'image dans le dossier sélectionné ont été répertoriés dans Excel.
liste de documents nom de l'image 13

A Noter: Dans le code VBA, vous pouvez jpg / png /… dans la chaîne de code Si InStr (1, xFileName, ".jpg") + InStr (1, xFileName, ".png") + InStr (1, xFileName, ".img") + InStr (1, xFileName, ".ioc") + InStr (1, xFileName, ".bmp") > 0 Puis à l'extension de fichier dont vous avez besoin, par exemple, si vous souhaitez répertorier les noms de fichier du fichier au format doc, modifiez uniquement la chaîne de code en Si InStr (1, xFileName, ".doc")> 0 Then.

Si vous avez généralement besoin de répertorier un ou tous les noms de fichiers d'un dossier dans une cellule Excel dans votre travail quotidien, le code est complexe et difficile à gérer, mais, avec la méthode ci-dessous, vous pouvez rapidement résoudre ce travail.


pas bouger

Voulez-vous avoir une augmentation de salaire et beaucoup de temps pour accompagner votre famille?

Office Tab améliore votre efficacité de 50% dans Microsoft Office en cours de fonctionnement

Incroyable, travailler sur deux documents ou plus est plus facile et plus rapide que travailler sur un seul.

Comparé aux navigateurs bien connus, l'outil à onglets d'Office Tab est plus puissant et plus efficace.

Réduisez les centaines de clics de souris et de saisie au clavier chaque jour pour vous, dites au revoir à la main de la souris maintenant.

Si vous travaillez habituellement sur plusieurs documents, Office Tab vous fera gagner du temps.

Essai gratuit 30-day, Pas de carte de crédit nécessaire.

En savoir plusGratuit Télécharger maintenant


Liste des noms d'image ou des noms de fichier de format spécifique d'un dossier dans Excel avec la liste des noms de fichiers

Voici un utilitaire - Liste des noms de fichiers in Kutools pour Excel, Qui peut

>> lister tous les noms de fichiers dans tous les formats de fichiers d'un dossier dans une nouvelle feuille;

>> lister les noms de fichiers dans un ou plusieurs formats de fichiers que vous spécifiez dans Excel;

>> liste les noms de fichiers, y compris les sous-dossiers et les fichiers et dossiers cachés dans Excel.

Dites adieu à la main de souris et à la spondylose cervicale maintenant

300 outils avancés de Kutools for Excel résolvent 80% des tâches Excel en quelques secondes, vous sortent des milliers de clics de souris.

Gérez facilement 1500 scénarios de travail, pas besoin de perdre de temps à rechercher des solutions, ayez beaucoup de temps pour profiter de votre vie.

Améliorez la productivité de 80% pour plus de 110000 personnes très efficaces chaque jour, vous y compris bien sûr.

Ne plus être tourmenté par les formules douloureuses et le VBA, donnez à votre cerveau une humeur de travail reposante et joyeuse.

Essai gratuit de 30 jours avec toutes les fonctionnalités, remboursement de 30 jours sans raison.

Un corps meilleur crée une vie meilleure.

Après avoir installé gratuitement Kutools for Excel, procédez comme suit:

1. Activez le classeur dont vous souhaitez répertorier les noms de fichiers, puis cliquez sur Kutools Plus > Import / Export > Liste des noms de fichiers.
liste de documents nom de l'image 4

2. dans le Liste des noms de fichiers boîte de dialogue, tout d'abord, cliquez sur  liste de documents nom de l'image 5pour sélectionner un dossier dont vous souhaitez lister les noms de fichiers, vous pouvez cocher les cases de Inclure les fichiers dans les sous-répertoires et Inclure les fichiers et dossiers cachés Comme vous le souhaitez.
liste de documents nom de l'image 6

3. Sélectionnez ensuite le format de fichier dans lequel vous souhaitez lister les noms Type de fichiers .

Visite Tous les fichiers option, il listera tous les noms de fichiers dans tous les formats de fichiers dans le dossier sélectionné
liste de documents nom de l'image 7
Visite Commun et sélectionnez le format de fichier spécifique pour lequel vous souhaitez lister les noms de fichiers dans la liste déroulante, puis il listera tous les noms de fichiers du format de fichier que vous choisissez dans la liste déroulante
liste de documents nom de l'image 8
Visite Spécifier option, puis tapez les extensions de fichier (en utilisant une virgule pour les séparer) que vous souhaitez lister les noms de fichiers dans la zone de texte, puis il ne listera que les noms de fichiers avec les extensions de fichier d'entrée dans Excel
liste de documents nom de l'image 9

4. Choisissez l'unité de taille dont vous avez besoin dans la liste déroulante dans Unité de taille de fichier section, si vous souhaitez créer un lien vers les noms de fichiers, cochez Créer des hyperliens option.

liste de documents nom de l'image 10 liste de documents nom de l'image 11

5. Cliquez Ok, une nouvelle feuille sera créée pour lister les noms de fichiers et certaines informations sur les fichiers.
liste de documents nom de l'image 12

Pointe: si vous souhaitez répertorier tous les noms de feuille dans Excel, vous pouvez appliquer Kutools for Excel ' Créer une liste de noms de feuilles utilitaire, il créera une nouvelle feuille pour lister tous les noms de feuille pouvant être liés.
créer une liste de noms de feuilles

Kutools pour Excel:

Se connecter  \/ 
x
or
x
INSCRIPTION  \/ 
x

or
+ outils pratiques utiles, simplifiant les tâches compliquées dans Excel en quelques clics.

Télécharger un exemple de fichier

échantillon


Comment vous démarquer de la foule, travailler facilement et profiter tranquillement de la vie?

Kutools for Excel améliorera en moyenne votre efficacité de 80% chaque jour, vous donnera beaucoup de temps pour accompagner en famille et vous amuser dans la vie.

300 outils avancés résolvent 80% des problèmes d'Excel, vous n'avez plus de difficulté à rechercher des solutions, plus facilement terminer le travail.

Gérez facilement 1500 scénarios Excel, économisez au moins 1 heure pour vous chaque jour.

Devenez un expert Excel en 5 minutes, gagnez la reconnaissance des gens et l'opportunité de promotion.

Les utilitaires en un seul clic gèrent le traitement par lots, vous permettent d'éviter des milliers de clics de souris, dites adieu à la main de la souris.

Débarrassez-vous des formules de mémorisation par cœur et du VBA complexe, donnez du repos à votre cerveau.

Plus de 110000 agents à haut rendement et plus de 300 choix d'entreprises de renommée mondiale.

Ne prenez que 39 $ mais vaut beaucoup plus que 4000 $ de formation d'autres personnes

Essai gratuit de 30 jours sans aucune limitation, remboursement intégral en 30 jours sans aucune raison.


Outils de productivité recommandés

Onglet Office - Navigation par onglets, modification, gestion des documents dans Microsoft Office 2019-2003 et Office 365


onglet bureau

Un complément professionnel pour accélérer Excel 2019-2007, réduire les heures de tâches à quelques secondes

Ce complément comprend des dizaines de groupes professionnels, avec plus de 300 options automatisera la plupart de vos tâches quotidiennes dans Excel et augmentera votre productivité d'au moins 50%. Tels que des groupes d'options en un clic et des conversions par lots.
C'est maintenant votre chance de vous accélérer avec Kutools for Excel!


Say something here...
symbols left.
You are guest
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.
  • To post as a guest, your comment is unpublished.
    JJB · 6 months ago
    Hey! This is super quick and thanks
  • To post as a guest, your comment is unpublished.
    Leonie · 1 years ago
    Thanks so much for this!


  • To post as a guest, your comment is unpublished.
    Andrej · 1 years ago
    In Libreoffice Calc I use the function of importing a list of files into the rows / columns of a Calc table, via Macro and based on certain criteria - I have created a button on the toolbar for this particular macro, and after pressing it, I select a folder, and the list of images is immediately inserted into a new document. How to make it as easy as possible in Excel? I have a lot of folders that contain 1 or more images and I need to:
    > If the folder contains 1 image, I need it to be on a new line in Excel.
    > If the folder contains more images, the first being on a new line and the second either:
    - next to the first in the same row (in one column), separated by the character | (example: photo 1.jpeg | photo 2.jpeg)
    - or to have their names in the columns (even without the | character) (the first option would be better, but the second is enough as well)
    These are the product images whose names I need for import into Woocommerce - via a csv file.
  • To post as a guest, your comment is unpublished.
    Ceki · 1 years ago
    Amazing! Thank you for sharing!
  • To post as a guest, your comment is unpublished.
    Mayank · 1 years ago
    Hi,
    As per the above code I am getting the the images name in an incrementing order, however the path where the images are being placed are in numeric incrementation.

    Kindly suggest how I can keep the same formatting.
  • To post as a guest, your comment is unpublished.
    Omila · 1 years ago
    How to export an image with specific file name in excel.
  • To post as a guest, your comment is unpublished.
    THE HELPER · 3 years ago
    I WAS HAVING THE SAME PROBLEM TANNER, IN THE SCRIPT WHERE IT HAS THE DIFFERENT FILE EXTENSIONS ITS GOING TO GRAB,YOU HAVE TO CAPITALIZE THE FILE EXTENSION ITS LOOKING FOR, FOR EXAMPLE, YOU SAID YOUR FILES ARE ".png", WELL IF YOU CAPITALIZE IT I.E ".PNG" IT MAY WORK.
    • To post as a guest, your comment is unpublished.
      Alexandre · 1 months ago
      Now it works for me. Thanks!!!
  • To post as a guest, your comment is unpublished.
    monk2011@gmail.com · 3 years ago
    Is it possible that there is something wrong with the code? The file explorer is showing my folder full of images (.png) as empty.
  • To post as a guest, your comment is unpublished.
    Tanner · 3 years ago
    Is it possible something is wrong with the code? Because it shows folders full of images (.png) as empty when it pulls up the box to select the photos.