Cadipas spain respondió:
Utiliza If IsNumeric(p) Then MsgBox "numero" Lo que quieras hacer con la condicción es cosa tuya, yo simplemente te digo si es numérico El ejemplo que he utilizado es: Sub pp() p = InputBox("numero o letra") If IsNumeric(p) Then MsgBox "numero" End...