當范圍取決於變量時，如何刪除選定的單元格范圍？

Question

我想刪除G123:P10000范圍內的單元格，但是G123的123值不斷變化，因此如何在提供范圍的同時提供變量。

下面可以使用一次，但我想根據名為“ count”的變量的值多次使用它，該變量每次運行都會更改，因此只能從該范圍刪除

Range("G123:P10000").Select
Selection.ClearContents

我嘗試了以下類似的操作，但無法正常工作

count = ActiveSheet.Range("A1").End(xlDown).Row
Range("G$count:P10000").Select
Selection.ClearContents

Answer 1

您需要對.Offset()和.Resize()進行范圍修改。

...
count = CountRows(ActiveSheet.Range("A1"))
ActiveSheet.Range("G1").Offset(count,0).Resize(10000-count,1).ClearContents

與

Public Function CountRows(ByVal r As Range) As Long
    If IsEmpty(r) Then
        CountRows = 0
    ElseIf IsEmpty(r.Offset(1, 0)) Then
        CountRows = 1
    Else
        CountRows = r.Worksheet.Range(r, r.End(xlDown)).Rows.Count
    End If
End Function