我希望函数将一系列单元格作为参数并返回其乘积。
让我们为单元格假定以下值:

A1=5
A2=2
A3=3


让我们调用函数Multiply
=Multiply(A1:A3)将返回30(= 5×2×3)。

这是什么代码?我只是想使自己熟悉语法,这会有所帮助。

编辑:弄清楚了:

Function multiply(rng As Range)

    multiplied = 1

    For Each cell In rng
        multiplied = multiplied * cell.Value
    Next

    multiply = multiplied

End Function

最佳答案

您可以直接使用VBAPRODUCT版本,即

MsgBox WorksheetFunction.Product([a1:a3])

08-25 15:40