excel - 编译错误：vba 中未定义子或函数

Question

我有一个带有三个按钮的用户表单。单击确定按钮时，我编写了以下代码：

Private Sub CommandButton2_Click()
   Call calculateCost
End Sub

我在 Sheet1 中编写的子方法是：

Public Sub calculateCost()
    Dim kilo As String
    kilo = Worksheets("Sheet1").TextBox1.Text
    MsgBox "value" & kilo
End Sub

当我运行代码时，我得到了错误。调用calculateCost 附近未定义子或函数。为什么会这样？如何解决这个问题。谢谢

Answer 1

将您的计算成本过程移动到标准模块（插入 - VBE 中的模块）。类模块中的过程，包括工作表类模块，不能这样调用。您可以通过其他方式从工作表的类模块中调用它，但我在您的过程中看不到任何需要它位于工作表模块中的内容，因此它可能属于标准模块。