Valutazione 4.87/ 5 (100.00%) 5838 voti

Condividi:        

automatizzare filtro automatico con più opzioni

Vuoi potenziare i tuoi documenti Word? Non sai come si fa una macro in Excel? Devi creare una presentazione in PowerPoint?
Oppure sei passato a OpenOffice e non sei sicuro di come lavorare al meglio?

Moderatori: Anthony47, Flash30005

automatizzare filtro automatico con più opzioni

Postdi libraio » 30/10/18 19:30

S.O. WINDOWS 7 Professional
Office 2003

In un foglio excel 2003 applico la seguente macro

Sheets("Foglio1").Select
Columns("G:G").Select
Selection.AutoFilter
Selection.AutoFilter Field:=1, Criteria1:="Blu"
Columns("A:H").Select
Selection.Copy
Sheets("Foglio2").Select
ActiveSheet.Paste

Poichè i criteri su cui applico il Filtro automatico sono diversi, chiedo se è possibile creare la macro in modo che chieda il criterio da applicare tra quelli inseriti in colonna "G2" del Foglio 1 (a titolo di esempio: Rosso, Bianco, Giallo...).
Spero di essere stato chiaro... io non ho trovato soluzioni.
Grazie a tutti
libraio
Utente Senior
 
Post: 272
Iscritto il: 04/01/10 20:31

Sponsor
 

Re: automatizzare filtro automatico con più opzioni

Postdi Anthony47 » 30/10/18 23:10

Il mio suggerimento e' che esplori l'uso del "filtro avanzato", come suggerito ad altro utente qui: viewtopic.php?p=646147#p646140

Vedi se puo' fare al caso tuo...

Oppure una semplice modifica al tuo codice potrebbe essere:
Codice: Seleziona tutto
Sheets("Foglio1").Select
myFilt = InputBox("Quale valore filtrare?")
Columns("G:G").Select
Selection.AutoFilter
Selection.AutoFilter Field:=1, Criteria1:=myFilt
Columns("A:H").Select
Selection.Copy
Sheets("Foglio2").Select
ActiveSheet.Paste

Come vedi di usa un InputBox per chiedere quale valore va filtrato

Ciao
Avatar utente
Anthony47
Moderatore
 
Post: 16601
Iscritto il: 21/03/06 16:03
Località: Ivrea

Re: automatizzare filtro automatico con più opzioni

Postdi libraio » 31/10/18 12:30

Grazie Anthony,
il codice nel box risponde perfettamente alle mie esigenze, ma mi riprometto di verificare anche il topic "per ulteriori sviluppi..."
libraio
Utente Senior
 
Post: 272
Iscritto il: 04/01/10 20:31


Torna a Applicazioni Office Windows


Topic correlati a "automatizzare filtro automatico con più opzioni":


Chi c’è in linea

Visitano il forum: Nessuno e 29 ospiti