Применение данной функции можно найти при поиске, например, числа, сохраненного как текст. Визуально такую ошибку найти сложно в большом массиве, а вот "протянув" функцию можно быстро обнаружить такую ошибку.
Функция =ТИПЯЧЕЙКИ(ЯЧЕЙКА) имеет один обязательный аргумент:
Определение типа данных в указанной ячейке.
Код короткий, но весьма полезный!
Public Function ТИПЯЧЕЙКИ(ЯЧЕЙКА As Range) As String Select Case True Case Application.IsText(ЯЧЕЙКА): ТИПЯЧЕЙКИ = "Текст" Case IsEmpty(ЯЧЕЙКА): ТИПЯЧЕЙКИ = "Пусто" Case Application.IsErr(ЯЧЕЙКА): ТИПЯЧЕЙКИ = "Ошибка" Case Application.IsLogical(ЯЧЕЙКА): ТИПЯЧЕЙКИ = "Логика" Case IsDate(ЯЧЕЙКА): ТИПЯЧЕЙКИ = "Дата" Case InStr(1, ЯЧЕЙКА.Text, ":") <> 0: ТИПЯЧЕЙКИ = "Время" Case IsNumeric(ЯЧЕЙКА): ТИПЯЧЕЙКИ = "Число" End Select End Function