回答編集履歴
2
修正部分の構文ミスってたので再修正
test
CHANGED
@@ -184,7 +184,7 @@
|
|
184
184
|
|
185
185
|
If Dir(str_Pass) = "" Then
|
186
186
|
|
187
|
-
GetFileData_Txt
|
187
|
+
ReDim GetFileData_Txt(0)
|
188
188
|
|
189
189
|
Exit Function
|
190
190
|
|
1
自作関数入れちゃってたので削除
test
CHANGED
@@ -184,7 +184,9 @@
|
|
184
184
|
|
185
185
|
If Dir(str_Pass) = "" Then
|
186
186
|
|
187
|
-
|
187
|
+
GetFileData_Txt = ""
|
188
|
+
|
189
|
+
Exit Function
|
188
190
|
|
189
191
|
End If
|
190
192
|
|