Excel’de belirtilen hücreler, bir onay kutusuyla nasıl kilitlenir ve kilidi nasıl açılır?
Bu makale, Excel’de belirli bir hücre aralığını kilitlemek ve kilidini açmak amacıyla onay kutusunun nasıl kullanılacağını açıklamaktadır.
Onay kutusuyla belirtilen hücreleri VBA kodu kullanarak kilitleme ve kilidini açma
Onay kutusuyla belirtilen hücreleri VBA kodu kullanarak kilitleme ve kilidini açma
Aşağıdaki VBA betiği, çalışma sayfasındaki bir onay kutusunu işaretleyip kaldırarak belirtilen hücre aralığının kilidini açmanıza veya kilitlemenize olanak tanır. Lütfen aşağıdaki adımları uygulayın.
1. İlk olarak, kilitleyip kilidini açmak istediğiniz hücre aralığına bir ad vermeniz gerekir.
Burada Aralık olarak A1:A14’ü seçtim, LockRng adını Ad kutusuna yazdım ve ardından Enter tuşuna bastım. Ekran görüntüsüne bakın:
2. Kilitlemek ve Seçimi Kilidi Aç için kullanacağınız onay kutusunu içeren çalışma sayfasında, Sayfa Sekmesi'ne sağ tıklayın ve ardından açılan menüden Kodu Görüntüle seçeneğine tıklayın.
Not: Ekleme sırasında Onay Kutusu, ActiveX Onay Kutusu türünde olmalıdır.
3. Açılan Microsoft Visual Basic for Applications penceresine aşağıdaki VBA kodunu kopyalayıp yapıştırın: Kod penceresine.
VBA kodu: Onay kutusuyla belirtilen bir hücre aralığını kilitleme veya kilidini açma
Private Sub CheckBox1_Click()
Range("LockRng").Select
On Error Resume Next
If CheckBox1.Value = True Then
Selection.Locked = False
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 SubNot: Kodda Checkbox1, onay kutusunun adıdır; LockRng ise sınırlı aralık hücresinin adıdır. İhtiyacınıza göre bunları değiştirebilirsiniz.
4. Alt+Q tuşlarına aynı anda basarak Microsoft Visual Basic for Applications penceresini kapatın.
Şimdi kodu test edebilirsiniz. Onay kutusunun işaretini kaldırdığınızda, “Sınırlı aralık”ın kilitlendiğini bildiren bir Kutools for Excel iletişim kutusu açılacaktır; lütfen Tamam düğmesine tıklayın.
Onay kutusunu işaretlediğinizde, belirtilen aralıktaki tüm hücrelerin kilidi açılacak ve aşağıdaki sağdaki ekran görüntüsünde gösterildiği gibi bir Kutools for Excel iletişim kutusu göreceksiniz.
İlgili makaleler:
- Excel'de veriler, onay kutusuna göre nasıl filtrelenir?
- Excel'de satır gizlendiğinde onay kutusu nasıl gizlenir?
- Excel'de birden fazla onay kutusu seçeneği sunan bir açılır liste nasıl oluşturulur?
- Excel'de onay kutusu kullanılarak bir hücre veya satır nasıl vurgulanır?
En İyi Office Üretkenlik Araçları
Excel becerilerinizi Kutools for Excel ile geliştirin ve verimlilikte hiç yaşamadığınız bir deneyim yaşayın.Kutools for Excel, üretkenliği artırmak ve Zamanı Kaydet için 300’den fazla gelişmiş özelliğe sahiptir.İhtiyacınız olan özelliği hemen edinmek için buraya tıklayın…
Office Tab, Office uygulamalarına sekmeli bir arayüz kazandırarak işlerinizi çok daha kolay hale getirir.
- Word, Excel, PowerPoint, Publisher, Access, Visio ve Project'te sekmeli düzenleme ve okuma özelliğini etkinleştirin.
- Belgeleri yeni pencerelerde değil, aynı pencerenin yeni sekmelerinde açıp oluşturun.
- Günlük üretkenliğinizi %50 artırır ve her gün yüzlerce fare tıklamasından tasarruf etmenizi sağlar!
Tüm Kutools eklentileri — tek bir kurulum dosyasında!
Kutools for Office paketi, Excel, Word, Outlook ve PowerPoint eklentilerini ve ayrıca Office Tab Pro’yu içeren kapsamlı bir çözümdür; Office uygulamalarında çalışan ekipler için idealdir.
- Hepsi bir arada paket— Excel, Word, Outlook ve PowerPoint eklentileri + Office Tab Pro
- Tek kurulum, tek lisans— birkaç dakikada hazır (MSI uyumlu)
- Birlikte daha iyi çalışır— Office uygulamalarında akıcı üretkenlik
- 30 günlük tam özellikli deneme— kayıt gerekmez, kredi kartı gerekmez
- En iyi fiyat performans— ayrı ayrı eklenti satın almaya göre tasarruf sağlar