Я новичок в VBA и stackoverflow.com тоже

Я использую этот код для удаления повторяющихся ячеек в столбце, где я копирую уникальные ячейки в следующий столбец, но при подсчете кода пустые непустые ячейки для уникальных данных Хорошо, но мне не нужно копировать пустую ячейку в новом столбце.

ActiveSheet.Range("BA4:BA59").AdvancedFilter _
Action:=xlFilterCopy, _
CopyToRange:=ActiveSheet.Range("BB4"), _
UNIQUE:=True

Я искал и нашел

SkipBlanks:=True

, но когда я добавляю это код идет в ад;)

Подскажите, пожалуйста, как пропустить пробелы и "" в градусах Цельсия. Столбец с дубликатами содержит формулы ЕСЛИ IF (A4 = "Печать"; "Текст для печати"; "") & IF (A4 = "Вырезать"; "Текст для вырезания"; "" ) Возможные результаты в клетках

Текст для печатиТекст для печати«»Текст для вырезанияТекст для вырезания

Так что мне нужно только в новой колонке

Текст для печатиТекст для вырезания

заранее спасибо