Šiame straipsnyje mes sužinosime, kaip išgauti įrašą be kriterijų naudojant „Microsoft Excel“ VBA.
Paimkime pavyzdį, kad suprastume, kaip galime įdėti filtrą, pasirinkti kriterijus ir tada imtis reikiamų veiksmų:-
Turime duomenų diapazone A: G stulpelių, kuriuose A stulpelyje yra Pavadinimas, b stulpelyje yra Adresas, C stulpelyje yra miestas, D stulpelio regione, E stulpelyje, F stulpelyje telefono numeris ir G stulpelyje yra kriterijai.
Norime parašyti makrokomandą, kad būtų įdėtas filtras, tada filtruoti duomenis pagal stulpelį „Nėra duomenų“, o tada ištrinti „Nėra duomenų“. Tada nuimkite filtrą ir parodykite visus duomenis.
Norėdami išgauti įrašą naudojant ne kriterijus, atlikite toliau nurodytus veiksmus:
- Atidarykite VBA puslapį paspausdami klavišą Alt+F11
- Įdėkite modulį
- Tada vėl eikite į įterpimo meniu ir spustelėkite procedūrą, kur gausite procedūrą, jei nežinote, kaip pradėti makrokomandą
- Parašykite žemiau nurodytą kodą:
Sub Delete_NotEligible () ActiveSheet.Range ("$ A $ 1: $ G $ 15"). Automatinio filtravimo laukas: = 7, Criteria1: = "" Eilutės ("2:12"). Pasirinkite Selection.Delete Shift: = xlUp Range (" B1 "). Pasirinkite Selection.AutoFilter End Sub
- Norėdami paleisti kodą, paspauskite klaviatūros klavišą F5.
- Duomenys bus filtruojami, o pagal nustatytus kriterijus filtruoti duomenys bus ištrinti.
Kodo paaiškinimas:
- Mes nustatėme antraštės duomenų diapazoną, kad filtras būtų įtrauktas į tinkamumo stulpelio tuščių langelių kriterijus
- Nurodykite kodą, kad pasirinktumėte eilutę, tada ištrinsite visą eilutę
- Pabaigoje atidarykite filtrą
Tokiu būdu mes galime sudaryti filtrą pagal tam tikrus kriterijus ir ištrinti duomenis.
Jei jums patiko mūsų tinklaraščiai, pasidalykite jais su draugais „Facebook“. Taip pat galite sekti mus „Twitter“ ir „Facebook“.
Mes norėtume išgirsti jūsų nuomonę, praneškite mums, kaip galime patobulinti, papildyti ar naujovinti savo darbą ir padaryti jį geresnį. Parašykite mums el