BrowseForFolderで逆順表示

質問

Excel2003のVBAでBrowseForFolderを使ってフォルダーを選択するダイアログボックスを出していますが、フォルダーが多く望むフォルダーを選択するにはダイアログボックスの下のほうへ移動しなければなりません。ダイアログボックス内のフォルダーが逆順に表示できれば一番上を選択できるので操作が簡単になるのでそうしたいのですが方法がわかりません。
ダイアログボックス内の表示を逆順にする方法をご存知の方よろしくご教授ください。

回答No.1

fumufumu_2006 · ベストアンサー

質問の回答ではありませんが、excel2002以降ならApplication.FileDialogを使うと選びやすいかもしれません。

Sub test()
With Application.FileDialog(msoFileDialogFolderPicker)
.InitialView = msoFileDialogViewList
If .Show Then
MsgBox .SelectedItems(1)
Else
MsgBox "キャンセルされた"
End If
End With
End Sub

お礼

BrowseForFolderでは表示順を変えることはできないようです。教えていただいた方法で解決できました。

ありがとうございました。