Loncat ke daftar isi utama

Bagaimana cara menghapus baris jika sel lebih besar / kurang dari nilai tertentu di Excel?

Terkadang Anda mungkin perlu menghapus baris jika sel di kolom tertentu lebih besar atau kurang dari nilai tertentu di Excel. Artikel ini akan merekomendasikan beberapa metode untuk mengatasi masalah ini.

Hapus baris jika sel lebih besar / kurang dari nilai tertentu dengan kode VBA
Hapus baris jika sel lebih besar / kurang dari nilai tertentu dengan Kutools for Excel
Hapus baris jika sel lebih besar / kurang dari nilai tertentu dengan Kutoos untuk Excel


Hapus baris jika sel lebih besar / kurang dari nilai tertentu dengan kode VBA

Misalkan Anda ingin menghapus seluruh baris jika sel di kolom D lebih besar atau kurang dari nilai tertentu di Excel. Anda dapat menjalankan kode VBA berikut untuk mencapainya.

1. tekan lain + F11 tombol secara bersamaan untuk membuka Microsoft Visual Basic untuk Aplikasi jendela.

2. Dalam Microsoft Visual Basic untuk Aplikasi window, klik Menyisipkan > modul. Kemudian salin dan tempel kode VBA di bawah ini ke jendela Kode.

Kode VBA: Hapus baris jika sel lebih besar / kurang dari nilai tertentu di Excel

Public Sub ProcessData()
    Dim xRg As Range
    Dim xTxt As String
    On Error Resume Next
    If ActiveWindow.RangeSelection.Count > 1 Then
      xTxt = ActiveWindow.RangeSelection.AddressLocal
    Else
      xTxt = ActiveSheet.UsedRange.AddressLocal
    End If
    Set xRg = Application.InputBox("Please select range:", "Kutools for Excel", xTxt, , , , , 8)
    If xRg Is Nothing Then Exit Sub
    If (xRg.Areas.Count > 1) Or (xRg.Columns.Count > 1) Then
        MsgBox "You can only select one column per time", vbInformation, "Kutools for Excel"
        Exit Sub
    End If
    xRg.Range("A1").EntireRow.Insert
    Set xRg = xRg.Range("A1").Offset(-1).Resize(xRg.Rows.Count + 1)
    xRg.Range("A1") = "Temp"
    xRg.AutoFilter 1, ">30000"
    Set xRg = Application.Intersect(xRg, xRg.SpecialCells(xlCellTypeVisible))
    On Error GoTo 0
    If Not xRg Is Nothing Then xRg.EntireRow.Delete
End Sub

Note: Pada kode di atas,> 30000 berarti Anda akan menghapus baris jika sel lebih besar dari 30000 pada kolom tertentu. Jika Anda ingin menghapus baris jika sel kurang dari nilai tertentu, harap ubah tanda> menjadi <dan kemudian tentukan nilai Anda.

3. tekan F5 kunci untuk menjalankan kode, di popping Kutools untuk Excel kotak dialog, pilih rentang (kolom tunggal) yang akan Anda temukan jika sel di kolom ini lebih besar atau kurang dari nilai tertentu. Dan kemudian klik OK tombol. Lihat tangkapan layar:

Kemudian semua baris dengan nilai sel lebih besar dari 30000 di kolom D akan segera dihapus.


Hapus baris jika sel lebih besar / kurang dari nilai tertentu dengan Kutools for Excel

Grafik Pilih Sel Spesifik kegunaan Kutools untuk Excel dapat membantu Anda memilih semua baris dengan sel lebih besar atau kurang dari nilai tertentu dalam kolom tertentu, lalu Anda dapat secara manual menghapus semua baris yang dipilih sekaligus.

Sebelum melamar Kutools untuk Excel, Mohon unduh dan instal terlebih dahulu.

1. Pilih kolom yang barisnya ingin Anda hapus, lalu klik Kutools > Pilih > Pilih Sel Spesifik. Lihat tangkapan layar:

2. Dalam Pilih Sel Spesifik kotak dialog, pilih Seluruh baris dalam Tipe pilihan bagian. Dalam Tipe khusus bagian, pilih Lebih besar dari or Kurang dari dari daftar drop-down pertama, masukkan nilai tertentu ke dalam kotak teks berikutnya, lalu klik OK .

3. Kemudian kotak dialog muncul untuk memberitahu Anda berapa banyak baris yang dipilih, silakan klik OK tombol. Dan Anda dapat melihat semua baris dengan nilai lebih dari 30000 di kolom D dipilih dengan segera.

4. Klik kanan pada salah satu baris yang dipilih, lalu klik Delete dari menu klik kanan. Dan semua baris yang dipilih dihapus.

  Jika Anda ingin memiliki uji coba gratis (30 hari) dari utilitas ini, silahkan klik untuk mendownloadnya, lalu lanjutkan untuk menerapkan operasi sesuai langkah di atas.


