Bagaimana cara mengunci dan membuka kunci sel tertentu dengan kotak centang di Excel?
Artikel ini membahas tentang menggunakan kotak centang untuk mengunci dan membuka kunci rentang sel tertentu di Excel.
Kunci dan buka kunci sel yang ditentukan dengan kotak centang menggunakan kode VBA
Kunci dan buka kunci sel yang ditentukan dengan kotak centang menggunakan kode VBA
Skrip VBA di bawah ini dapat membantu Anda membuka atau mengunci berbagai sel tertentu saat mencentang atau menghapus centang pada kotak centang di lembar kerja. Silakan lakukan sebagai berikut.
1. Pertama, Anda perlu menentukan nama untuk rentang sel yang perlu Anda kunci dan buka dengan kotak centang.
Disini saya pilih range A1: A14, ketikkan nama KunciRng ke dalam Nama kotak, lalu tekan Enter kunci. Lihat tangkapan layar:
2. Di lembar kerja berisi kotak centang yang akan Anda gunakan untuk mengunci dan membuka kunci sel, klik kanan Tab Lembar, lalu klik Lihat kode dari menu klik kanan.
Note: Kotak centang harus kotak centang ActiveX saat Anda memasukkan.
3. Dalam bermunculan Microsoft Visual Basic untuk Aplikasi jendela, silakan salin dan tempel kode VBA di bawah ini ke Kode jendela.
Kode VBA: Kunci atau buka kunci rentang sel tertentu dengan kotak centang
Private Sub CheckBox1_Click()
Range("LockRng").Select
On Error Resume Next
If CheckBox1.Value = True Then
Selection.Locked = Fals
MsgBox "Range cells " & Selection.Address & " has been unlocked", vbInformation, "Kutools for Excel"
Else
Selection.Locked = True
MsgBox "Range cells " & Selection.Address & " has been locked", vbInformation, "Kutools for Excel"
End If
End Sub
Note: Dalam kode, Checkbox1 adalah nama kotak centang, LockRng adalah nama sel rentang yang ditentukan. Anda dapat mengubahnya sesuai kebutuhan.
4. tekan lain + Q tombol secara bersamaan untuk menutup Microsoft Visual Basic untuk Aplikasi jendela.
Sekarang Anda dapat menguji kodenya. Saat menghapus centang pada kotak centang, a Kutools untuk Excel kotak dialog akan muncul untuk memberi tahu Anda kisaran yang ditentukan telah dikunci, silakan klik OK .
Saat mencentang kotak, semua sel dalam kisaran yang ditentukan akan dibuka kuncinya dan Anda akan mendapatkan file Kutools untuk Excel kotak dialog seperti gambar di bawah kanan ditampilkan.
Terkait artikel:
- Bagaimana cara memfilter data berdasarkan kotak centang di Excel?
- Bagaimana cara menyembunyikan kotak centang saat baris disembunyikan di Excel?
- Bagaimana cara membuat daftar drop-down dengan beberapa kotak centang di Excel?
- Bagaimana cara menyorot sel atau baris dengan kotak centang 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!