回答編集履歴

1

sumifsの追加

2021/01/07 00:51

投稿

radames1000
radames1000

スコア1925

test CHANGED
@@ -7,3 +7,13 @@
7
7
  .Cells(xRow, 48).Value = Evaluate("SumProduct((k:k = ""01"") * ((l:l = 2) + (l:l = 3)) * (m:m = 2) * av:av)")
8
8
 
9
9
  ```
10
+
11
+
12
+
13
+ SUMIFSでもいけましたね。失礼しました。※こちらも仮で範囲指定しています。
14
+
15
+ ```vba
16
+
17
+ .Cells(xRow, 48).Value = Evaluate("Sum(SumIfs(av25:av30,k25:k30,""01"",l25:30,{3,2},m25:m30,2))")
18
+
19
+ ```