VBAでAverageifs

VBA初心者です。
ここでの質問を何度もすみません。

今、VBAでAverageifsのコードを作成しています。
今、M4～M99に時間が入力されており、O4~O99にデータが入っています。
M4~M99の値から1時間単位でのO列の平均をB61セルに結果を入力したいと考えています。
まず、下記のように0時台の平均を求められるように検索条件をシリアル値で入力してみました。
しかし下記マクロを実行すると、＜0.00の場所で「コンパイルエラー　型が一致しません」とエラーが出ます。
何がいけないのでしょうか。M列のデータはシリアル値になっています。
教えてください

Sub Macro3()

Range("B61").Value = Application.WorksheetFunction.AverageIfs(Range("O4:O99"), ">=0.00", Range("M4:M99"), "<0.04", Range("M4:M99"))

End Sub

No.1 ベストアンサー 回答者： CoalTar 回答日時： 2017/08/11 10:30

Range("B61").Value = Application.WorksheetFunction.AverageIfs(Range("O4:O99"), Range("M4:M99"), ">=0.00", Range("M4:M99"), "<0.04")

としたいのでは？

'Range("B61").Formula = "=AVERAGEIFS(O4:O99,M4:M99,"">=0"",M4:M99,""<0.04"")"
=averageifs(平均対象範囲,条件範囲,条件,...)

この回答へのお礼

あっ、順番が逆だったのですね。
お恥ずかしい。ありがとうございました

お礼日時：2017/08/11 22:44