Bagaimana cara menghapus semua kecuali rentang yang dipilih di Excel?
Di Excel, kami dapat dengan cepat dan langsung menghapus rentang yang dipilih, tetapi pernahkah Anda mencoba menghapus konten sel lain kecuali rentang yang dipilih? Artikel ini, saya akan memperkenalkan beberapa trik bagi Anda untuk menyelesaikan tugas ini di Excel dengan cepat dan mudah.
Hapus semua kecuali rentang yang dipilih dengan kode VBA
Hapus semua kecuali rentang yang dipilih dengan Select Range Helper of Kutools for Excel
Hapus semua kecuali rentang yang dipilih dengan Copy Ranges of Kutools for Excel
Hapus semua kecuali rentang yang dipilih dengan kode VBA
Tidak ada cara langsung bagi Anda untuk menghapus semua nilai sel yang tidak dipilih sekaligus, tetapi, kode VBA berikut dapat membantu Anda, lakukan hal berikut:
1. Harap pegang Ctrl kunci untuk memilih sel yang ingin Anda simpan.
2. tekan Alt + F11 tombol secara bersamaan untuk membuka Microsoft Visual Basic untuk Aplikasi jendela.
3. di Microsoft Visual Basic untuk Aplikasi kotak dialog jendela, klik Menyisipkan > Modul, lalu salin dan tempel kode VBA di bawah ini ke file Modul jendela.
Kode VBA: hapus semua nilai sel kecuali rentang yang dipilih
Sub ClearAllExceptSelection()
'updateby Extendoffice
Dim xRg As Range
Dim xCell As Range
Dim xAddress As String
Dim xUpdate As Boolean
On Error Resume Next
xAddress = Application.ActiveWindow.RangeSelection.Address
Set xRg = Application.InputBox("Please select the ranges want to keep", "Kutools for Excel", xAddress, , , , , 8)
If xRg Is Nothing Then Exit Sub
xUpdate = Application.ScreenUpdating
Application.ScreenUpdating = False
For Each xCell In ActiveSheet.UsedRange
If Intersect(xCell, xRg) Is Nothing Then
xCell.Clear
End If
Next
Application.ScreenUpdating = xUpdate
End Sub
4. Lalu tekan F5 kunci untuk menjalankan kode ini, dan kotak prompt muncul untuk mengingatkan Anda untuk memilih rentang sel yang ingin Anda simpan, jika Anda telah memilih rentang di langkah1, silakan klik OK, jika tidak, Anda dapat memilih sel yang Anda inginkan di kotak prompt, dan memasukkan koma untuk memisahkan beberapa rentang, lalu klik OK tombol, lihat tangkapan layar:
5. Setelah mengklik OK, semua nilai sel lainnya telah dihapus tetapi hanya meninggalkan rentang yang dipilih, lihat tangkapan layar:
Hapus semua kecuali rentang yang dipilih dengan Select Range Helper of Kutools for Excel
Jika sudah terpasang Kutools untuk Excel, Dengan yang Seleksi Terbalik fitur dari Pilih Range Helper utilitas, Anda dapat dengan cepat membalikkan pilihan, lalu menghapus pilihan yang dibalik sekaligus.
Kutools untuk Excel : dengan lebih dari 300 add-in Excel yang praktis, gratis untuk dicoba tanpa batasan dalam 30 hari. |
Setelah menginstal Kutools untuk Excel, lakukan hal berikut :( Unduh Gratis Kutools untuk Excel Sekarang! )
1. Pilih rentang sel yang ingin Anda pertahankan.
2. Lalu klik Kutools > Pilih > Pilih Range Helper, lihat tangkapan layar:
3. di Pilih Range Helper kotak dialog, periksa Seleksi Terbalik, lihat tangkapan layar:
4. Dan kemudian seret mouse untuk memilih rentang yang Anda inginkan untuk membalikkan pilihan. Saat Anda melepaskan mouse, sel yang dipilih telah dibatalkan pilihannya dan sel yang tidak dipilih telah dipilih sekaligus. Lihat tangkapan layar:
5. Kemudian tutup kotak dialog, dan tekan Delete kunci untuk menghapus pilihan sekaligus. Dan hanya sel yang Anda inginkan yang disimpan, lihat tangkapan layar:
Unduh Gratis Kutools untuk Excel Sekarang!
Hapus semua kecuali rentang yang dipilih dengan Select Range Helper of Kutools for Excel
Utilitas lain-Salin Rentang of Kutools untuk Excel juga dapat membantu Anda menyelesaikan pekerjaan ini, Anda hanya perlu menyalin rentang yang Anda pilih ke lembar kerja baru, lalu menghapus lembar kerja lama.
Setelah menginstal Kutools untuk Excel, lakukan dengan langkah-langkah berikut :( Unduh Gratis Kutools untuk Excel Sekarang! )
1. Memegang Ctrl kunci untuk memilih rentang sel yang ingin Anda simpan.
2. Lalu klik Kutools > Salin Rentang, lihat tangkapan layar:
3. Dan di Salin Beberapa Rentang kotak dialog, periksa Semua pilihan di bawah Tempel khusus, periksa Termasuk tinggi baris dan Termasuk lebar kolom jika Anda ingin mempertahankan tinggi baris dan lebar kolom yang Anda inginkan, lihat tangkapan layar:
4. Lalu klik Ok tombol, dan kotak prompt lain akan muncul untuk mengingatkan Anda memilih sel untuk meletakkan sel yang disalin, pilih sel di lembar kerja baru, lihat tangkapan layar:
5. Dan kemudian klik OK, dan hanya rentang pilihan Anda yang telah ditempelkan ke lembar kerja baru, dan sekarang Anda dapat menghapus lembar kerja asli sesuai kebutuhan.
Unduh Gratis Kutools untuk Excel Sekarang!
Demo: Hapus semua kecuali rentang yang dipilih dengan Kutools for Excel
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!