【初月無料キャンペーン中】gooドクター

いつもお世話になります

今、フォルダを複数選択してfileを整理するプログラムを作成していますが
下記のようにAllowMultiSelect = Trueにしても複数選択できません
msoFileDialogFilePickerでは可能になるのですが、分かりましたら教えてください


With Application.FileDialog(msoFileDialogFolderPicker)
.Title = "フォルダを選択"
.AllowMultiSelect = True

'ファイルが選択された
If .Show = True Then
For i = 1 To .SelectedItems.Count
MyPath = .SelectedItems(i)
nnn = InStrRev(MyPath, "\")
moji2 = Mid(MyPath, 1, nnn)
moji1 = Mid(MyPath, nnn + 1)
With ListView2.ListItems.Add
.Text = moji1
.SubItems(1) = moji2
End With
Next i
Else
Exit Sub
End If
End With


以上、よろしくお願いいたします

gooドクター

A 回答 (1件)

このプロパティのヘルプには、以下のように書かれています。

フォルダを選択するダイアログでは使えないということのようです。

このプロパティは、[参照] (フォルダー参照) または [名前を付けて保存] ダイアログ ボックスには影響しません。これらのダイアログ ボックスでは複数のファイルを選択することはありません。
    • good
    • 0
この回答へのお礼

そーなんですね、残念

ありがとうございました
これからもよろしくお願い申し上げます

お礼日時:2018/05/07 08:59

お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!

このQ&Aを見た人はこんなQ&Aも見ています

gooドクター

このQ&Aを見た人がよく見るQ&A

人気Q&Aランキング