Excel'deki hücre değerine dayalı satırlar nasıl kaldırılır?
Excel'deki hücre değerine bağlı olarak birden çok satırı hızlı bir şekilde silmek veya kaldırmak için, önce belirli hücre değerini içeren bu satırların tamamını seçmeniz ve ardından bunları kaldırmanız gerekebilir. Hücre değerine göre satırları silmenin ancak VBA kodunu kullanmanın hızlı bir yolu yok gibi görünüyor. İşte size yardımcı olacak bazı hızlı püf noktaları.
- Bul ve Değiştir işleviyle bir hücre değerine dayalı satırları kaldırın
- VBA kodu ile bir hücre değerine dayalı satırları kaldırın
- Satırları bir veya iki hücre değerine göre kaldırın
- Birden çok hücre değerine göre satırları kaldırın
Excel'de, belirli bir hücre değerine dayalı satırları kolayca kaldırmak için güçlü Bul ve Değiştir özelliğini uygulayabilirsiniz. Lütfen aşağıdaki işlemleri yapın:
1. Satırları belirli hücre değerine göre kaldıracağınız aralığı seçin ve düğmesine basarak Bul ve Değiştir iletişim kutusunu açın. Ctrl + F tuşlarını aynı anda
2. Bul ve Değiştir iletişim kutusunda, lütfen belirli hücre değerini yazın (bizim durumumuzda, sıcak) içine Find what kutusunu tıklayın ve Find All buton. Aşağıdaki ilk ekran görüntüsüne bakın:
3. Bul ve Değiştir iletişim kutusunun altındaki tüm arama sonuçlarını seçin ve bu iletişim kutusunu kapatın. (not: Arama sonuçlarından birini seçebilir ve ardından Ctrl + A bulunan tüm sonuçları seçmek için tuşlar. Yukarıdaki ikinci ekran görüntüsüne bakın.)
Ve sonra belirli bir değeri içeren tüm hücrelerin seçildiğini görebilirsiniz.
4. Seçili hücrelere sağ tıklayın ve Delete sağ tıklama menüsünden. Ve sonra kontrol edin Entire row Açılan Sil iletişim kutusundaki seçeneği ve OK buton. Şimdi belirli bir değeri içeren tüm hücrelerin kaldırıldığını göreceksiniz. Aşağıdaki ekran görüntülerine bakın:
Ve sonra tüm satırlar zaten belirli bir değere göre silindi.
Aşağıdaki VBA kodu ile belirli hücre değerine sahip satırları hızlı bir şekilde silebilirsiniz, lütfen aşağıdaki adımları uygulayın:
1. basın Alt + F11 anahtarları aynı anda açmak için Microsoft Visual Basic for applications pencere,
2. tıklayın Insert > Moduleve aşağıdaki kodu Modüle girin:
VBA: Hücre değerine göre tüm satırları kaldırın
Sub DeleteRows() 'Updateby20211217 Dim rng As Range Dim InputRng As Range Dim DeleteRng As Range Dim DeleteStr As String Dim xTitleId As String Dim xArr Dim xF As Integer Dim xWSh As Worksheet On Error Resume Next xTitleId = "KutoolsforExcel" Set rng = Application.Selection Set InputRng = Application.InputBox("Range :", xTitleId, rng.Address, Type:=8) If InputRng Is Nothing Then Exit Sub DeleteStr = Application.InputBox("Delete Text", xTitleId, Type:=2) Set xWSh = InputRng.Worksheet For Each rng In InputRng If rng.Value = DeleteStr Then If DeleteRng Is Nothing Then Set DeleteRng = rng Else Set DeleteRng = Application.Union(DeleteRng, rng) Set DeleteRng = DeleteRng.EntireRow End If End If Next xArr = Split(DeleteRng.AddressLocal, ",") DeleteRng.Select DeleteRng.Delete For xF = UBound(xArr) To 0 Step -1 Set DeleteRng = xWSh.Range(xArr(xF)) DeleteRng.Delete Next End Sub
3. Ardından, Run kodu çalıştırmak için düğmeye basın.
4. Açılan iletişim kutusunda, lütfen belirli bir değere göre satırları kaldıracağınız aralığı seçin ve OK düğmesine basın.
5. Başka bir iletişim kutusunda, lütfen satırları temel alarak kaldıracağınız belirli değeri yazın ve OK buton. Ekran görüntüsüne bakın:
Ve sonra, zaten belirtilen değere göre tüm satırların silindiğini göreceksiniz.
Yüklediyseniz Kutools for Excelonun Select Specific Cells özelliği, belirli bir değere sahip satırları hızlı bir şekilde silmenize yardımcı olabilir. Lütfen aşağıdaki işlemleri yapın:
2. Belirtilen Hücreleri Seç iletişim kutusunun açılışında lütfen kontrol edin Entire row seçeneğini seçin, Contains itibaren Specific type açılır listeyi seçin, belirtilen değeri sağdaki kutuya girin ve Ok düğmesi (Yukarıdaki ekran görüntüsüne bakın).
Bu özelliği uyguladıktan sonra, bir iletişim kutusu açılır ve belirtilen kriterlere göre kaç hücre bulunduğunu size gösterir. Lütfen tıklayın OK düğmesine basarak kapatın.
3. Şimdi belirli bir değere sahip tüm satırlar seçilir. Lütfen seçilen satırlara sağ tıklayın ve Delete sağ tıklama menüsünden. Aşağıdaki ekran görüntüsüne bakın:
not: Bu Select Specific Cells özelliği, satırları bir veya iki belirli değere göre silmeyi destekler. Belirtilen iki değere dayalı satırları silmek için lütfen başka bir değer belirtin. Specific type Aşağıdaki ekran görüntüsü gibi Belirli Hücreleri Seç iletişim kutusunun bölümü:
Bazı durumlarda, Excel'deki başka bir sütun / listeden birden çok hücre değerine dayalı satırları kaldırmanız gerekebilir. Burada tanıtacağım Kutools for Excel's Select Same & Different Cells hızlı bir şekilde kolaylıkla çözme özelliği.
2. Açılışta Select Same & Different Cells iletişim kutusu, lütfen aşağıdaki işlemleri yapın (ekran görüntüsüne bakın):
(1) Find values in kutusunda, lütfen belirli değerleri bulacağınız sütunu seçin;
(2) According to kutusu, lütfen satırları temel alarak sileceğiniz birden çok değer içeren sütunu / listeyi seçin;
(3) Based on bölümü, lütfen kontrol edin Each row seçenek;
(4) Find bölümü, lütfen kontrol edin Same Values seçenek;
(5) Kontrol edin Select entire rows iletişim kutusunun altındaki seçenek.
not: Belirtilen iki sütun aynı başlığı içeriyorsa, lütfen My data has headers seçeneği.
3. Tıkla Ok Bu yardımcı programı uygulamak için düğmesine basın. Ve sonra bir iletişim kutusu çıkar ve kaç satırın seçildiğini gösterir. Sadece tıklayın OK düğmesine basarak kapatın.
Ve sonra belirtilen listedeki değerleri içeren tüm satırlar seçildi.
4. tıklayın Home > Delete > Delete Sheet Rows tüm seçili satırları silmek için.