Hapus baris jika sel lebih besar / kurang dari nilai tertentu dengan Kutoos untuk Excel

Selain dua metode di atas, Anda dapat memfilter semua baris dengan sel yang lebih besar atau kurang dari nilai tertentu dalam kolom tertentu, lalu menghapus semua baris yang difilter dengan Hapus Baris & Kolom Tersembunyi (Terlihat) kegunaan Kutools untuk Excel.

Sebelum melamar Kutools untuk Excel, Mohon unduh dan instal terlebih dahulu.

1. Pilih tajuk kolom, lalu klik Data > Filter. Lihat tangkapan layar:

2. Klik panah drop-down di kolom yang akan Anda hapus barisnya, lalu klik Filter Angka > Lebih besar dari or Kurang dari seperti screenshot di bawah ini:

3. Dalam Filter Otomatis Kustom kotak dialog, masukkan angka tertentu setelah lebih besar dari atau lebih kecil dari kotak, dan kemudian klik OK .

4. Kemudian semua baris dengan sel tertentu yang lebih besar atau kurang dari nilai tertentu di kolom D semuanya disaring. Anda dapat menghapus semua baris yang difilter dengan memilih data yang difilter, lalu klik Kutools > Delete > Hapus Baris & Kolom Tersembunyi (Terlihat). Lihat tangkapan layar:

5. Dalam Hapus Baris & Kolom Tersembunyi (Terlihat) kotak dialog, pastikan file Dalam Rentang Terpilih opsi dipilih di Lihat kedalam daftar drop-down, pilih Baris dalam Hapus jenis bagian, tentukan opsi baris Terlihat di Jenis detail bagian, dan terakhir klik OK .

6. Kemudian semua baris yang terlihat dalam rentang yang dipilih akan segera dihapus, Anda dapat membatalkan filter dengan mengklik Data > Filter.

  Jika Anda ingin memiliki uji coba gratis (30 hari) dari utilitas ini, silahkan klik untuk mendownloadnya, lalu lanjutkan untuk menerapkan operasi sesuai langkah di atas.


Hapus baris jika sel lebih besar / kurang dari nilai tertentu dengan Kutools for Excel


Artikel terkait:

Alat Produktivitas Kantor Terbaik

Fitur Populer: Temukan, Sorot, atau Identifikasi Duplikat   |  Hapus Baris Kosong   |  Gabungkan Kolom atau Sel tanpa Kehilangan Data   |   Putaran tanpa Formula ...
Pencarian Super: VLookup Beberapa Kriteria    VLookup Nilai Berganda  |   VLookup di Beberapa Lembar   |   Pencarian Fuzzy ....
Daftar Drop-down Lanjutan: Buat Daftar Drop Down dengan Cepat   |  Daftar Drop Down yang Bergantung   |  Multi-pilih Drop Down List ....
Manajer Kolom: Tambahkan Jumlah Kolom Tertentu  |  Pindahkan Kolom  |  Alihkan Status Visibilitas Kolom Tersembunyi  |  Bandingkan Rentang & Kolom ...
Fitur Unggulan: Fokus Kisi   |  Tampilan Desain   |   Bar Formula Besar    Manajer Buku Kerja & Lembar   |  Perpustakaan Sumberdaya (Teks otomatis)   |  Pemetik tanggal   |  Gabungkan Lembar Kerja   |  Enkripsi/Dekripsi Sel    Kirim Email berdasarkan Daftar   |  Filter Super   |   Filter Khusus (filter tebal/miring/coret...) ...
15 Perangkat Teratas12 Teks Tools (Tambahkan Teks, Hapus Karakter, ...)   |   50 + Grafik jenis (Gantt Chart, ...)   |   40+ Praktis Rumus (Hitung usia berdasarkan ulang tahun, ...)   |   19 Insersi Tools (Masukkan Kode QR, Sisipkan Gambar dari Jalur, ...)   |   12 Konversi Tools (Angka ke Kata, Konversi Mata Uang, ...)   |   7 Gabungkan & Pisahkan Tools (Lanjutan Gabungkan Baris, Pisahkan Sel, ...)   |   ... dan banyak lagi

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 kte 201905


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!
Comments (2)
Rated 5 out of 5 · 1 ratings
This comment was minimized by the moderator on the site
Super. Thanks a lot.
Greetings from İstanbul
Rated 5 out of 5
This comment was minimized by the moderator on the site
Hi! How can I change your code (Delete Rows If Cell Is Greater/Less Than A Certain Value With VBA Code) if I would like it to work in every sheet in a workbook? I need it to delete the rows if date in column A is
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations