用最后一行定义范围并与活动单元格和范围相交

Question

我是 VBA 的新手，目前正在尝试在数据表中定义从 h11 列到 h 列最后一个数据行的范围，以便运行一个宏，如果activecell 在该范围内。

VB 在定义 rng1（可能还有 rng2）时告诉我 "Object Variable or With block variable not set"。

我想要关于两件事的反馈：我该怎么做才能修复此错误？修复第一个错误后，如何继续使用相交功能？

非常感谢所有帮助。我已经做了很长时间了，似乎被卡住了。我试过了 rng1 = range(range("H11") ,range("H" & Lastrow))。如果我可以做些什么来更快或更好地学习，请告诉我 - 非常感谢 youtube 视频或类似视频。

Dim rng1 As Range
Dim rng2 As Range
Dim lastrow As Long

lastrow = Range("H" & Rows.Count).End(xlUp).Row

rng1 = Range("H11:H" & lastrow)
rng2 = Range("I11:I" & lastrow)

'Sort on Product
    If Intersect(activecell, rng1) = True Then```

Answer 1

这两行应该是：

set rng1 = Range("H11:H" & lastrow)
set rng2 = Range("I11:I" & lastrow)

这样，相交函数应该是：

if not Intersect(activecell, rng1) is nothing then

用最后一行定义范围并与活动单元格和范围相交

Define range with last row & Intersect activecell and range

excel

vba

intersect