Muy buenas!
es mi primera vez haciendo macros... y me he atorado en un problema que no se como resolver.
Tengo un documento donde quiero copiar datos filtrados de una pagina a otra, sin embargo cuando le doy la opcion al autofiltro mediante la macro que busque informacion que se que no tengo, me despliega todos los datos y esos me los muestra, cosa que no quiero.
Ejemplo:
En el plantel Abasolo el grupo 101 (1A) se encuentra la alumna Cristina Cruz (esto me lo muestra a la perfeccion)
pero si cambio el grupo al 102 (1B) (EN EL CUAL NO TENGO DATOS) me despliega todos los alumnos de todos los planteles y grupos
y me gustaria que en vez de eso mostrara un msgbox que diga "No se encuentran datos"
este es el codigo que estoy usando:
Sub Resultados()
'
' Resultados Macro
'
' Acceso directo: CTRL+q
Sheets("Sabana por grupo").Select
Rows("2:100").Select
Selection.ClearContents
Sheets("presabana Total").Select
ActiveSheet.Range("$A$1:$DI$19").AutoFilter Field:=8, Criteria1:= _
Worksheets("Reporte General").Range("B7")
ActiveSheet.Range("$A$1:$DI$19").AutoFilter Field:=6, Criteria1:= _
Worksheets("Reporte General").Range("D7")
ActiveWindow.SmallScroll Down:=-21
Range("A2:CZ80").Select
Selection.Copy
Sheets("Sabana por grupo").Select
ActiveWindow.SmallScroll Down:=-18
Range("A2").Select
ActiveSheet.Paste
Sheets("presabana Total").Select
ActiveSheet.Range("$A$1:$DI$80").AutoFilter Field:=8
ActiveSheet.Range("$A$1:$DI$80").AutoFilter Field:=6
Range("H3").Select
Sheets("Reporte General").Select
End Sub
subo el documento para mas informacion, todos los datos con el que cuenta son inventados...
Adjunto | Tamaño |
---|---|
resultados_tamizajes.xlsm | 9.2 MB |