Set ff = fs.GetFolder(フォルダパス)
Set ffs = ff.SubFolders
として、あるフォルダのサブフォルダコレクションffsを
For each V1 in ffs
debug.print v1
Next
で表示させたところ、ffsコレクションは名前順にならんでないことがわかった。
ffsにorder byを適用するメソッドってあるの？？？