Kā filtrēt datus programmā Excel, izmantojot VBA

Šajā rakstā mēs uzzināsim, kā filtrēt datus un pēc tam to, kā mēs varam noteikt dažādus filtrēšanas kritērijus, izmantojot Microsoft Excel 2007 un jaunākās versijas VBA.

Kā ievietot filtru datos?

Lai saprastu, kā ievietot filtru, ņemsim piemēru:-

Mums ir dati diapazonā A1: E35, kurā A slejā ir mēnesis, B slejā lapa, C slejā Klikšķi, D slejas VKS un E slejā ir vidējā pozīcija.

Ja mēs vēlamies redzēt janvāra mēneša datus, tad filtrs jānovieto janvāra mēnesī. Lai ievietotu filtru caur VBA, rīkojieties šādi:-

Atveriet VBA lapu, nospiediet taustiņu Alt+F11.
Ievietojiet moduli.
Uzrakstiet zemāk minēto kodu:

Apakšfiltru dati ()

Diapazons ("A1"). Automātiskā filtra lauks: = 1, 1. kritērijs: = "Jan"

Beigt apakš

Koda skaidrojums:- Pirmkārt, mums ir jāizvēlas datu diapazons, kurā mēs vēlamies ievietot filtru, un tad mums ir jānosaka kritēriji.

Lai palaistu makro, nospiediet taustiņu F5, un dati tiks filtrēti, un mēs varam redzēt tikai Jan datus.

Kā ievietot filtru apakšējiem 10 priekšmetiem?

Lai saprastu, kā ievietot filtru 10 apakšējiem vienumiem, ņemsim piemēru:-

Mums ir dati diapazonā A1: E35, kurā A slejā ir mēnesis, B slejā lapa, C slejā Klikšķi, D slejas VKS un E slejā ir vidējā pozīcija.

Ja mēs vēlamies redzēt 10 zemākos klikšķus datos, mums jāveic šādas darbības:-

Atveriet VBA lapu, nospiediet taustiņu Alt+F11.
Ievietojiet moduli.
Uzrakstiet zemāk minēto kodu:

Apakšējais filtrs apakšā10 ()

Diapazons ("A1"). Automātiskā filtra lauks: = 3, 1. kritērijs: = "10", operators: = xlBottom10Items

Beigt apakš

Koda skaidrojums:- Pirmkārt, mums ir jāizvēlas datu diapazons, kurā mēs vēlamies ievietot filtru, un pēc tam mums ir jānosaka kritēriji, lai filtrētu 10 apakšējo vienumu datus.

Lai palaistu makro, nospiediet taustiņu F5, un dati tiks filtrēti, un mēs redzēsim tikai apakšējā klikšķa datus.

Kā ievietot filtru apakšējiem 10 procentiem datu?

Lai saprastu, kā ievietot filtru apakšējiem 10 procentiem datu, ņemsim piemēru:-

Mums ir dati diapazonā A1: E35, kurā A slejā ir mēnesis, B slejā lapa, C slejā Klikšķi, D slejas VKS un E slejā ir vidējā pozīcija.

Ja mēs vēlamies redzēt zemākos 10 procentu datus, mums jāveic šādas darbības:-

Atveriet VBA lapu un nospiediet taustiņu Alt+F11.
Ievietojiet moduli.
Uzrakstiet zemāk minēto kodu:

Apakšfiltrs apakšā 10 procenti ()

Diapazons ("A1"). Automātiskā filtra lauks: = 3, 1. kritērijs: = "10", operators: = xlBottom10Percent

Beigt apakš

Koda skaidrojums:- Pirmkārt, mums ir jāizvēlas datu diapazons, kurā mēs vēlamies ievietot filtru, un pēc tam mums ir jādefinē kritēriji, lai filtrētu zemāko 10 procentu datus.

Lai palaistu makro, nospiediet taustiņu F5, un dati tiks filtrēti, un mēs varam redzēt tikai apakšējos 10 procentu datus.

Kā ievietot filtru apakšējam X datu vienību skaitam?

Lai saprastu, kā ievietot apakšējo X numuru filtru, ņemsim piemēru:-

