Bagaimana cara menghapus baris yang tidak mengandung teks tertentu di Excel?
Mungkin beberapa dari Anda tahu cara menghapus seluruh baris saat berisi beberapa teks tertentu di Excel, tetapi jika Anda ingin seluruh baris saat tidak berisi teks tertentu, bagaimana Anda bisa melakukannya? Sekarang, ikuti tutorial ini, Anda mungkin menemukan cara untuk mengatasi masalah ini di Excel.
Hapus baris yang tidak mengandung teks tertentu dengan Filter
Hapus baris yang tidak mengandung teks tertentu dengan VBA
Hapus baris yang tidak mengandung teks tertentu dengan Kutools for Excel
Hapus baris yang tidak mengandung teks tertentu dengan Filter
Di Excel, fungsi Filter dapat dengan cepat membantu Anda memfilter baris yang tidak berisi teks tertentu, lalu Anda dapat memilihnya untuk dihapus.
1. Pilih kolom yang berisi teks yang akan Anda hapus barisnya, dan klik Data > Filter. Lihat tangkapan layar:
 |
 |
 |
2. Di header kolom, ada tombol filter, dan klik untuk membuka daftar drop-down, centang semua kecuali teks tertentu yang ingin Anda dasarkan. Lihat tangkapan layar:
3. Kemudian Anda hanya dapat melihat baris header dan baris yang tidak berisi teks tertentu yang difilter. Lihat tangkapan layar ：
4. Pilih semuanya kecuali baris tajuk, dan klik kanan untuk memilih Hapus Baris dari menu konteks. Lihat tangkapan layar:
5. Lalu klik Data > Filter sekali lagi, dan kemudian semua baris yang tidak mengandung teks tertentu akan dihapus. Lihat tangkapan layar:
 |
|
 |
Hapus baris yang tidak mengandung teks tertentu dengan VBA
VBA sangat berguna untuk operasi yang agak sulit di Excel, dan ikuti langkah-langkah di bawah ini untuk menghapus baris yang tidak berisi teks tertentu.
1. tekan Alt + F11 untuk menampilkan Microsoft Visual Basic untuk Aplikasi jendela.
2. Di jendela, klik Menyisipkan > Modul untuk menampilkan jendela modul baru, lalu salin kode VBA berikut ke jendela modul.
VBA: Hapus seluruh baris jika sel memang berisi teks tertentu.
Sub DeleteRowNoInclude()
'Update20140618
Dim xRow As Range
Dim rng As Range
Dim WorkRng As Range
Dim xStr As String
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
xStr = Application.InputBox("Text", xTitleId, "", Type:=2)
Application.ScreenUpdating = False
For i = WorkRng.Rows.Count To 1 Step -1
Set xRow = WorkRng.Rows(i)
Set rng = xRow.Find(xStr, LookIn:=xlValues)
If rng Is Nothing Then
xRow.Delete
End If
Next
Application.ScreenUpdating = True
End Sub
4. Lalu klik OK, dan ketikkan teks yang ingin Anda hapus basis barisnya ke dalam dialog pop-up lainnya. Lihat tangkapan layar:
5. klik OK, dan baris yang tidak mengandung Apple akan dihapus.
Hapus baris yang tidak mengandung teks tertentu dengan Kutools for Excel
Jika menurut Anda metode di atas tidak mudah untuk Anda, Anda dapat menggunakan Kutools untuk Excel's Pilih Sel Spesifik fitur.
Kutools untuk Excel mencakup lebih dari 300 alat Excel yang praktis. Gratis untuk mencoba tanpa batasan dalam 30 hari. Dapatkan Sekarang
1. Pilih kolom di mana Anda ingin menghapus baris yang tidak berisi teks tertentu, dan klik Kutools > Pilih Alat > Pilih Sel Spesifik. Lihat tangkapan layar:
2. Dan di Pilih Sel Spesifik dialog, periksa Seluruh baris, Lalu pilih Tidak mengandung, dan ketik teks tertentu ke dalam kotak teks, Anda juga dapat mengklik tombol rentang di Tipe khusus bagian untuk memilih sel yang berisi teks tertentu.
3. Lalu klik Ok, kemudian baris yang tidak mengandung teks tertentu dipilih, klik kanan untuk memilih Delete dari menu konteks. Lihat tangkapan layar:
4. Sekarang semua baris yang tidak mengandung teks tertentu dalam kisaran tersebut dihapus. Klik dia untuk informasi lebih lanjut tentang Select Specific Cells.
Artikel Relatif:
- Hapus seluruh baris jika sel tidak berisi nol di Excel
- Hapus baris yang tidak cocok dengan kriteria di lembar lain
Alat Produktivitas Kantor Terbaik
Tingkatkan Keterampilan Excel Anda dengan Kutools for Excel, dan Rasakan Efisiensi yang Belum Pernah Ada Sebelumnya. Kutools for Excel Menawarkan Lebih dari 300 Fitur Lanjutan untuk Meningkatkan Produktivitas dan Menghemat Waktu. Klik Di Sini untuk Mendapatkan Fitur yang Paling Anda Butuhkan...
Tab Office Membawa antarmuka Tab ke Office, dan Membuat Pekerjaan Anda Jauh Lebih Mudah
- Aktifkan pengeditan dan pembacaan tab di Word, Excel, PowerPoint, Publisher, Access, Visio, dan Project.
- Buka dan buat banyak dokumen di tab baru di jendela yang sama, bukan di jendela baru.
- Meningkatkan produktivitas Anda sebesar 50%, dan mengurangi ratusan klik mouse untuk Anda setiap hari!
