回答編集履歴

1

追記

2018/04/05 08:30

投稿

ttyp03
ttyp03

スコア16998

test CHANGED
@@ -11,3 +11,25 @@
11
11
  ```
12
12
 
13
13
  あとはこれを全行にコピペ。
14
+
15
+
16
+
17
+ ---
18
+
19
+ 編集された質問を確認しました。
20
+
21
+ 範囲がE列を参照しています。
22
+
23
+ 集計範囲も11行目からになっています。
24
+
25
+ これでいけます。
26
+
27
+ ```VBA
28
+
29
+ Worksheets("集計").Cells(2, 4).Value = _
30
+
31
+ WorksheetFunction.sumif(Worksheets("データ").Range("D10:D73"), _
32
+
33
+ Worksheets("集計").Range("A2"), Worksheets("データ").Range("AL10:AL73"))
34
+
35
+ ```