Función SI e Inputbox

14/08/2003 - 20:55 por Mario Alberto | Informe spam
Hola:

Tengo la celda "A1" con validación de datos (lista del 1 al 20)
En la celda "C1" tengo la función "=buscarv(A1,Nombres,2,falso)"

Ahora bien, lo que necesito es que si en la celda "A1" selecciono
el 20, en lugar de darme el valor de la segunda columna del rango "Nombres"
me ejecute un "INPUTBOX" o me desproteja la celda para poder capturar un
nombre.

En principio pense cambiar la función por la siguiente
"=SI(A1 ,"NO SE QUE PONER",buscarv(A1,Nombres,2,falso)), pero precisamente
no se que poner, si la condición es verdadero para efectuar lo que quiero.

Gracias de antemano

Mario Alberto
 

Leer las respuestas

#1 Fernando Arroyo
15/08/2003 - 11:19 | Informe spam
Puedes usar una función personalizada como argumento del SI. Por ejemplo:

=SI(A1 ;MiFunción();BUSCARV(A1;nombres;2;FALSO))

y la función MiFunción:

Function MiFunción() As String
MiFunción = Application.InputBox(prompt:="¿Nombre?", Type:=2)
End Function

que iría en un módulo creado por ti (no en ThisWorkbook ni en ninguno de los de las hojas).
Un saludo.


Fernando Arroyo
MS MVP - Excel

"Mario Alberto" escribió en el mensaje news:%
Hola:

Tengo la celda "A1" con validación de datos (lista del 1 al 20)
En la celda "C1" tengo la función "=buscarv(A1,Nombres,2,falso)"

Ahora bien, lo que necesito es que si en la celda "A1" selecciono
el 20, en lugar de darme el valor de la segunda columna del rango "Nombres"
me ejecute un "INPUTBOX" o me desproteja la celda para poder capturar un
nombre.

En principio pense cambiar la función por la siguiente
"=SI(A1 ,"NO SE QUE PONER",buscarv(A1,Nombres,2,falso)), pero precisamente
no se que poner, si la condición es verdadero para efectuar lo que quiero.

Gracias de antemano

Mario Alberto


Preguntas similares