0

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

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

但我Application Defined or Object Defined Error在第二行得到一个。为什么是这样?

4

1 回答 1

3

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

在这种情况下,我应该wsDATA在 .range 之前使用我的工作表对象

        Set rng = wsDATA.Range("A8:A8").EntireRow
        Set rng = wsDATA.Range(rng, rng.End(xlDown))
于 2012-10-28T13:59:07.133 回答