質問編集履歴
1
追記
test
CHANGED
|
File without changes
|
test
CHANGED
|
@@ -32,9 +32,11 @@
|
|
|
32
32
|
|
|
33
33
|
a(i) = Range(Cells(c_Cnt, "B"), Cells(c_Cnt, "D")).Value
|
|
34
34
|
|
|
35
|
+
c_Cnt = c_Cnt + 1
|
|
36
|
+
|
|
35
37
|
End If
|
|
36
38
|
|
|
37
|
-
|
|
39
|
+
|
|
38
40
|
|
|
39
41
|
Next i
|
|
40
42
|
|