Am revenit cu ultima partea din seria Advanced Filter. Astazi vom parcurge sintaxa vba pentru Advanced Filter si vom vedea 3 exemple pentru aceasta optiune:
- Introducere Advanced Filter
- Exemple de setare a criteriilor de filtrare
- Complex criteria in Advanced Filter
- Advanced Filter in VBA
In VBA Advanced Filter are urmatoarea sintaxa:
expression
.AdvancedFilter(Action, CriteriaRange, CopyToRange, Unique)
- expression - este camp obligatoriu si reprezinta obiectul de tip Range din VBA. Pentru Advanced Filter, acesta poate fi o coloana, o regiune de celule sau o zona definita prin optiunea Named Range;
- Action - prezinta actiunea care se doreste prin aplicarea Advanced Filter. Este un camp obligatoriu si poate fi xlFilterCopy - datele sunt copiate intr-o zona definita sau xlFilterInPlace - filtrare in acelasi tabel;
- CriteriaRange - in acest camp se scrie adresa regiunii in care sunt setate criteriile pentru filtrare. Acest camp este optional. Daca este omis, filtrarea se face fara criterii;
- CopyToRange - acest camp se foloseste in cazul xlFilterCopy si se foloseste pentru a scrie adresa regiunii unde se doreste copierea datelor dupa filtare. Acest camp este optional.
- Unique - Acest camp se foloseste atunci cand se doreste filtrarea inregistrarilor unice. Argumentele pot fi TRUE, atunci cand se doreste filtrarea unica si FALSE cand nu se doreste acest lucru. In mod implicit, campul este setat pe FALSE.
Filtrarea in acelasi tabel (Filter in place)
La fel ca in articolele anterioare am folosit acelasi tabel. Codul VBA folosit pentru filtrarea tabelului conform unor criterii este:
Public Sub FilterInPlace()
Worksheets("Advanced filter").Range("A1:C29").AdvancedFilter _
Action:=xlFilterInPlace, _
CriteriaRange:=Worksheets("Advanced filter").Range("F1:F2")
End Sub
