最北端で暮らすSEのknowhow

人生の最終目標は気ままな老後生活

VBでフォルダ内のファイル名一覧を取得

Dim path As String
path = "C:\test"

Dim fileName As String
fileName = Dir(path & "\*.*", vbNormal)

Do Until fileName = ""
    Debug.Print fileName
    fileName = Dir
Loop

hiro