Проблема в массиве ячеек. Вы можете искать одну ячейку с помощью FIND
=(IF(IFERROR(FIND("AB",A4),0)>0,(A4),""))
будет искать в А4 подстроку "AB" и возвращать либо содержимое ячейки, либо пустую строку. Я думаю, вам нужно написать UDF, чтобы он работал с массивом ячеек
Public Function SearchCells(RangeToSearch As Range, TextToFind As String) As String
Dim r As Range
Dim a As String
For Each r In RangeToSearch
If InStr(r.Text, TextToFind) > 0 Then
a = r.Text
Exit For
End If
Next r
SearchCells = a
End Function