excel - 基于单元格值的 VBA 选择

Question

我的代码返回错误。结果如愿，但错误消息相当烦人。我怎样才能摆脱这个？

Sub SELECTIE_VERZUIM()

Dim Cval As Variant
Dim Rng1 As Range
Cval = Sheet4.Range("A16").Value
Set Rng1 = Sheet4.Range("D1:T" & Cval).Select

End Sub

运行时错误“424”： 需要对象

标签： excelvba

Answer 1

尝试：

Sub SELECTIE_VERZUIM()

    Dim Cval As Variant

    Cval = Sheet4.Range("A16").Value

    Sheet4.Range("D1:T" & Cval).Select

End Sub

此外，您应该避免Select在 VBA 中使用