Добрый день!

Считываю данные из excel файла:

k1 = .cells(p,3).Value
IF k1 <> "" then.........................

если поле не равняется "", то делать то-то и то-то......
а бывает что к1 получает данные всегда символьные, но иногда попадает что целые.
Как в таком случае проверять цисловое поле или символьное, а затем делать.....

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