ファイル Filenameプロパティの使用例

VB&VBA
FROG ふろっぐ
 
  • オプション

    本文印刷

    お気に入りに追加

  • 検索

    Googlewwwjp-ia
     

    Googlewwwjp-ia
     
  • 情報

  • 関連

[VB&VBA][ファイル Filenameプロパティの使用例]
次の使用例は、[My Documents] フォルダに保存されている "cmd" で始まり、拡張子が付いているすべてのファイルを検索し、名前と保存場所を表示します。
Option Explicit

'
Set fs = Application.FileSearch
With fs
    .LookIn = "C:\My Documents"
    .Filename = "cmd*.*"
    If .Execute > 0 Then
        MsgBox .FoundFiles.Count & " 個のファイルが見つかりました。"
        For i = 1 To .FoundFiles.Count
            MsgBox .FoundFiles(i)
        Next i
    Else
        MsgBox "ファイルは見つかりませんでした。"
    End If
End With





Production Japan Import Application. Since 1998