你能在这个简单的Excel VBA语法中找到我的错误吗

Question

我在Excel工作表中使用本教程示例，得到运行时错误"1004"：应用程序定义或对象定义的错误。

这是我的VBA。

Private Sub Worksheet_Calculate()
Worksheets("Input Quantities").Range("B51").Validation.InputMessage = Worksheets("Input Quantities").Range("B42")
End Sub

Answer 1

注释(保留答案中的注释(：

1. 如果Range("B51")没有应用任何验证，则此代码将失败。(您的原始错误(
2. 由于这在工作表的代码后面，所以可以使用Me而不是Worksheets("Input Quantities")。(修复了下标超出范围的错误-可能是工作表名称拼写错误或尾部空格(