传递 Range 参数时出现错误 424

我是 VBA 新手，在这段非常简单的代码中遇到错误：

Sub sub1()
    Dim myCell As Range
    Set myCell = Sheet1.Cells(2, 2)
    sub2 (myCell)      '<<<<------- Error 424
End Sub

Sub sub2(x As Range)
    'not doing anything yet
End Sub

我正在接收Error 424当调用sub2 from sub1。在我看来，这应该有效，因为myCell是一个范围...有什么想法吗？

Ty 删除或者删除括号，或者添加Call ie:

Sub Opt1()
    Dim myCell As Range
    Set myCell = Sheet1.Cells(2, 2)
    sub2 myCell     
End Sub

Sub sub2(x As Range)
MsgBox x.Address
End Sub

or

Sub Opt2()
    Dim myCell As Range
    Set myCell = Sheet1.Cells(2, 2)
    Call sub2(myCell)
End Sub

Sub sub2(x As Range)
MsgBox x.Address
End Sub