エクセルユーザー定義関数(1)

エクセル初心者です。
複数のセル範囲（例えばRange("A1:A100")）を入力させ、入力されたセル範囲すべてのセルを3乗した総和を求めるユーザー定義関数は作ること可能でしょうか？

Function Y(a As Range) As Variant

ここに、ａで選択されたセル全てを3乗して総和を求める関数Ｙを定義したい。

End Function

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

No.1 ベストアンサー 回答者： temtecomai2 回答日時： 2006/05/03 01:08

こんばんは。

こんなのとか。

Function y(a As Range) As Variant
Dim r As Range
Dim result As Variant
For Each r In a
result = result + r.Value ^ 3
Next
y = result
End Function