Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
344to348
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
344to348
344to348
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Alle dateinamen eines ordners ermittel

Alle dateinamen eines ordners ermittel
01.12.2003 12:33:56
sepp
Hallo

Ich bräuchte ein makro wo ich in einer schleife alle dateinamen in eine variable
übergeben kann
danke
sepp

5
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Alle dateinamen eines ordners ermittel
01.12.2003 12:37:50
xXx
Hallo,
schau in die Hilfe zum FileSearch-Objekt, da ist das sehr gut beschrieben.

Gruß aus'm Pott
Udo
http://www.excelerator.de

P.S. Das Forum lebt auch von den Rückmeldungen der Frager an die Antworter!
AW: Alle dateinamen eines ordners ermittel
01.12.2003 12:39:23
Michael Scheffler

Sub test()
Dim strAlle As String
strAlle = Dir("c:\*.*")
Do While strAlle <> ""
strAlle = Dir
Debug.Print strAlle
Loop
End Sub

AW: Alle dateinamen eines ordners ermittel
01.12.2003 12:51:04
Lena
Ja, aber wo werden denn die Namen dann hingeschrieben bzw wie macht man das? Ich kenne nämlich den Befehl debug.print.stralle nicht. Was macht das?
Lena
Anzeige
AW: Alle dateinamen eines ordners ermittel
01.12.2003 13:07:14
chris b
Hallo Lena,
du kannst ja statt
"Debug.Print strAlle"
das schreiben
lz = ActiveSheet.Cells(Rows.Count, 1).End(xlUp).Row + 1
cells(lz,1) = stralle
der code könnte in etwa sso aussehen


Sub test()
Dim strAlle As String
strAlle = Dir("c:\*.*")
Do While strAlle <> ""
strAlle = Dir
lz = ActiveSheet.Cells(Rows.Count, 1).End(xlUp).Row +1
cells(lz,1) = stralle
Loop
End Sub



AW: Alle dateinamen eines ordners ermittel
01.12.2003 13:44:03
Lena
Jetzt kann ichs!
Danke

301 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige