excel - 範囲終了 xldown が機能しない

Question

行を選択してから CtrlShift を押し下げようとしていますが、.SELECT などはありません...

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

しかし、私Application Defined or Object Defined Errorは2行目に取得します。どうしてこれなの？

score 3 · Accepted Answer

私が常に思い出していることの 1 つは、問題が発生したときにコードを読み直して、すべてが適切であることを確認することです。

この場合、wsDATA.range の前にワークシートオブジェクトを使用する必要がありました。

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

1 に答える 1