Bagaimana cara cepat menghapus semua konten sel yang tidak terkunci / tidak terlindungi di Excel?
Jika Anda memiliki lembar kerja yang berisi bagian dari sel yang tidak terkunci, dan sekarang, Anda ingin menghapus semua konten sel yang tidak terkunci sekaligus. Apakah Anda punya solusi untuk menangani tugas ini?
Hapus semua konten sel yang tidak terkunci dengan fungsi Find and Replace
Hapus semua konten sel yang tidak terkunci dengan kode VBA
Hapus semua konten sel yang tidak terkunci dengan Kutools for Excel
Hapus semua konten sel yang tidak terkunci dengan fungsi Find and Replace
Untuk menghapus semua nilai sel yang tidak dilindungi, Anda dapat menggunakan fitur Temukan dan Ganti untuk memilih sel yang tidak terkunci terlebih dahulu, lalu segera hapus.
1. Buka lembar kerja Anda yang ingin Anda hapus sel yang tidak terkunci, dan klik Beranda > Temukan & Pilih > Menemukan atau tekan jalan pintas - Ctrl + F kunci untuk membuka Cari dan Ganti dialog, lihat tangkapan layar:
2. di Cari dan Ganti kotak dialog, klik Opsi tombol untuk memperluas dialog, lihat tangkapan layar:
3. Lalu klik dibentuk tombol, dan a Temukan Format kotak dialog akan muncul, lalu di bawah Proteksi tab, hapus centang Terkunci dan Tersembunyi kotak, lihat tangkapan layar:
4. Klik OK untuk kembali ke Cari dan Ganti kotak dialog, lalu klik Temukan semua tombol, semua sel yang tidak dilindungi ditampilkan di kotak daftar di bawah ini, dan kemudian tekan Ctrl + A untuk memilih semuanya, lihat tangkapan layar:
5. Dan kemudian tutup ini Cari dan Ganti dialog, semua sel yang tidak terkunci telah dipilih di lembar kerja saat ini, lihat tangkapan layar:
6. Maka Anda hanya perlu menekan Delete pada keyboard, dan konten sel tidak terkunci yang dipilih akan dihapus sekaligus.
Hapus semua konten sel yang tidak terkunci dengan kode VBA
Kode VBA berikut juga dapat membantu Anda menghapus konten sel yang tidak terkunci, lakukan seperti ini:
1. Tahan ALT + F11 kunci untuk membuka Jendela Microsoft Visual Basic for Applications.
2. Klik Menyisipkan > Modul, dan tempel kode berikut di Jendela Modul.
Kode VBA: Hapus semua konten sel yang tidak terkunci
Sub ClearUnlockedCells()
'Updateby20140724
Dim Rng As Range
Dim WorkRng As Range
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
Application.ScreenUpdating = False
For Each Rng In WorkRng
If Rng.Locked = False Then Rng.ClearContents
Next
Application.ScreenUpdating = True
End Sub
3. Lalu tekan F5 kunci untuk menjalankan kode ini, dan tentukan rentang yang ingin Anda hapus konten sel yang tidak terkunci di kotak yang muncul, lihat tangkapan layar:
4. Klik OK, dan konten dalam sel rentang yang tidak terkunci telah dihapus.
Hapus semua konten sel yang tidak terkunci dengan Kutools for Excel
Jika sudah terpasang Kutools untuk Excel, nya Pilih Sel Tidak Terkunci Fitur ini dapat membantu Anda memilih sel yang tidak terlindungi terlebih dahulu, lalu Anda dapat menghapusnya sekaligus.
Kutools untuk Excel mencakup lebih dari 300 alat Excel yang praktis. Gratis untuk mencoba tanpa batasan dalam 30 hari. Dapatkan Sekarang
Setelah menginstal Kutools for Excel, lakukan langkah-langkah berikut:
1. Pilih rentang data yang ingin Anda hapus konten sel yang tidak terkunci.
2. Klik Kutools > Pilih Alat > Pilih Sel Tidak Terkunci, lihat tangkapan layar:
3. Dan semua sel yang tidak terkunci telah dipilih dalam pilihan Anda.
4. tekan Delete pada keyboard untuk segera menghapus konten sel yang dipilih.
Jika Anda ingin tahu lebih banyak tentang fitur ini, silakan klik Pilih Sel Tidak Terkunci.
Artikel terkait:
Bagaimana cara memilih semua sel yang tidak terkunci di 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!
