[リストへもどる]
一括表示

投稿時間:2004/01/16(Fri) 00:06
投稿者名:ノリ
URL :
タイトル:
コモンダイアログについて
はじめまして。
コモンダイアログのFlagsでcdlOFNExplorer + cdlOFNAllowMultiselectを設定して
FileNameプロパティにて複数ファイルのパスを取得しようとしましたが、フォルダパスまでしか
取得できません。(ファイル名の取得が出来ない)
複数ファイル名の取得方法を知っている方がいましたら終えて下さい。よろしくお願いします。

投稿時間:2004/01/16(Fri) 00:58
投稿者名:花ちゃん
Eメール:
URL :
タイトル:
Re: コモンダイアログについて
下記を試して見て下さい。

Private Sub Command1_Click()
    Dim FilePath() As String
    Dim i As Long
    With CommonDialog1
        .InitDir = App.Path
        .Flags = cdlOFNExplorer Or cdlOFNAllowMultiselect
        .ShowOpen
        FilePath = Split(.FileName, vbNullChar)
        For i = LBound(FilePath) To UBound(FilePath)
            Debug.Print FilePath(i)
        Next i
    End With
End Sub

投稿時間:2004/01/16(Fri) 12:32
投稿者名:ノリ
URL :
タイトル:
Re^2: コモンダイアログについて
早速ためさせて頂きまして、無事ファイル名
を取得することができました。
大変有難うございました。