İçindekiler
Bu kısa eğitimde, Excel'deki diğer her satırı filtreleyerek veya VBA koduyla nasıl sileceğiniz açıklanmaktadır. Ayrıca her 3., 4. veya herhangi bir N'inci satırı nasıl kaldıracağınızı da öğreneceksiniz.
Excel çalışma sayfalarında alternatif satırları silmenizin gerekebileceği birçok durum vardır. Örneğin, çift haftalara ait verileri (2, 4, 6, 8, vb. satırlar) tutmak ve tüm tek haftaları (3, 5, 7, vb. satırlar) başka bir sayfaya taşımak isteyebilirsiniz.
Genel olarak, Excel'deki diğer her satırı silmek, alternatif satırları seçmeye indirgenir. Satırlar seçildikten sonra, tek bir vuruşla Silme Bu makalenin devamında, Excel'deki her bir satırı veya her N'inci satırı hızlı bir şekilde seçmek ve silmek için birkaç teknik öğreneceksiniz.
Excel'de filtreleme yaparak diğer her satırı silme
Esasen, Excel'de diğer tüm satırları silmenin yaygın bir yolu şudur: önce alternatif satırları filtrelersiniz, ardından bunları seçersiniz ve hepsini bir kerede silersiniz. Ayrıntılı adımlar aşağıda verilmiştir:
- Orijinal verilerinizin yanındaki boş bir sütuna bir dizi sıfır ve bir girin. Bunu, ilk hücreye 0 ve ikinci hücreye 1 yazarak, ardından ilk iki hücreyi kopyalayıp veri içeren son hücreye kadar sütunun aşağısına yapıştırarak hızlı bir şekilde yapabilirsiniz.
Alternatif olarak bu formülü de kullanabilirsiniz:
=MOD(ROW(),2)Formülün mantığı çok basittir: ROW işlevi geçerli satır numarasını döndürür, MOD işlevi bunu 2'ye böler ve kalanı tam sayıya yuvarlanmış olarak döndürür.
Sonuç olarak, tüm çift satırlarda 0 (çünkü kalansız olarak 2'ye eşit olarak bölünürler) ve tüm tek satırlarda 1 vardır:
- Çift veya tek satırları silmek isteyip istemediğinize bağlı olarak, birleri veya sıfırları filtreleyin.
Bunu yapmak için, Yardımcı sütununuzdaki herhangi bir hücreyi seçin ve Veri tab> Sırala ve Filtrele grubunu seçin ve Filtre düğmesini tıklayın. Açılır filtre okları tüm başlık hücrelerinde görünecektir. Yardımcı sütunundaki ok düğmesini tıklayın ve kutulardan birini işaretleyin:
- 0 çift satırları silmek için
- 1 tek satırları silmek için
Bu örnekte, "0" değerine sahip satırları kaldıracağız, bu yüzden onları filtreliyoruz:
- Artık tüm "1" satırları gizlendiğine göre, tüm görünür "0" satırlarını seçin, seçime sağ tıklayın ve Satır Sil :
- Yukarıdaki adım sizi boş bir tablo ile bıraktı, ancak endişelenmeyin, "1" satırları hala orada. Bunları tekrar görünür hale getirmek için, otomatik filtreyi Filtre düğmesine tekrar basın:
- C sütunundaki formül kalan satırlar için yeniden hesaplanır, ancak artık buna ihtiyacınız yoktur. Artık Yardımcı sütununu güvenle silebilirsiniz:
Sonuç olarak, çalışma sayfamızda sadece çift haftalar kaldı, tek haftalar yok oldu!
İpucu: Diğer tüm satırları tamamen silmek yerine başka bir yere taşımak isterseniz, önce filtrelenmiş satırları kopyalayıp yeni bir konuma yapıştırın ve ardından filtrelenmiş satırları silin.
Excel'de VBA ile alternatif satırlar nasıl silinir
Excel çalışma sayfalarınızdaki diğer tüm satırları silmek gibi önemsiz bir görevle zaman kaybetmek istemiyorsanız, aşağıdaki VBA makrosu bu işlemi sizin için otomatikleştirebilir:
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) If SourceRange.Rows.Count>= 2 Then Dim FirstCell As Range Dim RowIndex As Integer Application.ScreenUpdating = False For RowIndex = SourceRange.Rows.Count - (SourceRange.Rows.Count Mod 2) To 1Adım -2 Set FirstCell = SourceRange.Cells(RowIndex, 1) FirstCell.EntireRow.Delete Sonraki Application.ScreenUpdating = True End If End SubMakro kullanarak Excel'deki diğer her satırı silme
Makroyu çalışma sayfanıza her zamanki gibi Visual Basic Düzenleyicisi aracılığıyla ekleyin:
- Visual Basic for Applications penceresini açmak için Alt + F11 tuşlarına basın.
- Üst menü çubuğunda Ekleme > Modül 'ye yapıştırın ve yukarıdaki makroyu Modül
- Makroyu çalıştırmak için F5 tuşuna basın.
- Bir iletişim kutusu açılır ve sizden bir aralık seçmenizi ister. Tablonuzu seçin ve Tamam'a tıklayın:
Bitti! Seçilen aralıktaki diğer tüm satırlar silinir:
Excel'de her N'inci satır nasıl silinir
Bu görev için, diğer her satırı kaldırmak için kullandığımız filtreleme tekniğini genişleteceğiz. Aradaki fark, filtrelemenin dayandığı formüldedir:
MOD(SATIR()- m , n )Nerede?
- m veri içeren ilk hücrenin satır numarası eksi 1
- n silmek istediğiniz N'inci satırdır
Diyelim ki verileriniz 2. satırda başlıyor ve her 3. satırı silmek istiyorsunuz. O halde formülünüzde n 3'e eşittir ve m 1'e eşittir (satır 2 eksi 1):
=MOD(ROW() - 1, 3)
Verilerimiz 3. satırda başladıysa, o zaman m Bu düzeltme, satırları 1'den başlayarak sırayla numaralandırmak için gereklidir.
Formülün yaptığı şey, ilgili bir satır numarasını 3'e bölmek ve bölme işleminden sonra kalanı döndürmektir. Bizim durumumuzda, her üçüncü satır için sıfır verir çünkü her üçüncü sayı kalansız olarak 3'e bölünür (3,6,9, vb.):
Ve şimdi, "0" satırlarını filtrelemek için zaten bilinen adımları gerçekleştiriyorsunuz:
- Tablonuzdaki herhangi bir hücreyi seçin ve Filtre üzerindeki Veri
- Yardımcı sütununu yalnızca "0" değerlerini gösterecek şekilde filtreleyin.
- Görünür "0" satırlarının tümünü seçin, sağ tıklayın ve Satır Sil bağlam menüsünden.
- Filtreyi kaldırın ve Yardımcı sütununu silin.
Benzer bir şekilde, Excel'de her 4., 5. veya herhangi bir N. satırı silebilirsiniz.
İpucu: Alakasız veriler içeren satırları kaldırmanız gerekiyorsa, aşağıdaki eğitim yararlı olacaktır: Hücre değerine göre satırlar nasıl silinir?
Okuduğunuz için teşekkür ediyor ve gelecek hafta sizi tekrar blogumuzda görmeyi umuyorum.
