回答編集履歴
1
コード修正
test
CHANGED
|
@@ -30,7 +30,7 @@
|
|
|
30
30
|
|
|
31
31
|
A.Add Range("A" & i).Value, Format(Range("A" & i).Value,"yyyy/mm/dd")
|
|
32
32
|
|
|
33
|
-
On Error Goto
|
|
33
|
+
On Error Goto 0
|
|
34
34
|
|
|
35
35
|
Next
|
|
36
36
|
|