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

下面是我的Excel工作表，出现运行时错误“1004”：应用程序定义的错误或对象定义的错误

这是我的VBA

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

注释（在回答中保留注释）：

如果

范围（“B51”）

未应用任何验证，则此代码将失败。（你原来的错误）

由于这是工作表的代码隐藏，因此可以使用

Me

而不是

工作表（“输入数量”）

。（修复了下标超出范围的错误-可能是图纸名称拼写错误或尾随空格）

---

如果

工作表（“输入数量”）.Range（“B51”）

未应用任何验证，则该操作将失败。是的，请使用宏记录器进行练习，以了解代码的外观。宏记录器确实留下了大量代码，但可以清除OK，我对单元格应用了数据验证，现在它给了我运行时错误9，下标超出范围Hi DaveExcel，我试图在单元格上放置动态注释或验证消息。我不知道如何用宏录制器重新创建。请将

工作表（“输入数量”）

更改为

Me

。