Mums ir dati diapazonā A1: E35, kurā A slejā ir mēnesis, B slejā lapa, C slejā Klikšķi, D slejas VKS un E slejā ir vidējā pozīcija.

Ja mēs vēlamies redzēt apakšējo x datu skaitu, mums jāveic šādas darbības:-

Atveriet VBA lapu, nospiediet taustiņu Alt+F11.
Ievietojiet moduli.
Uzrakstiet zemāk minēto kodu:

Apakšfiltrsbottomxnumber ()

Diapazons ("A1"). Automātiskā filtra lauks: = 3, 1. kritērijs: = "5", operators: = xlBottom10Items

Beigt apakš

Koda skaidrojums:- Vispirms mums ir jāizvēlas datu diapazons, kurā mēs vēlamies ievietot filtru, un pēc tam mēs norādījām kritērijus, lai filtrētu 5 apakšējo 10 numuru numurus.

Lai palaistu makro, nospiediet taustiņu F5, dati tiks filtrēti, un mēs redzēsim tikai 10 apakšējā klikšķa datus.

Kā ievietot filtru apakšējiem x procentiem datu?

Lai saprastu, kā ievietot filtru apakšējiem x procentiem datu, ņemsim piemēru:-

Mums ir dati diapazonā A1: E35, kurā A slejā ir mēnesis, B slejā lapa, C slejā Klikšķi, D slejas VKS un E slejā ir vidējā pozīcija.

Ja mēs vēlamies redzēt apakšējos x procentu datus, mums ir jāveic šādas darbības:-

Atveriet VBA lapu, nospiediet taustiņu Alt+F11.
Ievietojiet moduli.
Uzrakstiet zemāk minēto kodu:

Apakšfiltrs apakšāxpercent ()

Diapazons ("A1"). Automātiskā filtra lauks: = 3, 1. kritērijs: = "5", operators: = xlBottom10Percent

Beigt apakš

Koda skaidrojums:- Vispirms mums jāizvēlas datu diapazons, kurā mēs vēlamies ievietot filtru, un tad mums ir jānosaka kritēriji, lai filtrētu apakšējo x procentu datus.

Lai palaistu makro, nospiediet taustiņu F5, un dati tiks filtrēti, un mēs varēsim redzēt tikai apakšējos 10 procentu datus.

Kā ievietot filtru konkrētam tekstam?

Lai saprastu, kā ievietot filtru konkrētam, ņemsim piemēru:-

Mums ir dati diapazonā A1: E35, kurā A slejā ir mēnesis, B slejā lapa, C slejā Klikšķi, D slejas VKS un E slejā ir vidējā pozīcija.

Ja mēs vēlamies redzēt konkrētos datus tikai B slejā, mums ir jāveic šādas darbības:-

Atveriet VBA lapu un nospiediet taustiņu Alt+F11.
Ievietojiet moduli.
Uzrakstiet zemāk minēto kodu:

Papildu specifiskie dati ()

Diapazons ("A1"). Automātiskā filtra lauks: = 2, 1. kritērijs: = "*Exceltip*"

Beigt apakš

Koda skaidrojums:- Vispirms mums ir jāizvēlas datu diapazons, kurā mēs definēsim B sleju laukā kā 2, un tad mēs definēsim, kādus datus mēs vēlamies redzēt.

Lai palaistu makro, nospiediet taustiņu F5, dati tiks filtrēti, un mēs redzēsim, ka parādīsies tikai Exceltip dati.

Kā ievietot filtru vairākiem kritērijiem?

Lai saprastu, kā tieši ievietot filtru, ņemsim piemēru:-

Mums ir dati diapazonā A1: E35, kurā A slejā ir mēnesis, B slejā lapa, C slejā Klikšķi, D slejas VKS un E slejā ir vidējā pozīcija.

Ja mēs vēlamies redzēt janvāra un marta datus, mums jāveic šādas darbības:-

Atveriet VBA lapu, nospiediet taustiņu Alt+F11.
Ievietojiet moduli.
Uzrakstiet zemāk minēto kodu:

Apakšdaudzkārtējie dati ()

Diapazons ("A1: E1"). Automātiskā filtra lauks: = 1, Kritēriji 1: = "Jan", Operators: = xlAnd, Kritēriji 2: = "Mar"

