Sortierte Liste von Dateinamen in einem Ordner in VBA?
Gibt es einen Weg, um eine sortierte Liste der Dateinamen eines Ordners in VBA? Bis jetzt kam ich mit
Dim fso As Object
Dim objFolder As Object
Dim objFileList As Object
Dim vFile As Variant
Dim sFolder As String
sFolder = "C:\Docs"
Set fso = CreateObject("Scripting.FileSystemObject")
Set objFolder = fso.GetFolder(sFolder)
Set objFileList = objFolder.Files
For Each vFile In objFileList
' do something '
Next vFile
aber es ist entscheidend, um sicher sein, die Reihenfolge der Verarbeitung der for-Schleife wird bestimmt durch die Datei-Namen...
Jede Hilfe dankbar!
InformationsquelleAutor Karsten W. | 2010-05-11
Du musst angemeldet sein, um einen Kommentar abzugeben.
Laden Sie ein VBA-Sortieren-routine wie diese: Rekursiv Quick Sort
Füllen Sie ein array mit den Dateinamen und einfach Sortieren, wie gezeigt,hier.
InformationsquelleAutor Mitch Wheat
Sieht aus wie Sie es tun können, indem mit einem
ADODB.RecordSet
. Es ist ein bisschen heavy-duty, aber hier's eine Referenz, das sollte Ihnen den Einstieg.InformationsquelleAutor dcp
Die Reihenfolge ist beliebig.
Wenn Sie zu Fuß über
objFileList
fügen Sie die Dateien in ein array, dann Sortieren Sie das array.InformationsquelleAutor Alex K.