Files unsortiert einlesen

• Files unsortiert einlesen von peteregloff vom 05.01.2007 12:09:28
• AW: Files unsortiert einlesen - von Ramses am 05.01.2007 12:30:19

Betrifft: Files unsortiert einlesen
von: peteregloff

Geschrieben am: 05.01.2007 12:09:28
Folgendes Programm list alle Datein innnerhalb einem Directory ein - aber leider sortiert nach Filename - wie kann ich die Dateien unsortiert oder nach einem andern Kriterium einlesen??

Sub SU_Open_File()
Dim sPath As String, sFile as string
Application.ScreenUpdating = False
sPath = "C:\PE-TMP\File-Nrn\"
sFile = Dir(sPath & "*.*")      ' 1. File wird eingelesen
Do While sFile <> ""
MsgBox sFile                ' Filename anzeigen
sFile = Dir()               ' nächstes File
Loop
Application.ScreenUpdating = False
End Sub

Betrifft: AW: Files unsortiert einlesen
von: Ramses

Geschrieben am: 05.01.2007 12:30:19
Hallo
"..wie kann ich die Dateien unsortiert.."
Das einlesen ist abhängig davon wie sie im Explorer dargestellt werden soll.
Wo ist das Problem ?
Was willst du denn eigentlich machen ?
Gruss Rainer

Excel-Beispiele zum Thema "Files unsortiert einlesen"
Tabellenblattnamen in ein Listenfeld einlesen	Gefilterte Daten in eine ListBox einlesen
Einlesen von Zellinhalten in Variablen	1000 Arbeitsblätter aus 1000 Arbeitsmappen einlesen
Tabellenblattnamen in eine ListBox einlesen	Text aus UserForm-Textbox in Variable einlesen
Blätter in ComboBox-Feld einlesen und auswählen	Dateinamen in Tabelle einlesen
Namen einer Arbeitsmappe einlesen