Buscar en validación.

17/05/2005 - 18:32 por cesar | Informe spam
Buenos días:

Cómo puedo hacer para crear un buscar para una lista de validación, ya que
si se usa el buscar común (Ctrl+B), no encuenta los valores de la lista de
validación, es decir, lo que necesito es que cuando le dé buscar me ponga en
la celda de validación el valor buscado, ¿Se podrá hacer esto?

De antemano gracias!

Preguntas similare

Leer las respuestas

#1 Héctor Miguel
18/05/2005 - 06:43 | Informe spam
hola, cesar !

... crear un buscar para una lista de validacion... (Ctrl+B), no encuenta los valores de la lista de validacion
... lo que necesito es que cuando le de buscar me ponga en la celda de validacion el valor buscado [...]



considerando que 'el origen' de una regla de validacion por lista puede ser un rango o una 'lista directa'...
se necesitaria [primero] seleccionar el 'rango de origen'... hacer el ctrl+b... y copiar a la celda [dizque] validada
y si la lista es por 'tecleo directo' [en el cuadro de referencia al origen de la validacion]... se necesitan macros
[con lo cual, la validacion ya no seria 'indispensable' NI 'funcional'] :-(
[mas bien] 'me da la impresion' de que lo que buscar es una manera de 'agilizar' una seleccion de elementos -?-
si he 'adivinado'... te copio/pego una consulta 'similar' y una propuesta usando combos de cuadro de controles
[seguramente la situacion sea -algo- diferente, pero puedes comentar que cambios serian necesarios] ;)

si cualquier duda [o informacion adicional]... comentas?
saludos,
hector.
sigue consulta y propuesta ==> ... una hoja ... columna (A) ... tengo que introducir nombres y apellidos
... para agilizar ... en otra hoja ... los posibles nombres ... y ... una validacion ... de permitir - lista [...]
... hacer que cuando empieze a escribir ... vayan apareciendo los ... que cumplan lo que hasta el momento haya escrito [...]



[hasta donde yo se] el objeto que 'cumple' con esa caracteristica es un 'combobox' [barra de 'cuadro de controles']
considerando que [de todas maneras] no te 'escaparias' de usar codigo, podrias hacer que [p.e.]...
-o- lo que 'se escriba en' [o seleccione de] el combo, se 'aplique' a la celda activa [siempre que sea de la columna 1 ('a')]
-o- si la celda activa NO es de la columna 'a', el combo NO 'tenga' nada 'que seleccionar'
-o- el rango [en la otra hoja] sea un nombre con referencia a un rango 'dinamico' [por si lo vas a seguir de/creciendo]
p.e. en la 'otra' hoja [Hoja2?]
1) [menu] insertar / nombres -> definir...
2) nombre [p.e.] = ListadoDeNombres
3) se refiere a: -> =desref(hoja2!$a$1,,,contara(hoja2!$a:$a))
[inclusive] podrias escribir [en el combo] nombres que NO 'existan' en el listado [de 'la otra' hoja]
-> aun cuando los escribas [en el combo] y los 'plantes' [en la celda activa] SEGUIRAN 'ausentes' en el listado <-
-> un ejemplo para 'lograr' lo expuesto [puede mejorarse y/o 'adaptarse' segun 'necesidades']
en el modulo de codigo de 'la hoja' a la que pertenece el combo ==' el combo 'se llena' SOLO cuando la celda activa es de la columna 1 ['a'] '
Private Sub ComboBox1_GotFocus()
If ActiveCell.Column = 1 Then
ComboBox1.ListFillRange = "ListadoDeNombres"
ComboBox1.LinkedCell = ActiveCell.Address
Else: ComboBox1.LinkedCell = ""
End If
End Sub
' el combo 'se vacia' [invariablemente] al 'terminar' la operacion '
Private Sub ComboBox1_LostFocus()
ComboBox1.ListFillRange = ""
ComboBox1.LinkedCell = ""
ComboBox1 = ""
End Sub
' para 'agilizar' la entrada de datos con la tecla {enter} [cuando 'en' el combo] '
Private Sub ComboBox1_KeyDown( _
ByVal KeyCode As MSForms.ReturnInteger, _
ByVal Shift As Integer)
If KeyCode = vbKeyReturn Then SendKeys "{esc}"
End Sub
email Siga el debate Respuesta Responder a este mensaje
Ads by Google
Help Hacer una preguntaRespuesta Tengo una respuesta
Search Busqueda sugerida