Как посчитать количество пробелов в столбце?

Question

Я использую MS Excel 2016. Ниже код VBA выдает ошибку

Ошибка выполнения 1004 Ошибка приложения или Obj Defined

Я хочу подсчитать количество пробелы в колонке AT и везде, где есть пробелы, я хочу заменить их на «Nill». На листе 29000 строк.

Sub FillBlanks()
Dim cnt As Long
cnt=Range("AT:AT").Cells.SpecialCells(xlCellTypeBlanks).Count
On Error Resume Next
MsgBox cnt
End Sub

Answer 1

Попробуйте это:

Sub FillBlanks()
    Range("AT:AT").Replace What:="", Replacement:="NILL", LookAt:=xlWhole, SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False
End Sub