Beigt apakš

Koda skaidrojums:- Vispirms mums jāizvēlas datu diapazons, kurā mēs definēsim lauku A sleju kā 1, un pēc tam definēsim abus kritērijus.

Lai palaistu makro, nospiediet taustiņu F5, un dati tiks filtrēti, un mēs redzēsim, ka tiks parādīti tikai janvāra un marta dati.

Kā ievietot filtru, lai parādītu ierakstus, kuru vērtība ir starp 2 vērtībām?

Lai saprastu, kā ievietot filtru vairākiem kritērijiem, ņemsim piemēru:-

Mums ir dati diapazonā A1: E35, kurā A slejā ir mēnesis, B slejā lapa, C slejā Klikšķi, D slejas VKS un E slejā ir vidējā pozīcija.

Ja mēs vēlamies ievietot filtru atbilstoši kritērijiem, cik daudz skaitļu mums ir zem klikšķiem no 5000 līdz 10000, rīkojieties šādi:-

Atveriet VBA lapu un nospiediet taustiņu Alt+F11.
Ievietojiet moduli.
Uzrakstiet zemāk minēto kodu:

Sub MultipleCriteria ()

Diapazons ("A1: E1"). Automātiskā filtra lauks: = 3, Kritēriji 1: = "> 5000", Operators: = xlAnd, Kritēriji 2: = "<10000"

Beigt apakš

Koda skaidrojums: - Vispirms mums jāizvēlas datu diapazons, kurā mēs definēsim kritērijus C slejā, izmantojot operatora funkciju.

Lai palaistu makro, nospiediet taustiņu F5, un dati tiks filtrēti, un mēs varam redzēt datus par klikšķiem, kas ir vairāk nekā 5000 un mazāk nekā 10000.

Kā ievietot vairāku kritēriju filtru vairākās kolonnās?

Lai saprastu, kā ievietot vairāku kritēriju filtru vairākās kolonnās, ņemsim piemēru:-

Mums ir dati diapazonā A1: E35, kurā A slejā ir mēnesis, B slejā lapa, C slejā Klikšķi, D slejas VKS un E slejā ir vidējā pozīcija.

Ja mēs vēlamies ievietot filtru janvāra mēnesī, lai redzētu, cik daudz saišu ir Excel ieteikumos. Tāpēc mums ir jāievieto filtrs A un B slejā, rīkojieties šādi:-

Atveriet VBA lapu, nospiediet taustiņu Alt+F11.
Ievietojiet moduli.
Uzrakstiet zemāk minēto kodu:

Vairāki lauki ()

Diapazons ("A1: E1"). Automātiskā filtra lauks: = 1, 1. kritērijs: = "Jan"

Diapazons ("A1: E1"). Automātiskās filtra lauks: = 2, 1. kritērijs: = "*Exceltip*"

Beigt apakš

Koda skaidrojums: - Pirmkārt, mums ir jāizvēlas datu diapazons, kurā mēs vēlamies ievietot filtru, un pēc tam 2 reizes jādefinē kritēriji, lai sasniegtu mērķi.

Lai palaistu makro, nospiediet taustiņu F5, un dati tiks filtrēti, un mēs varam redzēt, cik saišu pieder Exceltip janvāra mēneša datos.

Kā filtrēt datus, neizmantojot filtra bultiņu?

Lai saprastu, kā filtrēt datus, kolonnā neizmantojot filtru, ņemsim piemēru:-

Mums ir dati diapazonā A1: E35, kurā A slejā ir mēnesis, B slejā lapa, C slejā Klikšķi, D slejas VKS un E slejā ir vidējā pozīcija.

Ja mēs vēlamies ievietot filtru janvāra mēnesī un paslēpt filtra bultiņu laukā, rīkojieties šādi:-

Atveriet VBA lapu, nospiediet taustiņu Alt+F11.
Ievietojiet moduli.
Uzrakstiet zemāk minēto kodu:

Apakšējais slēpšanas filtrs ()

Diapazons ("A1"). Automātiskā filtra lauks: = 1, Kritēriji 1: = "Jan", redzamā lejupslīde: = Nepareizs

Beigt apakš

