質問編集履歴
2
title
CHANGED
|
File without changes
|
body
CHANGED
|
@@ -1,6 +1,6 @@
|
|
|
1
1
|
**ボールドテキスト**Access vba を用いてファイル数を取得しようとしているのですが、エラーになってしまいます。
|
|
2
2
|
|
|
3
|
-
実行時エラー5となるのは
|
|
3
|
+
実行時エラー5となるのはfor each~の箇所になります。
|
|
4
4
|
|
|
5
5
|
先輩が以前使用していたものを写しながら勉強中です。
|
|
6
6
|
原因が全く分からないのでアドバイスお願い致します。
|
1
title
CHANGED
|
File without changes
|
body
CHANGED
|
@@ -1,5 +1,7 @@
|
|
|
1
|
-
Access vba を用いてファイル数を取得しようとしているのですが、エラーになってしまいます。
|
|
1
|
+
**ボールドテキスト**Access vba を用いてファイル数を取得しようとしているのですが、エラーになってしまいます。
|
|
2
2
|
|
|
3
|
+
実行時エラー5となるのは太字で記載した箇所になります。
|
|
4
|
+
|
|
3
5
|
先輩が以前使用していたものを写しながら勉強中です。
|
|
4
6
|
原因が全く分からないのでアドバイスお願い致します。
|
|
5
7
|
|
|
@@ -34,7 +36,7 @@
|
|
|
34
36
|
|
|
35
37
|
Loop
|
|
36
38
|
'サブフォルダにてループ
|
|
37
|
-
For Each o_SubFile In o_File.GetFolder(s_Path).subfolders
|
|
39
|
+
**For Each o_SubFile In o_File.GetFolder(s_Path).subfolders**
|
|
38
40
|
|
|
39
41
|
Next
|
|
40
42
|
|