Подпрограмма VBA, которая очищает ячейки в диапазоне - PullRequest
0 голосов
/ 20 марта 2020

У меня есть код, который я не могу заставить работать. Я пытаюсь взять значения в пределах диапазона и сбросить эти значения с пустой строкой (""). Любая помощь будет принята с благодарностью, спасибо!

Sub clear()
    Dim resultRng As Range
    Set resultRng = Worksheets("Search").Range("B4:B300")

    For i = 1 To resultRng.Count
    Dim emptystring As String
    emptystring = ""
    resultRng.Cells(i) = emptystring
    Next i
End Sub

1 Ответ

1 голос
/ 20 марта 2020

Нет необходимости в oop:

resultRng.Value = vbNullString

Или, может быть,

resultRng.ClearContents
...