Criterio ricerca su 2 colonne diverse

Question

With sh1

        lRiga = .Range("A" & .Rows.Count).End(xlUp).Row

        .Range("A1:M" & lRiga).AutoFilter Field:=10, _

            Criteria1:=ordine

Con questo pezzetto di codice, applico il filtro automatico e alla decima colonna do come criterio di filtro il contenuto della variabile "ordine". E' possibile, avendo la variabile "numero", filtrare anche sulla prima colonna? 

Tipo questo che segue (che non funziona!):

With sh1

        lRiga = .Range("A" & .Rows.Count).End(xlUp).Row

        .Range("A1:M" & lRiga).AutoFilter Field:=10, _

            Criteria1:=ordine, Field:=1, _

            Criteria1:=numero

Grazie

Alfredo

Answer 1

.Range("A1:M" & lRiga).AutoFilter Field:=10, Field:=1, Criteria1:= CStr(numero)

dove numero è una variabile che contiene un valore numerico.

Scusandomi sempre per il modo maldestro con il quale mi esprimo e ringraziando anticipatamente Mauro per la sua Enorme Pazienza...

Se (se) ho compreso bene come funziona la soluzione proposta, non la posso applicare al mio problema. Con questo sistema userei  (CStr(numero)) lo stesso criterio di filtro per tutte e due le colonne.

Invece avrei bisogno di filtrare la colonna "A" con una variabile (numero) e la colonna "L" con un altra variabile (ordine) !

Grazie

Alfredo

Forse non ho capito io:

    .Range("A1:M" & lRiga).CurrentRegion.AutoFilter

    .Range("A1:M" & lRiga).AutoFilter Field:=1, Criteria1:=CStr(numero)

    .Range("A1:M" & lRiga).AutoFilter Field:=3, Criteria1:=CStr(ordine)

Per filtri multipli, vedi anche: Oggetto AutoFilter, nella guida del vb di Excel.

---

--

La soluzione, il codice ed i files sono forniti *così come sono* e l’autore declina ogni responsabilità per eventuali problemi causati dalla soluzione proposta se usata impropriamente. Create e utilizzate una copia del file per le vostre prove, *prima* di utilizzare la soluzione in files importanti.

--

Mauro Gamberini - Microsoft© MVP(Excel)

http://www.maurogsc.eu/

Answer 2

Grazie Mauro... risolto!

Grazie per il tempo dedicatomi e buon Natale.

Auguri a tutti !

Alfredo

Grazie per il cortese riscontro e contraccambio gli auguri.

---

--

La soluzione, il codice ed i files sono forniti *così come sono* e l’autore declina ogni responsabilità per eventuali problemi causati dalla soluzione proposta se usata impropriamente. Create e utilizzate una copia del file per le vostre prove, *prima* di utilizzare la soluzione in files importanti.

--

Mauro Gamberini - Microsoft© MVP(Excel)

http://www.maurogsc.eu/

Answer 3

Grazie Mauro... risolto!

Grazie per il tempo dedicatomi e buon Natale.

Auguri a tutti !

Alfredo

Answer 4

.Range("A1:M" & lRiga).AutoFilter Field:=10, Field:=1, Criteria1:= CStr(numero)

dove numero è una variabile che contiene un valore numerico.

Scusandomi sempre per il modo maldestro con il quale mi esprimo e ringraziando anticipatamente Mauro per la sua Enorme Pazienza...

Se (se) ho compreso bene come funziona la soluzione proposta, non la posso applicare al mio problema. Con questo sistema userei  (CStr(numero)) lo stesso criterio di filtro per tutte e due le colonne.

Invece avrei bisogno di filtrare la colonna "A" con una variabile (numero) e la colonna "L" con un altra variabile (ordine) !

Grazie

Alfredo

Answer 5

With sh1

        lRiga = .Range("A" & .Rows.Count).End(xlUp).Row

        .Range("A1:M" & lRiga).AutoFilter Field:=10, _

            Criteria1:=ordine

Con questo pezzetto di codice, applico il filtro automatico e alla decima colonna do come criterio di filtro il contenuto della variabile "ordine". E' possibile, avendo la variabile "numero", filtrare anche sulla prima colonna? 

Tipo questo che segue (che non funziona!):

With sh1

        lRiga = .Range("A" & .Rows.Count).End(xlUp).Row

        .Range("A1:M" & lRiga).AutoFilter Field:=10, _

            Criteria1:=ordine, Field:=1, _

            Criteria1:=numero

 

Grazie

Alfredo

 .Range("A1:M" & lRiga).AutoFilter Field:=10, Field:=1, Criteria1:= CStr(numero)

dove numero è una variabile che contiene un valore numerico.

---

--

La soluzione, il codice ed i files sono forniti *così come sono* e l’autore declina ogni responsabilità per eventuali problemi causati dalla soluzione proposta se usata impropriamente. Create e utilizzate una copia del file per le vostre prove, *prima* di utilizzare la soluzione in files importanti.

--

Mauro Gamberini - Microsoft© MVP(Excel)

http://www.maurogsc.eu/