Hola amigos.

Espero me puedan ayudar, tengo una lista de artículos con mas de 1000 ítem, necesito crear una macro en un cuadro de texto que al momento de digitar la primera letra busque y visualice a todos los artículos que comiencen con esa letra, si dígito una segunda letra busque y visualice a los artículos que su descripción empiecen con esas dos letras y así sucesivamente.

Adjunto un archivo como ejemplo.

Gracias por su apoyo y colaboración.

Saludos.

FELIX

BUSCAR POR CUADRO DE TEXTO.rar

Saludos.

Una opción sencilla:

1.-Nombre el rango de los productos utilizando la siguiente formula:

=DESREF(Hoja1!$B$5,,,CONTARA(Hoja1!$B:$)[/PHP]

[PHP]Nombre del rango: Productos[/PHP]

2.-Utilizando un ComboBox y colocando en el cuadro de propiedades de este en la propiedad:

[PHP]ListFillRange=Productos[/PHP]

3.-Colocando la siguiente macro en la Hoja1:

[PHP]Private Sub ComboBox1_Change()
ComboBox1.DropDown
End Sub[/PHP]

Funcionamiento:

Al ir dijitando en el ComboBox lo que buscas se ira desplegando la lista con los nombres proximos a lo que digitas.

Prueba el adjunto, y comentas.

Atte.

joshua

BUSCAR POR CUADRO DE TEXTO_Joshua.rar

Hola Joshua

Gracias Primeramente por asistirme, te comento.

la opción que me propones no me facilita la información del código y stock del articulo que es lo que me interesa y se encuentran en la lista, si se vinculara con la lista quedaría podría quedar.

Buscando, encontré una macro que me puede servir, pero falta adecuarla al propósito que busco, por favor dale una mirada haber que se puede hacer...

Private Sub TextBox1_Change()

Cells.Find(What:=TextBox1, After:=ActiveCell, LookIn:=xlFormulas, _

LookAt:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, _

MatchCase:=False, SearchFormat:=False).Activate

End Sub

Slds.

FELIX