Mündəricat
Bu qısa dərslik Excel-də hər bir digər sətirin filtrləmə və ya VBA kodu ilə necə silinəcəyini izah edir. Siz həmçinin hər 3-cü, 4-cü və ya hər hansı digər N-ci cərgənin necə silinəcəyini öyrənəcəksiniz.
Excel iş vərəqlərində alternativ sətirləri silməyiniz lazım olan bir çox vəziyyətlər var. Məsələn, siz datanı cüt həftələr (sətir 2, 4, 6, 8 və s.) saxlamaq və bütün tək həftələri (sətir 3, 5, 7 və s.) başqa vərəqə köçürmək istəyə bilərsiniz.
Ümumiyyətlə, Excel-də hər bir digər sətirin silinməsi alternativ cərgələrin seçilməsi ilə nəticələnir. Sətirlər seçildikdən sonra Sil düyməsinə bir vuruş kifayətdir. Bu məqalənin davamında siz Excel-də hər bir digər və ya hər N-ci sətiri tez seçmək və silmək üçün bir neçə üsul öyrənəcəksiniz.
Excel-də hər bir digər sətiri filtrləmə yolu ilə necə silmək olar
Əslində, Excel-də hər bir digər cərgəni silməyin ümumi yolu belədir: əvvəlcə alternativ sətirləri süzürsünüz, sonra onları seçin və hamısını birdən silirsiniz. Aşağıda ətraflı addımlar izlənilir:
- Orijinal məlumatınızın yanındakı boş sütuna sıfırlar və birlər ardıcıllığını daxil edin. Bunu birinci xanaya 0, ikinci xanaya isə 1 yazaraq, sonra ilk iki xananı kopyalayaraq və verilənlərin olduğu son xanaya qədər sütuna yapışdırmaqla bunu tez edə bilərsiniz.
Alternativ olaraq bu düsturdan istifadə edə bilərsiniz:
=MOD(ROW(),2)Düsturun məntiqi çox sadədir: ROW funksiyası cari sıra nömrəsini, MOD funksiyasını qaytarır.onu 2-yə bölür və qalanı tam ədədə yuvarlaqlaşdıraraq qaytarır.
Nəticədə bütün cüt sətirlərdə 0 (çünki onlar qalıqsız bərabər şəkildə 2-yə bölünür) və bütün tək sətirlərdə 1-ə sahibsiniz:
- Cüt və ya tək sətirləri silmək istəməyinizdən asılı olaraq, birləri və ya sıfırları süzgəcdən keçirin.
Bunu etmək üçün Köməkçi sütununuzda istənilən xananı seçin, Məlumat nişanına > Çeşidləndirin və Filtr edin qrupuna keçin və Filtr üzərinə klikləyin. düyməsi. Açılan filtr oxları bütün başlıq xanalarında görünəcək. Siz Köməkçi sütununda ox düyməsini klikləyin və xanalardan birini işarələyin:
- 0 cüt sətirləri silmək üçün
- 1 tək sətirləri silmək üçün
Bu misalda biz "0" qiymətli sətirləri siləcəyik, ona görə də onları süzgəcdən keçirəcəyik:
- İndi bütün "1" sətirləri gizlədilib, bütün görünən "0" sətirlərini seçin, seçimi sağ klikləyin və Sətri Sil üzərinə klikləyin:
- Yuxarıdakı addım sizi boş cədvəllə tərk etdi , lakin narahat olmayın, "1" sətirləri hələ də var. Onları yenidən görünən etmək üçün sadəcə olaraq Filtr düyməsini yenidən klikləməklə avtomatik filtri silin:
- C sütununda olan düstur qalan sətirlər üçün yenidən hesablanır, amma daha buna ehtiyacınız yoxdur. Siz indi Köməkçi sütununu təhlükəsiz şəkildə silə bilərsiniz:
Nəticədə iş vərəqimizdə yalnız cüt həftələr qalıb, tək həftələr yox oldu!
İpucu. Hər yerdə hərəkət etmək istəyirsinizsəbaşqa cərgəni tamamilə silmək əvəzinə başqa yerə köçürün, əvvəlcə süzülmüş cərgələri kopyalayın və yeni yerə yapışdırın, sonra isə süzülmüş sətirləri silin.
VBA ilə Excel-də alternativ sətirləri necə silmək olar
Excel iş vərəqinizdəki bütün digər sətirlərin silinməsi kimi əhəmiyyətsiz işə vaxtınızı sərf etmək istəmirsinizsə, aşağıdakı VBA makrosu prosesi sizin üçün avtomatlaşdıra bilər:
Sub Delete_Alternate_Rows_Excel() Dim SourceRange As Range Set SourceRange = Application.Selection Set SourceRange = Application.InputBox( "Range:" , "Select the range" , SourceRange.Address, Type :=8) Əgər SourceRange.Rows.Count >= 2 Əgər SourceRange.Rows.Count >= 2-dirsə, Birinci Hüceyrəni Aralıq kimi Dim Satır İndexini Tam Ədəd kimi Dəyişdirin Application.ScreenUpdating = RowIndex üçün False = SourceRange.Rows.Count - (SourceRange.Rows.Count Mod 2) 1 Addım -2 üçün FirstCell = SourceRange.Cells(RowIndex, 1) FirstCell.EntireRow.Delete Next Application.ScreenU = True. End If End SubMakrodan istifadə edərək Excel-də bütün digər sətirləri necə silmək olar
I Visual Basic Redaktoru vasitəsilə adi şəkildə makronu iş vərəqinizə daxil edin:
- Visual Basic for Applications pəncərəsini açmaq üçün Alt + F11 düymələrini basın.
- Üst menyu çubuğunda, Daxil et > Modulu üzərinə klikləyin və yuxarıdakı makronu Modula
- yapışdırın.Makronu işə salmaq üçün F5 düyməsini basın.
- Bir dialoq açılacaq və dialoq seçməyinizi təklif edəcək. Cədvəlinizi seçin və üzərinə klikləyinOK:
Bitti! Seçilmiş diapazondakı bütün digər sətirlər silinir:
Excel-də hər N-ci sətri necə silmək olar
Bu tapşırıq üçün biz filtrləməni genişləndirəcəyik bütün digər sıraları silmək üçün istifadə etdiyimiz texnika. Fərq filtrləmənin əsaslandığı düsturdadır:
MOD(ROW()- m, n)Burada:
- m verilənləri mənfi 1 olan ilk xananın sıra nömrəsidir
- n silmək istədiyiniz N-ci sətirdir
Deyək ki, məlumatlarınız 2-ci cərgədə başlayır və siz hər 3-cü sıranı silmək istəyirsiniz. Beləliklə, düsturunuzda n 3-ə bərabərdir və m 1-ə bərabərdir (sətir 2 minus 1):
=MOD(ROW() - 1, 3)
Əgər verilənlərimiz burada başlamışsa 3-cü sıra, onda m 2-yə bərabər olacaq (sətir 3 minus 1) və s. Bu düzəliş 1 rəqəmindən başlayaraq cərgələri ardıcıl nömrələmək üçün lazımdır.
Düsturun etdiyi nisbi sıra nömrəsini 3-ə bölmək və bölmədən sonra qalanı qaytarmaqdır. Bizim vəziyyətimizdə o, hər üçüncü sıra üçün sıfır verir, çünki hər üçüncü ədəd 3-ə qalıqsız bölünür (3,6,9 və s.):
İndi isə siz "0" sətirlərini filtrləmək üçün artıq tanış olan addımları yerinə yetirin:
- Cədvəlinizdə istənilən xananı seçin və Məlumat -də Filtr düyməsini klikləyin.
- Yalnız "0" dəyərlərini göstərmək üçün Köməkçi sütununu süzün.
- Görünən "0" sətirlərinin hamısını seçin, sağ klikləyin və kontekst menyusundan Sərqi Sil seçin.
- Filtri çıxarın vəKöməkçi sütununu silin.
Oxşar şəkildə siz Excel-də hər 4-cü, 5-ci və ya hər hansı digər N-ci sətirləri silə bilərsiniz.
İpucu. Aidiyyətsiz məlumatı olan cərgələri silməli olsanız, aşağıdakı təlimat faydalı olacaq: Hüceyrə dəyərinə əsaslanan sətirləri necə silmək olar.
Oxuduğunuz üçün təşəkkür edirəm və gələn həftə sizi yenidən bloqumuzda görməyə ümid edirəm. .
