Filtro



  • Filtro
    di Jellyfish data: 26/10/2012 12:45:45

    Ciao a tutti,

    Come faccio a disabilitare eventuali filtri nel file o in un foglio?

    Ho provato con la registrazione ma non distingue se c'è già il filtro o no. io vorrei un comando che diabilitasse il filtro sempre...

    Sapete come si fa?



  • di GIUS (utente non iscritto) data: 26/10/2012 12:57:22

    ciao, seleziona la riga che ha i filtri o le celle che hanno i filtri, vai in REVISIONE nella barra degli strumenti clicca ORDINA E FILTRA------ DISABILITA FILTRO AUTOMATICO



  • di Jellyfish data: 26/10/2012 13:04:39

    Grazie GIUS

    Il problema è che ho 30 fogli che potrebbero avere o non avere filtri... vorrei un comando per farlo con un clik ;)

    Ho provato a registrare quello che mi hai scritto ma il codice non distingue se c'è o meno il filtro e lo mette se non c'è e lo leva se lo trova... praticamente mi ribalta la situazione... a me serve uno che levi tutti i filtri, se presenti...



  • di Vecchio Frac data: 26/10/2012 15:54:19

    Ricordo che per un altro utente avevamo scritto questo pezzo di codice, che disabilita sia i filtri del filtro avanzato sia quelli del filtro automatico.
     
    Sub disable_filters()
    
        'disattiva eventuali filtri attivi
        If Foglio2.FilterMode = True Then
            Foglio2.ShowAllData
        End If
        AutoFilterMode = False
        
    End Sub






  • di GIUS (utente non iscritto) data: 26/10/2012 16:50:27

    non mi avevi specificato che avevi 30 fogli



  • di Jellyfish data: 26/10/2012 17:53:04

    GIUS hai perfettamente ragione! Sono sempre troppo imprecisa :(

    Vecchio Frac mi va bene disattivare i filtri automatici ma assolutmante non quelli avenzati (visto che i filtri automatici da disattivare sono du dei filtri avanzati hahahaha)

    Che modifica devo fare secondo te?



  • di Vecchio Frac data: 26/10/2012 20:38:31

    Allora ti basta impostare AutoFilterMode = False con un ciclo per tutti i fogli del Workbook:


     
    For Each sh In ThisWorkbook.Sheets
        sh.AutoFilterMode = False
    Next






  • di Jellyfish data: 28/10/2012 21:51:23


    Yes!!!

    Funziona!!!

    Grazie mille!!!