Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
216to220
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
216to220
216to220
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Dateinamen einlesen

Dateinamen einlesen
13.02.2003 16:30:30
Achim
Hallo Leute,

ich habe in einem Ordner mehrere hundert Dateien. Nun möchte ich die Dateinamen aus diesem Ordner auslesen und in Excel weiterverarbeiten.

Ich stelle mir das so vor, das der erste Dateiname in Zelle A1 erscheint, der 2. Dateiname in Zelle A2 u.s.w.

Habt ihr vielleicht ein Makro für mich?

Bisher wurde mir hier immer geholfen, vielleicht auch heute????


Vielen Dank im Voraus
Achim

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
Re: Dateinamen einlesen
13.02.2003 16:38:01
Michael Scheffler

Hi,

Hilfe etwas verändert:-)

Sub ShowFileList()
Dim fs, f, f1, fc, s
Set fs = CreateObject("Scripting.FileSystemObject")
Set f = fs.GetFolder("c:\")
Set fc = f.Files
lngrow = 1
For Each f1 In fc
Cells(lngrow, 1) = s & f1.Name
lngrow = lngrow + 1
Next
MsgBox s
End Sub

Gruß

Micha

@Michael Scheffler
13.02.2003 16:53:02
Achim

Hallo Michael,

ich wusste doch, dass man sich auf euch verlassen kann.

Ist doch schon ein WAHNSINNSFORUM hier :-)))))))))


Danke, danke, danke

Gruß
Achim

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige