回答編集履歴
2
脱字
answer
CHANGED
@@ -12,7 +12,7 @@
|
|
12
12
|
---追記
|
13
13
|
|
14
14
|
やられた。さてはこれどっかのコピペを合体させてますね?
|
15
|
-
= Application.GetOpenFilename(...
|
15
|
+
csv = Application.GetOpenFilename(...
|
16
16
|
としているのですから、当然
|
17
17
|
If csv <> "False" Then
|
18
18
|
としてください。OpenFileNameはどこにも存在してませんよ。
|
1
勘違いしました。
answer
CHANGED
@@ -7,4 +7,12 @@
|
|
7
7
|
If OpenFileName <> False Then
|
8
8
|
|
9
9
|
のどちらかです。
|
10
|
-
VBAは内部的に自動型変換をしてくれることが多いですが、これを機会にチェックしてみるとよいでしょう。
|
10
|
+
VBAは内部的に自動型変換をしてくれることが多いですが、これを機会にチェックしてみるとよいでしょう。
|
11
|
+
|
12
|
+
---追記
|
13
|
+
|
14
|
+
やられた。さてはこれどっかのコピペを合体させてますね?
|
15
|
+
= Application.GetOpenFilename(...
|
16
|
+
としているのですから、当然
|
17
|
+
If csv <> "False" Then
|
18
|
+
としてください。OpenFileNameはどこにも存在してませんよ。
|