回答編集履歴
1
大文字
answer
CHANGED
|
@@ -13,5 +13,5 @@
|
|
|
13
13
|
For Each c In .AutoFilter.Range.Columns(1).SpecialCells(xlCellTypeVisible)
|
|
14
14
|
Worksheets("master").Range("C1").Value = Worksheets("block3正答").Range("F1")
|
|
15
15
|
Next c
|
|
16
|
-
End
|
|
16
|
+
End With
|
|
17
17
|
```
|