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

質問

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

Function Y(a As Range) As Variant

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

End Function

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

回答No.1

temtecomai2 · ベストアンサー

こんばんは。
こんなのとか。

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