excelのVisualBasic初心者です

質問

問題がわかりません(>_<)

課題(UserAveの作成)
選択したセルの範囲の平均を求めるユーザ定義関数を作成しなさい。ただし、セルには整数が入ってい

る ものとし、マクロ内でワークシート関数は使用しないこと。

この問題のコードがさっぱりです・・・
どなたか簡単でいいので教えていてだけないでしょうか・・・？

回答No.1

tom04

こんばんは！
色々書き方はあると思いますが、
ワークシート関数を使用せずにユーザー定義関数を！というコトですので、
一例です。

Function heikin(myRng As Range)
Dim c As Range
Dim cnt As Long
Dim myVal As Variant
For Each c In myRng
If c <> "" And IsNumeric(c) Then
cnt = cnt + 1
myVal = myVal + c
End If
Next c
heikin = myVal / cnt
End Function

こんな感じではどうでしょうか？m(_ _)m