Помогите разобраться с Find

Я ищу пустую ячейку используя Find
...
With Worksheets(1).Range("B1:B7000")
-> Set c = .Find("", LookIn:=xlValues)
после этой строки выдаёт Ошибку 1004
Невозможно получить свойство Find класса
Range
...