Как проверить или определить тип данных в ячейке?
В некоторых случаях вам может понадобиться определить тип данных в ячейках — например, пустая ячейка, ошибка, дата или что-то иное. Возможно, первым делом вы подумаете о функции ТИП в Excel, но она распознаёт лишь четыре типа данных и не даёт полной картины. Поэтому я расскажу вам об альтернативном методе, который эффективно решает эту задачу.
Проверка или определение типа данных с помощью пользовательской функции
Проверка или определение типа данных с помощью пользовательской функции
В Excel вы можете создать пользовательскую функцию, чтобы проверить тип данных. Выполните следующие шаги:
1. Удерживая клавиши Alt + F11, откройте окно Microsoft Visual Basic для приложений.
2. Нажмите Вставка > Модуль и вставьте следующий макрос в окно модуля.
Код VBA: Проверка или определение типа данных в Excel
Function CellType(pRange As Range)
'Updateby20140625
Application.Volatile
Set pRange = pRange.Range("A1")
Select Case True
Case VBA.IsEmpty(pRange): CellType = "Blank"
Case Application.IsText(pRange): CellType = "Text"
Case Application.IsLogical(pRange): CellType = "Logical"
Case Application.IsErr(pRange): CellType = "Error"
Case VBA.IsDate(pRange): CellType = "Date"
Case VBA.InStr(1, pRange.Text, ":") <> 0: CellType = "Time"
Case VBA.IsNumeric(pRange): CellType = "Value"
End Select
End Function
3. Затем сохраните и закройте этот код, вернитесь на лист и введите формулу =CellType(A1) в пустую ячейку рядом с вашим диапазоном данных. См. снимок экрана:

4. Затем перетащите маркер заполнения на ячейки, в которые нужно скопировать формулу, — и все типы данных автоматически подтянутся из соответствующих ячеек. См. снимок экрана:

Лучшие инструменты повышения продуктивности в Office
Раскройте весь потенциал Excel с помощью Kutools для Excel и ощутите эффективность как никогда раньше.Kutools для Excel предлагает более 300 расширенных функций для повышения продуктивности и Экономия времени.Нажмите здесь, чтобы получить нужную Вам функцию…
Office Tab добавляет в Office вкладки и значительно упрощает Вашу работу
- Включите редактирование и чтение во вкладках в Word, Excel, PowerPoint, Publisher, Access, Visio и Project.
- Открывайте и создавайте несколько документов во вкладках одного окна — вместо того чтобы использовать отдельные окна.
- Повышает вашу продуктивность на 50 % и экономит сотни кликов мышью каждый день!
Все надстройки Kutools — один установщик
Kutools for Office — набор надстроек для Excel, Word, Outlook и PowerPoint, а также Office Tab Pro, идеально подходящий командам, работающим с разными приложениями Office.
- Единый комплект— надстройки для Excel, Word, Outlook и PowerPoint + Office Tab Pro
- Один установщик, одна лицензия— настройка занимает считанные минуты (готово для MSI)
- Лучше работать вместе— оптимизированная продуктивность во всех приложениях Office
- 30-дневная полнофункциональная пробная версия— без регистрации и кредитной карты
- Лучшее соотношение цены и качества— экономия по сравнению с покупкой отдельных надстроек