范围结束xldown不工作

Question

我正在尝试选择一行，然后CtrlShift结束，但没有.SELECT等......

        Set rng = wsDATA.Range("A8").EntireRow
        Set rng = Range(rng, rng.End(xlDown))

但我在第二行得到Application Defined or Object Defined Error。这是为什么？

Answer 1

我经常提醒的一件事是，当遇到问题时重新阅读代码并确保一切都合格。

在这种情况下，我应该在.range

之前使用我的工作表对象wsDATA

        Set rng = wsDATA.Range("A8:A8").EntireRow
        Set rng = wsDATA.Range(rng, rng.End(xlDown))