●EXCEL・VBA質問スレ ..
[2ch|▼Menu]
373:デフォルトの名無しさん
07/07/11 23:28:36
>>372
ちょっと邪道だけどこんなのでどうかな?
動いたらBrowseForFolderのオプションは調べてくれ。

Dim Shell
Dim Ret

Set Shell = CreateObject("Shell.Application")
Set Ret = Shell.BrowseForFolder(0, "選ばないか", 0)

If Not Ret Is Nothing Then
Debug.Print Ret.Items.Item.Path
End If



次ページ
続きを表示
1を表示
最新レス表示
スレッドの検索
類似スレ一覧
話題のニュース
おまかせリスト
▼オプションを表示
暇つぶし2ch

4213日前に更新/289 KB
担当:undef