回答編集履歴
2
脱字
test
CHANGED
|
@@ -26,7 +26,7 @@
|
|
|
26
26
|
|
|
27
27
|
やられた。さてはこれどっかのコピペを合体させてますね？
|
|
28
28
|
|
|
29
|
-
= Application.GetOpenFilename(...
|
|
29
|
+
csv = Application.GetOpenFilename(...
|
|
30
30
|
|
|
31
31
|
としているのですから、当然
|
|
32
32
|
|
1
勘違いしました。
test
CHANGED
|
@@ -17,3 +17,19 @@
|
|
|
17
17
|
のどちらかです。
|
|
18
18
|
|
|
19
19
|
VBAは内部的に自動型変換をしてくれることが多いですが、これを機会にチェックしてみるとよいでしょう。
|
|
20
|
+
|
|
21
|
+
|
|
22
|
+
|
|
23
|
+
---追記
|
|
24
|
+
|
|
25
|
+
|
|
26
|
+
|
|
27
|
+
やられた。さてはこれどっかのコピペを合体させてますね？
|
|
28
|
+
|
|
29
|
+
= Application.GetOpenFilename(...
|
|
30
|
+
|
|
31
|
+
としているのですから、当然
|
|
32
|
+
|
|
33
|
+
If csv <> "False" Then
|
|
34
|
+
|
|
35
|
+
としてください。OpenFileNameはどこにも存在してませんよ。
|