Saltar al contenido
View in the app

A better way to browse. Learn more.

Ayuda Excel

A full-screen app on your home screen with push notifications, badges and more.

To install this app on iOS and iPadOS
  1. Tap the Share icon in Safari
  2. Scroll the menu and tap Add to Home Screen.
  3. Tap Add in the top-right corner.
To install this app on Android
  1. Tap the 3-dot menu (⋮) in the top-right corner of the browser.
  2. Tap Add to Home screen or Install app.
  3. Confirm by tapping Install.

proyecto filtrado de datos

publicado

tengo un proyecto amigos de filtrado

Sub filtro_prueba()

    
    
Range("A9").CurrentRegion.AutoFilter Field:=12, Criteria1:=Sheets("anexo").Range("b10").Value 'estatus es un texto
Range("A9").CurrentRegion.AutoFilter Field:=9, Criteria1:=Sheets("anexo").Range("b12").Value 'es una fecha
end sub

desde la fila 9 inician mis datos los cuales tienen un encabezado , lo que pretendo hacer es filtrar dos condiciones una de estatus y la otra es de fecha  solo que no me funciona  ojala me puedan ayudar 

Featured Replies

publicado

Buenas @juancyuky

No se entiende demasiado bien qué pretendes hacer.  Sube un archivo con algunos datos de ejemplo para comprobar por qué no te funciona.

Un saludo,

Tese

publicado

@juancyuky, tu problema es que "Range("A9").CurrentRegion" NO es la tabla que quieres filtrar. La dirección esa que pones es:

?Range("A9").CurrentRegion.Address
$A$1:$AC$20

A veces consultar la ventana inmediato te da estas sorpresas ;)

publicado

Así funciona:

With Range("A1").CurrentRegion.Offset(9)
   .AutoFilter
   .AutoFilter Field:=12, Criteria1:=Sheets("anexo").Range("b10").Value 'estatus es un texto
   .AutoFilter Field:=9, Criteria1:=Sheets("anexo").Range("b12").Value 'es una fecha
End With

Cuidado que con los datos de la hoja anexo que has subido, porqué no hay ninguna coincidencia,

publicado
  • Autor

gracias por sus aportaciones , ya funciona con el estatus, se mantine la parte fija arriba  solo  no me funciona cuando  se trata de la fecha no arroja datos 

filtrado.rar

publicado
  • Autor

Range("A9").CurrentRegion.AutoFilter Field:=9, Criteria1:=Sheets("anexo").Range("b12").Value 'es una fecha
 

publicado

Es evidente que no has analizado la respuesta que te he dado y que no entiendes el rango .CurrentRegion, el error está aquí: Range("A9").CurrentRegion.AutoFilter.

Prueba el adjunto.

filtrado.xlsm

Editado el por Antoni

publicado
  • Autor

si funciona la parte de estatus, corregi  un dato

Sub filtro_prueba()

With Range("A1").CurrentRegion.Offset(8) '<-------------------------------------tenia 9
   .AutoFilter
   .AutoFilter Field:=12, Criteria1:=Sheets("anexo").Range("b10").Value 'estatus es un texto
   .AutoFilter Field:=9, Criteria1:=Sheets("anexo").Range("b12").Value 'es una fecha

End With
End Sub

pero en fecha no me funciona el filtrado 

 

filtrado_foro.rar

publicado

En el último archivo que te he subido, el filtro funciona.

Archivado

Este tema está ahora archivado y está cerrado a más respuestas.

Configure browser push notifications

Chrome (Android)
  1. Tap the lock icon next to the address bar.
  2. Tap Permissions → Notifications.
  3. Adjust your preference.
Chrome (Desktop)
  1. Click the padlock icon in the address bar.
  2. Select Site settings.
  3. Find Notifications and adjust your preference.