回答受付が終了しました

マクロ vbaでつまづいており助けてください。

画像

Visual Basic | Excel74閲覧xmlns="http://www.w3.org/2000/svg">500

回答(3件)

0

>データの個数が変わらない場合のvbaはわかるのですが ならば範囲を大きくとっておけばいいだけのこと、 =SUMPRODUCT((B5:B100="A")*1,C5:C100,D5:D100) とでもしておけばOK 数式ではなく変数に値を入れるなら 変数 = Evaluate("SUMPRODUCT((B5:B100=""A"")*1,C5:C100,D5:D100)") とか、

0

R = Cells(Rows.Count, "B").End(xlUp).Row Range("F5").Formula = "=SUMPRODUCT((B5:B" & R & "=""A"")*1,C5:C" & R & ",D5:D" & R & ")" で いいかと

0

最終行が固定されていなくて、VBAを使って数式を埋め込みたいという事でよいですか? Dim n As Long n = Cells(Rows.Count, "B").End(xlUp).Offset(1).Row Range("D14") = "=SUMPRODUCT((B5:B" & n & "=""A"")*1,C5:C" & n & ",D5:D" & n & ")"