Buscar datos con Macros.

[karla12]

Okayy, uhm, ¿alguien por favor me podría ayudar con una tarea, por favor? No sé nada de macros, lo único que tengo hecho fue por ayuda de una amiga, pero ella ya no sabe como hacer lo siguiente:

Mi tarea es hacer una ficha de búsqueda de "biblioteca". Y lo que tengo que hacer es que en la hoja uno (inicio) escribiendo en las casillas de a lado o el autor, color, código, título, fecha (alguno de ellos, no escribir en todas), presione botón "buscar" y me dirija a la hoja 2 (base de datos), y seleccione lo que haya pedido.

Estoy demasiado perdida.

infooo..xlsm

[ikanni]

Hola Karla12,

Mira a ver sí te vale esto.

Saludos

Copia de infooo..xlsm

[Toldeman]

Hola.

Prueba asi:

Dim bs As Variant
bs = Range("D5,D7,D8,H5,H9").Find("*").Value
Hoja2.Select
Range("A1:H31").Find(what:=bs, lookat:=xlWhole).Select
End Sub

Un saludo.

 

[JSDJSD]

Hola a todos, karla12 te dejo mi opción pero con formulario, pulsa el botón verde y aparece el formulario de búsqueda, digita en el cualquier Título de libro, Autor, Código, Color o Año de publicación y te llevará a la hoja de Base de Datos resaltando el dato solicitado en el formulario. Prueba y comenta.

infooo. pRUEBA1.xlsm