Excel VBA: Hvis X er tekst så gør noget ellers gør noget andet

I en vba-makro i ExcelXP foretager jeg nogle beregninger af tal i et regneark.
Hvis den aktuelle celle indeholder et tal skal værdien heraf divideres med 1000 og placeres i cellen ved siden af.  Hvis cellen indeholder en formel ... det samme.
MEN - Hvis cellen indeholder tekst, så skal der naturligvis ikke divideres med 1000 - det giver jo blot en #VÆRDI-fejl.
Der findes i vba en "property", som hedder "HasFormula", som kan checke om cellen indeholder en formel, men der findes ikke en tilsvarende "HasText" eller lignende.

Hvad gør jeg ?
Håber nogen har et godt råd.