Jump to content
Sign in to follow this  
joselopezitot

Filtro base de datos excel con macros

Recommended Posts

Hola amigos del Foro, tengo una macro que Filtra con un buscador textbox en una hoja excel y la macro funciona, pero sin embargo lo que necesito y no pude como hacerlo es que al momento de filtrar necesito que busque o filtre pero ignorando las filas que escondí en la hoja excel que son la fila 18 y 19...y al momento de filtrar muestra las filas. una ayuda por favor. gracias de ante mano...ahi les dejo el archivo adjunto.

Libro4.xlsm

Share this post


Link to post
Share on other sites

nHola

Siguiendo con tu idea y tu forma de hacerlo, pues creo que cambiado así esta parte, pues te servirá:

Private Sub TextBox1_Change()

Dim Criterio As String

    If Hoja1.TextBox1.Value <> "" Then
        Criterio = "*" & Hoja1.TextBox1.Value & "*"
        
        Range("A9").CurrentRegion.AutoFilter Field:=2, Criteria1:=Criterio
        Rows("18:19").EntireRow.Hidden = True
    Else
        Criterio = ""
        Range("A9").CurrentRegion.AutoFilter
        Rows("18:19").EntireRow.Hidden = True
    End If
    

End Sub

Comentas

Share this post


Link to post
Share on other sites

Hola nuevamente

De nada, pero ¿me podrías indicar en dónde mencionaste que podían ser otras filas? De ser esa tu meta, una forma es recorrer (previo a las instrucciones de filtro) todas las filas, guardar en una matriz los números de las filas ocultas y luego con esa misma matriz mantenerlas como tales después del filtro ¿manejas For Each y Array?

Share this post


Link to post
Share on other sites

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now

INFORMACIÓN BÁSICA SOBRE PROTECCIÓN DE DATOS

Responsable: Sergio Andrés Celemín

Finalidad: Moderar y responder comentarios de usuarios. Recuerda que la información que facilites es pública, y los datos que incluyas los leerá cualquier visitante de esta web, así como el avatar que poseas.

Legitimación: Consentimiento del interesado.

Destinatarios: Hetzner Online GmbH.

Derechos: Puedes ejercitar en cualquier momento tus derechos de acceso,
rectificación, supresión, oposición y demás derechos legalmente establecidos a
través del email sergio@ayudaexcel.com.

Información adicional: Encontrarás más información en la política de privacidad.

Sign in to follow this  



×
×
  • Create New...

Important Information

Privacy Policy