Bagaimana cara mengunci sel tertentu tanpa melindungi seluruh lembar kerja di Excel?
Biasanya, Anda perlu melindungi seluruh lembar kerja untuk mengunci sel dari pengeditan. Apakah ada metode untuk mengunci sel tanpa melindungi seluruh lembar kerja? Artikel ini merekomendasikan metode VBA untuk Anda.
Kunci sel yang ditentukan tanpa melindungi seluruh lembar kerja dengan VBA
Kunci sel yang ditentukan tanpa melindungi seluruh lembar kerja dengan VBA
Misalkan Anda perlu mengunci sel A3 dan A5 di lembar kerja saat ini, kode VBA berikut akan membantu Anda mencapainya tanpa melindungi seluruh lembar kerja.
1. Klik kanan tab lembar, lalu pilih Lihat kode dari menu klik kanan.
2. Kemudian salin dan tempel kode VBA di bawah ini ke jendela Kode. Lihat tangkapan layar:
Kode VBA: Kunci sel yang ditentukan tanpa melindungi seluruh lembar kerja
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Column = 1 Then
If Target.Row = 3 Or Target.Row = 5 Then
Beep
Cells(Target.Row, Target.Column).Offset(0, 1).Select
End If
End If
End Sub
Note: Di dalam kode, Kolom 1, Baris = 3 dan Baris = 5 menunjukkan sel A3 dan A5 di lembar kerja saat ini akan dikunci setelah menjalankan kode. Anda dapat mengubahnya sesuai kebutuhan.
3. tekan lain + Q tombol secara bersamaan untuk menutup Microsoft Visual Basic untuk Aplikasi jendela.
Sekarang sel A3 dan A5 terkunci di lembar kerja saat ini. Jika Anda mencoba memilih sel A3 atau A5 di lembar kerja saat ini, kursor akan dipindahkan ke sel sebelah kanan secara otomatis.
Terkait artikel:
- Bagaimana cara mengunci semua referensi sel dalam rumus sekaligus di Excel?
- Bagaimana cara mengunci atau melindungi sel setelah entri data atau input di Excel?
- Bagaimana cara mengunci atau membuka kunci sel berdasarkan nilai di sel lain di Excel?
- Bagaimana cara mengunci gambar / gambar ke atau di dalam sel di Excel?
- Bagaimana cara mengunci lebar dan tinggi sel dari pengubahan ukuran 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!