Как мне узнать, что находится в камере, чтобы я мог очистить их все одновременно?

Question

У меня есть таблица, которую я загружаю из другой SIS. Я пытаюсь использовать функцию COUNTA . Это показывает, что во всех клетках что-то есть, хотя в клетке ничего не видно. Я могу фильтровать и очищать содержимое, но это занимает много времени из-за количества столбцов. Как мне узнать, что находится в камере, чтобы я мог очистить их все одновременно?

Answer 1

Чтобы очистить ваши псевдо-пустые места, запустите этот короткий макрос:

Sub ClearPseudoEmpties()
    Dim r As Range

    For Each r In ActiveSheet.UsedRange
        If r.Value = "" And Application.WorksheetFunction.CountA(r) <> 0 Then
            r.ClearContents
        End If
    Next r
End Sub