Daftar Isi
Tutorial singkat ini menjelaskan cara menghapus setiap baris lainnya di Excel dengan memfilter atau dengan kode VBA. Anda juga akan belajar cara menghapus setiap baris ke-3, ke-4, atau baris ke-N lainnya.
Ada banyak situasi ketika Anda mungkin perlu menghapus baris alternatif di lembar kerja Excel. Misalnya, Anda mungkin ingin menyimpan data untuk minggu-minggu genap (baris 2, 4, 6, 8, dll.) Dan memindahkan semua minggu ganjil (baris 3, 5, 7, dll.) Ke lembar lain.
Umumnya, menghapus setiap baris lain di Excel bermuara pada pemilihan baris alternatif. Setelah baris dipilih, satu goresan pada tombol Hapus Lebih lanjut dalam artikel ini, Anda akan mempelajari beberapa teknik untuk memilih dan menghapus dengan cepat setiap baris lain atau setiap baris ke-N di Excel.
Cara menghapus setiap baris lainnya di Excel dengan memfilter
Intinya, cara umum untuk menghapus setiap baris lain di Excel adalah ini: pertama, Anda memfilter baris alternatif, lalu memilihnya, dan menghapus semuanya sekaligus. Langkah-langkah rinci ikuti di bawah ini:
- Dalam kolom kosong di samping data asli Anda, masukkan urutan nol dan satu. Anda dapat dengan cepat melakukan ini dengan mengetik 0 di sel pertama dan 1 di sel kedua, lalu menyalin dua sel pertama dan menempelkannya ke bawah kolom sampai sel terakhir dengan data.
Atau, Anda bisa menggunakan rumus ini:
=MOD(ROW(),2)Logika rumusnya sangat sederhana: fungsi ROW mengembalikan nomor baris saat ini, fungsi MOD membaginya dengan 2 dan mengembalikan sisanya dibulatkan ke bilangan bulat.
Hasilnya, Anda memiliki 0 di semua baris genap (karena dibagi 2 secara merata tanpa sisa) dan 1 di semua baris ganjil:
- Tergantung pada apakah Anda ingin menghapus baris genap atau ganjil, saring satu atau nol.
Untuk melakukannya, pilih sel mana pun dalam kolom Helper Anda, buka Data tab> Sortir dan Saring kelompok, dan klik tombol Filter Panah filter drop-down akan muncul di semua sel header. Anda klik tombol panah di kolom Helper dan centang salah satu kotak:
- 0 untuk menghapus baris genap
- 1 untuk menghapus baris ganjil
Dalam contoh ini, kita akan menghapus baris dengan nilai "0", jadi kita memfilternya:
- Sekarang, setelah semua baris "1" disembunyikan, pilih semua baris "0" yang terlihat, klik kanan pilihan dan klik Hapus Baris :
- Langkah di atas telah meninggalkan tabel kosong, tetapi jangan khawatir, baris "1" masih ada di sana. Untuk membuatnya terlihat lagi, cukup hapus filter otomatis dengan mengklik tombol Filter tombol lagi:
- Rumus di kolom C menghitung ulang untuk baris yang tersisa, tetapi Anda tidak membutuhkannya lagi. Anda sekarang dapat dengan aman menghapus kolom Helper:
Hasilnya, hanya minggu-minggu genap yang tersisa dalam lembar kerja kita, minggu-minggu ganjil sudah tidak ada!
Tip. Jika Anda ingin memindahkan setiap baris lain ke tempat lain daripada menghapusnya sama sekali, pertama-tama salin baris yang difilter dan tempelkan ke lokasi baru, lalu hapus baris yang difilter.
Cara menghapus baris alternatif di Excel dengan VBA
Jika Anda tidak ingin membuang waktu Anda untuk tugas sepele seperti menghapus setiap baris lain di lembar kerja Excel Anda, makro VBA berikut dapat mengotomatiskan prosesnya untuk Anda:
Sub Delete_Alternate_Rows_Excel() Dim SourceRange As Range Set SourceRange = Application.Selection Set SourceRange = Application.InputBox( "Range:" , "Pilih 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 1Langkah -2 Set FirstCell = SourceRange.Cells(RowIndex, 1) FirstCell.EntireRow.Delete Next Application.ScreenUpdating = True End If End SubCara menghapus setiap baris lainnya di Excel menggunakan makro
Sisipkan makro di lembar kerja Anda dengan cara biasa melalui Editor Visual Basic:
- Tekan Alt + F11 untuk membuka jendela Visual Basic for Applications.
- Pada bilah menu atas, klik Sisipkan > Modul , dan tempelkan makro di atas di Modul
- Tekan tombol F5 untuk menjalankan makro.
- Sebuah dialog akan muncul dan meminta Anda untuk memilih range. Pilih tabel Anda dan klik OK:
Selesai! Setiap baris lain dalam rentang yang dipilih dihapus:
Cara menghapus setiap baris ke-N di Excel
Untuk tugas ini, kita akan memperluas teknik pemfilteran yang telah kita gunakan untuk menghapus setiap baris lainnya. Perbedaannya ada pada rumus yang menjadi dasar pemfilteran:
MOD(BARIS()- m , n )Di mana:
- m adalah nomor baris sel pertama dengan data dikurangi 1
- n adalah baris ke-N yang ingin Anda hapus
Katakanlah datamu dimulai di baris ke-2 dan kamu ingin menghapus setiap baris ke-3. Jadi, dalam rumusmu n sama dengan 3, dan m sama dengan 1 (baris 2 dikurangi 1):
=MOD(BARIS() - 1, 3)
Jika data kita dimulai di baris 3, maka m akan sama dengan 2 (baris 3 dikurangi 1), dan seterusnya. Koreksi ini diperlukan untuk menomori baris-baris secara berurutan, dimulai dengan angka 1.
Apa yang dilakukan rumus ini adalah membagi angka baris relatif dengan 3 dan mengembalikan sisanya setelah pembagian. Dalam kasus kami, ini menghasilkan nol untuk setiap baris ketiga karena setiap angka ketiga dibagi dengan 3 tanpa sisa (3,6,9, dll.):
Dan sekarang, Anda melakukan langkah-langkah yang sudah biasa untuk memfilter baris "0":
- Pilih sel mana pun dalam tabel Anda dan klik tombol Filter tombol pada Data
- Filter kolom Helper untuk hanya menampilkan nilai "0".
- Pilih semua baris "0" yang terlihat, klik kanan dan pilih Hapus Baris dari menu konteks.
- Hapus filter dan hapus kolom Helper.
Dengan cara yang sama, Anda dapat menghapus setiap baris ke-4, ke-5, atau baris ke-N lainnya di Excel.
Tip. Jika Anda perlu menghapus baris dengan data yang tidak relevan, tutorial berikut akan sangat membantu: Cara menghapus baris berdasarkan nilai sel.
Saya ucapkan terima kasih telah membaca dan berharap bisa berjumpa lagi dengan Anda di blog kami minggu depan.
