VBA中文件夾中文件名的分類列表？

Question

有沒有辦法在VBA中獲取文件夾的文件名的排序列表？到現在爲止，我來到

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 

但可以肯定的for循環是通過文件名來確定的處理順序至關重要...

任何幫助表示讚賞！

Answer 1

下載VBA排序過程像這樣的：Recursive Quick Sort

填充數組與文件名稱和簡單的排序，如圖here。

Answer 2

看起來你可以使用ADODB.RecordSet來做到這一點。這有點沉重，但here'是一個參考，應該讓你開始。

Answer 3

順序是任意的。

當你走過objFileList將文件添加到一個數組，然後sort the array。