Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちらをご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


	新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム

55663 / 76732

←次へ　｜　前へ→


	【25839】VBAでSumProduct関数を使用

ゆうき - 05/6/16(木) 11:10 -


	引用なし

	パスワード

いつもお世話になっております。ゆうきです。

現在VBAでSumProduct関数を使おうとして行き詰っています。

やりたい事：

A列に1～20の数字がランダムに入っている。
B列に1～3の数字がランダムに入っている。

ここで、A列で1かつB列で1,A列で1かつB列で2というような
『A列である条件を満たし、かつ、B列である条件を満たすセル数』を
カウントしたいのです。

現在、
Sub test()

Worksheets("結果集計用").Activate
　　
　 Range("C35").Value = Application.WorksheetFunction.
　　SumProduct((Range("A2:A300") = 1) * (Range("B2:B300") = 2))

End Sub

というようにVBAに書いているのですが
「型が一致しません」という実行時エラーが出てしまいます。

何か解決のヒントでも結構ですので、教えていただけませんでしょうか。
昨日からずっとハマりっぱなしで・・・。

よろしくお願いいたします。

0 hits

▼

【25839】VBAでSumProduct関数を使用 ゆうき 05/6/16(木) 11:10

≪