使用MsgBox显示范围的错误13

Question

在以下代码的第4行中，我遇到了类型不匹配：

If Intersect(rngBay6.Offset(10, 0), rngBay9.Offset(7, 0)) Is Nothing Then
    MsgBox "No intersection"
Else
    MsgBox Intersect(rngBay6.Offset(10, 0), rngBay9.Offset(7, 0))
End If

rngBay6和rngBay9都是在偏移后每个范围相交的子集的范围。我不知道这是怎么回事.

Answer 1

抱歉，刚刚发现了错误。忘记使用.Address。守则应如下：

If Intersect(rngBay6.Offset(10, 0), rngBay9.Offset(7, 0)) Is Nothing Then
    MsgBox "No intersection"
Else
    MsgBox Intersect(rngBay6.Offset(10, 0), rngBay9.Offset(7, 0)).Address
End If