質問編集履歴
2
誤字の修正
test
CHANGED
|
File without changes
|
test
CHANGED
|
@@ -102,9 +102,9 @@
|
|
|
102
102
|
|
|
103
103
|
Sheets("まとめ").Cells(num,1) = Sheets(1).Cells(j,i)
|
|
104
104
|
|
|
105
|
-
Sheets("まとめ").Cells(num,
|
|
105
|
+
Sheets("まとめ").Cells(num,2) = Sheets(1).Cells(j,i)
|
|
106
106
|
|
|
107
|
-
Sheets("まとめ").Cells(num,
|
|
107
|
+
Sheets("まとめ").Cells(num,3) = Sheets(1).Cells(j,i)
|
|
108
108
|
|
|
109
109
|
End If
|
|
110
110
|
|
1
誤字訂正
test
CHANGED
|
File without changes
|
test
CHANGED
|
@@ -98,13 +98,13 @@
|
|
|
98
98
|
|
|
99
99
|
Else
|
|
100
100
|
|
|
101
|
-
num = Sheets("まとめ").Cells(Rows.count,1).End(xlUp).Row
|
|
101
|
+
num = Sheets("まとめ").Cells(Rows.count,1).End(xlUp).Row + 1
|
|
102
102
|
|
|
103
|
-
Sheets("まとめ").Cells(
|
|
103
|
+
Sheets("まとめ").Cells(num,1) = Sheets(1).Cells(j,i)
|
|
104
104
|
|
|
105
|
-
Sheets("まとめ").Cells(
|
|
105
|
+
Sheets("まとめ").Cells(num,1) = Sheets(1).Cells(j,i)
|
|
106
106
|
|
|
107
|
-
Sheets("まとめ").Cells(
|
|
107
|
+
Sheets("まとめ").Cells(num,1) = Sheets(1).Cells(j,i)
|
|
108
108
|
|
|
109
109
|
End If
|
|
110
110
|
|