Savoir comment utiliser Excel pour lire un répertoire et créer une feuille listant le contenu du répertoire vous permet d'utiliser Excel comme une application de gestion de fichiers . Par exemple, vous pourriez fournir à l'utilisateur une liste de répertoire à partir duquel elle peut choisir une table de base de données Access à importer dans le classeur Excel actuel . Le projet de cet article repose sur le langage de programmation , Visual Basic pour Applications, ou VBA d'Excel pour faire court. Vous pouvez utiliser cette langue pour automatiser n'importe quelle tâche Excel qui ne nécessite pas l'intervention de l' utilisateur . Une façon efficace d'apprendre cette langue est d'utiliser la commande " Enregistrer une macro " d'Excel sur l'onglet "Developer " . Instructions
1

Cliquez sur le bouton " Options" sur le bouton Office , puis cliquez sur l'option "Afficher développeur " case à cocher pour révéler l'onglet « Développeur ». Cet onglet contient des boutons pour les macros Visual Basic . Vous utilisez une macro VBA pour lister les fichiers dans un répertoire et de stocker cette liste dans une nouvelle feuille de calcul.
2

Cliquez sur l'onglet " développeur" , puis cliquez sur le bouton " Visual Basic " à pénétrer dans l'environnement de programmation Visual Basic. Double- cliquez sur l'élément " Ce classeur " dans le volet de navigation à gauche de l'écran . Cette action ouvre une nouvelle fenêtre de programmation dans laquelle vous pouvez entrer votre programme d' inscription dans l'annuaire .
3

Collez le programme suivant dans la fenêtre de programmation. Ce programme utilise la fonction VBA "Dir " pour lire un répertoire. La sortie de cette fonction est un fichier de ce répertoire.

Option Explicit

listfiles Public Sub ()

Dim. d

d = Dir ( "c: * \\ windows \\ " dans le menu )

MsgBox d

End Sub
4

Cliquez sur l'un des énoncés du programme , puis cliquez sur "Exécuter" de "Exécuter" commande pour exécuter le programme. Excel affiche une boîte de message indiquant le nom d'un fichier dans le dossier "C: . \\ Windows "
5

Collez le programme après le "sub End" déclaration du premier programme . Ce programme crée un classeur et d'insérer une valeur dans l'une de ses cellules . Votre programme définitif qui répertorie les fichiers d'un répertoire utilisera les déclarations contenues dans ce programme pour insérer des noms de fichiers dans un nouveau classeur .

Option Explicit

MakeNewWorkbook Public Sub ()

des classeurs . Ajouter

ACTIVECELL = " Bonjour à tous"

End Sub
6

Exécutez le programme que vous avez fait la précédente , puis cliquez sur l'icône « Excel » dans la barre des tâches Windows pour revenir à Excel . Votre programme va ajouter un nouveau classeur dont la feuille de calcul actuelle affiche le texte " Bonjour à tous" dans la cellule A1 .
7 étape d' utilisation de

2 de Les instructions pour retourner à l'environnement de programmation VBA , puis collez- le programme après l'instruction " End Sub " du programme précédent . Ce programme utilise la fonction " Dir" pour rassembler tous les fichiers dans le répertoire "C : \\ windows " du dossier . Le programme enregistre chaque fichier dans sa propre ligne dans une feuille de calcul d'un nouveau classeur.

Option Explicit

publique ListOneFile Sub ( )

Dim. d

d = Dir ( "c: \\ windows \\ *")

Workbooks.Add

faire jusqu'à d = ""

ActiveCell = d

' descendre

ActiveCell.Offset (1). Sélectionnez

d = Dir

boucle

End Sub
8

exécutez le programme que vous avez fait les précédents, puis revenir à Excel en utilisant les instructions de l'étape 6. Vous verrez une nouvelle feuille de calcul dont les cellules afficher une liste de tous les fichiers dans le répertoire "C : \\ windows " . Répertoire