回答編集履歴
1
コード修正
test
CHANGED
@@ -6,7 +6,7 @@
|
|
6
6
|
l = 1
|
7
7
|
For i = 1 To 20
|
8
8
|
For j = 1 To 6
|
9
|
-
Cells(i, j) = l
|
9
|
+
Worksheets(1).Cells(i, j) = l
|
10
10
|
' i = i + 1
|
11
11
|
l = l + 1
|
12
12
|
Next j
|