質問編集履歴
2
test
CHANGED
|
File without changes
|
test
CHANGED
|
@@ -2,7 +2,7 @@
|
|
|
2
2
|
|
|
3
3
|
|
|
4
4
|
|
|
5
|
-
実行時エラー5となるのは
|
|
5
|
+
実行時エラー5となるのはfor each~の箇所になります。
|
|
6
6
|
|
|
7
7
|
|
|
8
8
|
|
1
test
CHANGED
|
File without changes
|
test
CHANGED
|
@@ -1,4 +1,8 @@
|
|
|
1
|
-
Access vba を用いてファイル数を取得しようとしているのですが、エラーになってしまいます。
|
|
1
|
+
**ボールドテキスト**Access vba を用いてファイル数を取得しようとしているのですが、エラーになってしまいます。
|
|
2
|
+
|
|
3
|
+
|
|
4
|
+
|
|
5
|
+
実行時エラー5となるのは太字で記載した箇所になります。
|
|
2
6
|
|
|
3
7
|
|
|
4
8
|
|
|
@@ -70,7 +74,7 @@
|
|
|
70
74
|
|
|
71
75
|
'サブフォルダにてループ
|
|
72
76
|
|
|
73
|
-
For Each o_SubFile In o_File.GetFolder(s_Path).subfolders
|
|
77
|
+
**For Each o_SubFile In o_File.GetFolder(s_Path).subfolders**
|
|
74
78
|
|
|
75
79
|
|
|
76
80
|
|