Wissen, wie man Excel verwenden, um ein Verzeichnis zu lesen und erstellen Sie eine Tabelle listet den Inhalt des Verzeichnisses können Sie Excel als Datei -Management-Anwendung . Zum Beispiel könnten Sie einen Benutzer mit einem Verzeichnis-Liste , aus der sie eine Access-Datenbank -Tabelle wählen können, um in der aktuellen Excel- Arbeitsmappe importieren bieten . Dieser Artikel basiert auf dem Projekt Excel Programmiersprache Visual Basic für Applikationen , VBA oder kurz . Sie können diese Sprache in jede Excel Aufgabe , die nicht erfordert Benutzereingriff automatisieren. Ein effektiver Weg, der diese Sprache zu lernen ist die Excel- " Makro aufzeichnen "-Befehl auf der Registerkarte "Entwicklertools" verwenden . Anleitung
1

Klicken Sie auf die Office-Schaltfläche die Schaltfläche "Optionen" , und klicken Sie dann auf den "Show -Entwickler" Kontrollkästchen, um die Registerkarte "Entwicklertools" offenbaren. Dieses Register hält Tasten für Visual Basic-Makros . Sie verwenden ein VBA- Makro, um die Dateien in einem Verzeichnis und speichern diese Liste in einer neuen Tabelle aufzulisten.
2

Klicken Sie auf die Registerkarte "Entwicklertools" und klicken Sie dann auf den " Visual Basic " -Taste, um geben Sie die Visual Basic -Programmierumgebung . Doppelklicken Sie auf den " Diese Arbeitsmappe " Artikel im Navigationsbereich auf links im Bildschirm. Diese Aktion öffnet ein neues Fenster, in dem die Programmierung Ihrer Verzeichnisliste Programm einzugeben.
3

Fügen Sie den folgenden Programm in der Programmiersprache Fenster . Dieses Programm verwendet die VBA-Funktion "Dir" , um ein Verzeichnis zu lesen. Die Ausgabe dieser Funktion ist eine einzelne Datei aus diesem Verzeichnis .

Option Explicit Public Sub

ListFiles ()

Dim d

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

MsgBox d

End Sub
4

Klicken Sie auf der Programm- Aussagen , und klicken Sie dann auf den " Run" -Menüs "Ausführen "-Befehl an das Programm auszuführen. Excel wird eine Meldung angezeigt, den Namen einer Datei in dem Ordner anzuzeigen "C: . \\ Windows"
5

Fügen Sie den folgenden Programm nach der "End Sub "-Anweisung des ersten Programms . Dieses Programm erstellt eine neue Arbeitsmappe und fügt einen Wert in einer ihrer Zellen . Ihre endgültige Programm, das Dateien eines Verzeichnisses listet werden die Aussagen in diesem Programm verwenden, um Dateinamen in eine neue Arbeitsmappe einzufügen.

Option Explicit Public Sub

MakeNewWorkbook ()

Arbeitsmappen . in

ActiveCell = "Hallo " End Sub

6

Führen Sie das Programm , wie Sie die vorherige getan hat, und klicken Sie dann auf den "Excel "-Symbol in der Windows- Taskleiste, um zu Excel zurückzukehren. Ihr Programm wird eine neue Arbeitsmappe , deren aktuelle Arbeitsblatt zeigt den Text "Hallo " in Zelle A1 .
7

Nutzungsbedingungen Schritt 2 die Anweisungen an die VBA-Programmierung Umgebung zurückzukehren , und fügen Sie das folgende Programm nach die "End Sub "-Anweisung des vorherigen Programms . Dieses Programm verwendet die "Dir" Funktion, um alle Dateien im Verzeichnis " C : \\ Windows " Ordner sammeln . Das Programm speichert jeden Dateinamen in einer eigenen Zeile in einer Tabelle eine neue Arbeitsmappe.

Option Explicit Public Sub

ListOneFile ()

Dim d

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

Workbooks.Add

tun, bis d = ""

ActiveCell = d

' nach unten bewegen

ActiveCell.Offset (1). Wählen

d = Dir

Schleife

End Sub
8

Führen Sie das Programm , wie Sie die vorherigen tat , und dann wieder auf Excel mit Schritt 6 der Anleitung . Du wirst sehen, eine neue Tabelle , deren Zellen eine Auflistung aller Dateien im Verzeichnis " C : \\ Windows " . Verzeichnis für