Macro que me permita filtrar datos

Hola.
Por favor necesito ayuda para crear un macro en la que me permita filtrar información, me explico:
Tengo en la hoja 2 una base de datos, como ejemplo
sublinea código articulo
     8 1020 tornilo
     8 1030 tuerca
     9 1020 bombillo
Y en la hoja 1 quiero que por ejemplo al yo ingresarle en la celda A1 la sublinea 8, me muestre todos los datos relacionados a aublinea 8. La verdad lo quiero hacer más dinámico, sin necesidad de utilizar lo filtros de excel.
Muchas gracias
Cualquier colaboración este es mi correo gibsonf45@hotmail.com
1

1 respuesta

1
Respuesta de
Hola:
Te dejo una rutina para esto, que por supuesto deberás ajustar en algunos detalles.
Entrá al Editor (con Alt y F11), insertá un módulo y allí copiá lo siguiente:
Sub MacroFiltro()
' Macro grabada el 11/05/2008 por Elsamatilde
'defino el criterio para la col A
crit = ActiveSheet.Range("A1")
Sheets("Hoja2").Select
Range("A1").AutoFilter
Selection.AutoFilter Field:=1, Criteria1:=crit
ActiveSheet.Range("A2").CurrentRegion.Copy Destination:=Sheets("Hoja1").Range("A2")
Selection.AutoFilter
End Sub
Debieras limpiar previamente el rango de datos de la hoja1 antes de copiar nuevos datos.
Hola Elsamatilde.
Que pena por la demora en la respuesta, te quiero felicitar eso era justo lo que necesitaba, muchas gracias, eres una tesa para esto, me gustaría saber si tu tienes algunos links en donde encuentre tutoriales con ejemplos de macros.
Amigo mel
Añade un comentario a esta respuesta
Añade tu respuesta
Haz clic para o
Escribe tu mensaje
¿No es la pregunta que estabas buscando?
Puedes explorar otras preguntas del tema Microsoft Excel o hacer tu propia pregunta: