Удалить строки на основе выбранных ячеек в таблице

Question

Я пытался создать макрос, который, помимо прочего, удаляет строки в таблице, где столбец J пуст.Хотя столбец J не является действительно пустым, он пустой, потому что набор формул привел к пустому значению (формула ниже для справки).

=IFERROR(VLOOKUP([@[orig_site]],SITE_CLEAN,2,FALSE),"")

Я дошел до того, что копирую столбец J,вставляя значения по формуле, используя текст в столбце, чтобы сделать пустые ячейки действительно пустыми, выбирая пустые ячейки в столбце J, затем пытаясь выбрать Selection.EntireTow.Delete, но я продолжаю получать сообщение об ошибке «Ошибка времени выполнения» 1004': Ошибка удаления метода класса Range "

Range("OpenCycle_DATA[SITE_CLEAN]").Select
Application.CutCopyMode = False
Selection.Copy
Range("J2").Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
    :=False, Transpose:=False
Application.CutCopyMode = False
Selection.TextToColumns Destination:=Range("J2"), DataType:=xlFixedWidth, _
    FieldInfo:=Array(0, 1), TrailingMinusNumbers:=True
Range("OpenCycle_DATA[SITE_CLEAN]").Select
Selection.SpecialCells(xlCellTypeBlanks).Select
Selection.EntireRow.Delete