Koda skaidrojums: - Pirmkārt, mums jāizvēlas datu diapazons, kurā mēs vēlamies ievietot filtru, un pēc tam jāpārliecinās, ka filtram nevajadzētu būt redzamam.

Lai palaistu makro, nospiediet taustiņu F5, un dati tiks filtrēti. Tagad mēs varam redzēt datus tikai janvāra mēneša datos, bet filtra bultiņa neparādīsies mēneša slejā.

Kā filtrēt datus, lai parādītu 1 0r 2 Iespējamās vērtības?

Lai saprastu, kā filtrēt datus, lai parādītu 1 vai 2 iespējamās vērtības, ņemsim piemēru:-

Mums ir dati diapazonā A1: E35, kurā A slejā ir mēnesis, B slejā lapa, C slejā Klikšķi, D slejas VKS un E slejā ir vidējā pozīcija.

Ja mēs vēlamies ievietot filtru janvāra mēnesī un paslēpt filtra bultiņu laukā, mums jāveic šādas darbības:-

Atveriet VBA lapu, nospiediet taustiņu Alt+F11.
Ievietojiet moduli.
Uzrakstiet zemāk minēto kodu:

Apakšējais slēpšanas filtrs ()

Diapazons ("A1"). Automātiskā filtra lauks: = 1, Kritēriji 1: = "Jan", redzamā lejupslīde: = Nepareizs

Beigt apakš

Koda skaidrojums: - Pirmkārt, mums ir jāizvēlas datu diapazons, kurā mēs vēlamies ievietot filtru, un tad mēs pārliecināsimies, ka filtram nevajadzētu būt redzamam.

Lai palaistu makro, nospiediet taustiņu F5, un dati tiks filtrēti. Tagad mēs varam redzēt datus janvāra mēneša datos un februāra datos.

Kā ievietot filtru 10 populārākajām precēm?

Lai saprastu, kā ievietot 10 populārāko vienumu filtru, ņemsim piemēru:-

Mums ir dati diapazonā A1: E35, kurā A slejā ir mēnesis, B slejā lapa, C slejā Klikšķi, D slejas VKS un E slejā ir vidējā pozīcija.

Ja mēs vēlamies redzēt 10 populārākos klikšķus datos, mums ir jāveic tālāk norādītās darbības.-

Atveriet VBA lapu un nospiediet taustiņu Alt+F11.
Ievietojiet moduli.
Uzrakstiet zemāk minēto kodu:

Apakšējā virsma10 ()

Diapazons ("A1"). Automātiskā filtra lauks: = 3, 1. kritērijs: = "10", operators: = xlTop10Items

Beigt apakš

Koda skaidrojums- Pirmkārt, mums ir jāizvēlas datu diapazons, kurā mēs vēlamies ievietot filtru, un pēc tam mums ir jānosaka kritēriji, lai filtrētu datus no desmit labākajiem vienumiem.

Lai palaistu makro, nospiediet taustiņu F5, un dati tiks filtrēti, un mēs redzēsim tikai 10 populārākos klikšķu datus.

Kā ievietot filtru pirmajiem 10 procentiem datu?

Lai saprastu, kā ievietot filtru pirmajiem 10 procentiem datu, ņemsim piemēru:-

Mums ir dati diapazonā A1: E35, kurā A slejā ir mēnesis, B slejā lapa, C slejā Klikšķi, D slejas VKS un E slejā ir vidējā pozīcija.

Ja mēs vēlamies redzēt populārākos 10 procentu datus, mums jāveic šādas darbības:-

Atveriet VBA lapu, nospiediet taustiņu Alt+F11.
Ievietojiet moduli.
Uzrakstiet zemāk minēto kodu:

Apakšējā filtra virsma 10 procenti ()

Diapazons ("A1"). Automātiskā filtra lauks: = 3, 1. kritērijs: = "10", operators: = xlTop10Percent

Beigt apakš

Koda skaidrojums:- Vispirms mums jāizvēlas datu diapazons, kurā mēs vēlamies ievietot filtru, un tad mums ir jānosaka kritēriji, lai filtrētu datus no 10 procentiem.

Lai palaistu makro, nospiediet taustiņu F5, un dati tiks filtrēti. Tagad mēs varam redzēt tikai top 10 procentu datus.