对象变量未设置错误，Visual Basic

Question

我继续在VBA中收到以下错误

“对象变量或未设置块变量”

我不知道为什么

我的代码是

Private Sub Worksheet_Calculate()
    Dim RNG As Range
    RNG = Sheet1.Range("C15:D55,G11,G12,G15,G18,G19")
End Sub

Sheet CodeName是正确的。

有人有什么想法吗？ 感谢

Answer 1

Range类型是Object类型，必须使用Set语句分配：

Private Sub Worksheet_Calculate()
    Dim RNG As Range
    Set RNG = Sheet1.Range("C15:D55,G11,G12,G15,G18,G19")
End Sub