Expresion Regular

[chichibek]

bueno, que tal si comparas el valor ingresado con los criterios que mencionas no son validos (0961, ...) y entonces si es igual a uno de ellos que te diga el sistema que esos valores no son aseptados,

seria algo asi:

n = inpputbox("numero")
if n = "0961" or n = "09.." or "..." then
msgbox "malo... numero malo"
end if

----
que tal creo funcionaria, espero habeer entendido bien y aberte ayudado

saludes