differencier chiffre ou lettre

[bernard]

bonsoir a tous

je me suis lancer dans les macro,je viens de rencontrer un petit probleme
Dans le bout de code cidessous je souhaite effacer la cellule g5 si celleci n'est pas un nombre mais un mot

If Range("g5") ????? Then
Range("g5") = ""

merci a tous et bonne soiree

 

[CBernardT]

Bonsoir Bernard

essayes ce bout de code :

If Application.IsText(Range("G5")) = True Then
Range("G5").ClearContents


Cordialement

CBernardT

 

[bernard]

merci beaucoup et soiree