Comprobar celda si formula o numero

hola, !

Existe en Excel una formula (no formato condicional) que verifique si una celda contiene un numero que deriva de una formula o no?
Ej.
FALSO=la referencia contiene un numero que no deriva de una formula
VERDADERO=la referencia contiene un numero que deriva de una formula
2 FALSO (el 2 es insertado a mano)
2 VERDADERO (el 2 deriva de una formula ej +A1)

no se si fuiste tu quien consulto +/- "lo mismo" bajo el seudonimo de "excelart" -???-
(de cualquier modo) te pego a continuacion la consulta y la propuesta ;)

si quieres que (ademas) te informe si es numero y cual y la referencia/formula/... que lo origina ?????
(obviamente) seria necesario "trabajar" mas con cualquiera de las alternativas, asi que...

si cualquier duda (o informacion adicional)... comentas ?
saludos,
hector.

== copiado/pegado consulta mencionada =

Lo que deseo es encontrar una funcion u otra manera para que excel reconozca
si el conteniido de una celda es una formula o los datos han sido digitados directamente por lo que son constantes.

op1: usando nombres definidos con macro-funciones del viejo excel v.4 (p.e.)
si suponemos que necesitas comprobar si 'A1' contiene formula desde 'B1'
(es decir, comprobando siempre la celda que esta a la izquierda de la que verifica)...

1) selecciona 'B1' OJO: es importante cual sea la celda 'activa' cuando se crea el nombre
2) (menu) insertar / nombre / definir
3) nombre: p.e. -> TieneFormula
se refiere a: -> =indicar.celda(48+0*hoy(),!a1) y... acepta
si excel ingles: -> =get.cell(48+0*now(),!a1)
nota el signo '!' para indicar la celda como relativa y SIN referencia a la hoja <= OJO
4) (todavia en B1) usa el nombre para comprobar si 'A1' contiene formua: =tieneformula
(donde uses el nombre, estara comprobando la celda que este una columna a su izquierda)

op2: la otra es definir una funcion personalizada +/- como la siguiente:
en un modulo de codigo estandar/general/normal/... ==Function TieneFormula(Celda As Range) As Boolean
TieneFormula = Celda(1,1).HasFormula
End Function

y la puedes llamar desde tu hoja de calculo (p.e.) =TieneFormula(a1)

si cualquier duda (o informacion adicional)... comentas ?
saludos,
hector.

p.d. mi sistema usa como separador de argumentos a la coma ',' NO al punto y coma ';' :D