「Excel VBA ディレクトリのファイルを繰り返し処理」の版間の差分

2020年2月16日 (日) 04:25時点における最新版

Dim d  As String
Dim f  As String

d = "c:\"
f = d & "*"

f = Dir$(f, vbNormal)
Do While (Trim$(f) <> "")
    Debug.Print f
    f = Dir$
Loop

@@ 1行目: / 1行目: @@
-==Excel VBA ディレクトリのファイルを繰り返し処理==
+==[[Excel VBA ディレクトリのファイルを繰り返し処理]]==
-[[Excel VBA]] | {{category VBAソース片}}
+[[Excel VBA]] | [[Category:VBAソース片]]
   Dim d  As String