为什么和如何在excel中使用 "op"？

Question

如何在excel中使用op

我需要excel中的代码calc(A,B,op)，但我不知道 "这个'op'是什么 "以及如何使用它。你能告诉我代码

Answer 1

把这个功能放在VBA模块1中

Function calc(A As Long, B As Long, op As Integer) As Double

Dim dblResult As Double

    Select Case op
        Case 1
            dblResult = A - B
        Case 2
            dblResult = A * B
        Case 3
            dblResult = A / B
        Case else
            dblResult = A + B
    End Select

    calc = dblResult

End Function

在工作表中输入=calc(1,2,1) 结果将是-1

问候克里斯

Answer 2

非常感谢，我找到了简单的代码，我的问题（我没有写）。

Function calc(A,B,op)
If op= 1 then
Calc = A-B
End if
If op=2 then
Calc=A*B
End if
If op=3 then
Calc=A/B
End if
If op>3 then
Calc=A+B
End if 
End function