Excel'de negatif değerler içeren satırlar nasıl silinir?
Aşağıdaki veri aralığına sahip olduğunuzu ve B sütunundaki sayı negatifse tüm satırları silmek istediğinizi varsayarsak, bu sorunu Excel'de çözmek için iyi yöntemler var mı?
 |
 |
 |
VBA kodunu kullanarak negatif sayı içeren satırları silin Kutools for Excel kullanarak negatif sayı içeren satırları silin |
VBA kodunu kullanarak negatif sayı içeren satırları silin
Aşağıdaki VBA kodu, belirli bir sütunda negatif sayılar varsa tüm satırları silmenize yardımcı olabilir, lütfen aşağıdaki işlemleri gerçekleştirin:
1. Basılı tutun ALT + F11 tuşlarını açmak için Uygulamalar için Microsoft Visual Basic pencere.
2. Tıkla Ekle > modülve aşağıdaki kodu Modül Penceresi.
VBA kodu: Negatif sayı içeren satırları silin
Sub Deleter()
'updatebyExtendoffice
Dim xRg As Range
Dim xCell As Range
Dim xTxt As String
Dim I As Long
On Error Resume Next
xTxt = ActiveWindow.RangeSelection.Address
Sel:
Set xRg = Nothing
Set xRg = Application.InputBox("please select the data range:", "Kutools for Excel", xTxt, , , , , 8)
If xRg Is Nothing Then Exit Sub
If xRg.Areas.Count > 1 Then
MsgBox "does not support multiple selections, please select again", vbInformation, "Kutools for Excel"
GoTo Sel
End If
If xRg.Columns.Count > 1 Then
MsgBox "does not support multiple columns, please select again", vbInformation, "Kutools for Excel"
GoTo Sel
End If
For I = xRg.Rows.Count To 1 Step -1
If xRg.Cells(I) < 0 Then xRg.Cells(I).EntireRow.Delete
Next
End Sub
3. Ve sonra tuşuna basın. F5 Bu kodu yürütmek için anahtar, komut kutusunda, lütfen negatif sayıları bulmak istediğiniz sayı sütununu seçin, ekran görüntüsüne bakın:
4. Sonra tıklayın OK düğmesi, negatif numaralı satırlar bir defada silindi.
Kutools for Excel kullanarak negatif sayı içeren satırları silin
Bu işi halletmek için, Kutools for Excel'S Belirli Hücreleri Seçin özelliği de size bir iyilik yapabilir, bu yardımcı program ile önce negatif değerleri içeren tüm satırları seçebilir ve ardından ihtiyacınız olan tüm satırları silebilirsiniz.
| Kutools for Excel : 300'den fazla kullanışlı Excel eklentisi ile 30 günde sınırlama olmaksızın ücretsiz deneyin. |
Kurduktan sonra Kutools for Excellütfen aşağıdaki işlemleri yapın:
1. Silmek istediğiniz negatif sayılar içeren sütunu seçin.
2. Sonra tıklayın Kutools > seç > Belirli Hücreleri Seçin, ekran görüntüsüne bakın:
3. In Belirli Hücreleri Seçin iletişim kutusunu seçin Tüm satır seçeneği Seçim türüve sonra seçim yapın Küçüktür itibaren Belirli tür Ve girin 0 kriterlerin yanındaki metin kutusuna bakın, ekran görüntüsüne bakın:
4. Sonra tıklayın Ok, negatif sayılar içeren satırlar aynı anda seçildi ve ardından Ana Sayfa > Sil > Sayfa Satırlarını Sil seçili satırları ihtiyaç duyduğunuz şekilde silmek için ekran görüntülerine bakın:
 |
|
 |
İpuçları： Ayrıca seçmek için sağ tıklayabilirsiniz Sil seçili satırları silmek için bağlam menüsünden.
En İyi Ofis Üretkenlik Araçları
Kutools for Excel ile Excel Becerilerinizi Güçlendirin ve Daha Önce Hiç Olmadığı Gibi Verimliliği Deneyimleyin. Kutools for Excel, Üretkenliği Artırmak ve Zamandan Tasarruf Etmek için 300'den Fazla Gelişmiş Özellik Sunar. En Çok İhtiyacınız Olan Özelliği Almak İçin Buraya Tıklayın...
Office Tab, Office'e Sekmeli Arayüz Getirir ve İşinizi Çok Daha Kolay Hale Getirir
- Word, Excel, PowerPoint'te sekmeli düzenlemeyi ve okumayı etkinleştirin, Publisher, Access, Visio ve Project.
- Yeni pencereler yerine aynı pencerenin yeni sekmelerinde birden çok belge açın ve oluşturun.
- Üretkenliğinizi% 50 artırır ve her gün sizin için yüzlerce fare tıklamasını azaltır!
