एक्सेल में चेकबॉक्स के साथ निर्दिष्ट सेल को लॉक और अनलॉक कैसे करें?
यह आलेख एक्सेल में निर्दिष्ट कोशिकाओं की एक श्रृंखला को लॉक और अनलॉक करने के लिए चेकबॉक्स का उपयोग करने के बारे में बात कर रहा है।
वीबीए कोड का उपयोग करके चेकबॉक्स के साथ निर्दिष्ट सेल को लॉक और अनलॉक करें
वीबीए कोड का उपयोग करके चेकबॉक्स के साथ निर्दिष्ट सेल को लॉक और अनलॉक करें
वर्कशीट में चेकबॉक्स को चेक या अनचेक करते समय नीचे दी गई वीबीए स्क्रिप्ट आपको निर्दिष्ट सेल की एक श्रृंखला को अनलॉक या लॉक करने में मदद कर सकती है। कृपया निम्नानुसार करें.
1. सबसे पहले, आपको उन कक्षों की श्रेणी के लिए एक नाम निर्दिष्ट करना होगा जिन्हें आपको चेकबॉक्स के साथ लॉक और अनलॉक करने की आवश्यकता है।
यहां मैं रेंज A1:A14 चुनता हूं, एक नाम टाइप करता हूं लॉकरिंग में नाम बॉक्स, और फिर दबाएँ दर्ज चाबी। स्क्रीनशॉट देखें:
2. वर्कशीट में वह चेकबॉक्स है जिसका उपयोग आप सेल को लॉक और अनलॉक करने के लिए करेंगे, शीट टैब पर राइट क्लिक करें और फिर क्लिक करें कोड देखें राइट-क्लिक मेनू से।
नोट: जब आप सम्मिलित करते हैं तो चेक बॉक्स ActiveX चेक बॉक्स होना चाहिए।
3. पॉप अप में अनुप्रयोगों के लिए माइक्रोसॉफ्ट विज़ुअल बेसिक विंडो, कृपया नीचे दिए गए VBA कोड को कॉपी और पेस्ट करें कोड खिड़की.
वीबीए कोड: चेकबॉक्स के साथ निर्दिष्ट सेल की एक श्रृंखला को लॉक या अनलॉक करें
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
नोट: कोड में, चेकबॉक्स1 चेकबॉक्स का नाम है, लॉकआरएनजी निर्दिष्ट रेंज सेल का नाम है। आप आवश्यकतानुसार उन्हें बदल सकते हैं।
4। दबाएं ऑल्ट + Q को बंद करने के लिए एक साथ कुंजियाँ अनुप्रयोगों के लिए माइक्रोसॉफ्ट विज़ुअल बेसिक खिड़की.
अब आप कोड का परीक्षण कर सकते हैं. चेकबॉक्स को अनचेक करते समय, a एक्सेल के लिए कुटूल डायलॉग बॉक्स पॉप अप होकर आपको बताएगा कि निर्दिष्ट सीमा लॉक कर दी गई है, कृपया क्लिक करें OK बटन.
चेकबॉक्स को चेक करते समय, निर्दिष्ट सीमा में सभी सेल अनलॉक हो जाएंगे और आपको एक मिलेगा एक्सेल के लिए कुटूल नीचे दाईं ओर जैसा डायलॉग बॉक्स स्क्रीनशॉट में दिखाया गया है।
संबंधित लेख:
- एक्सेल में चेकबॉक्स के आधार पर डेटा कैसे फ़िल्टर करें?
- Excel में पंक्ति छुपी होने पर चेकबॉक्स कैसे छिपाएँ?
- एक्सेल में एकाधिक चेकबॉक्स के साथ ड्रॉप डाउन सूची कैसे बनाएं?
- Excel में चेकबॉक्स के साथ सेल या पंक्ति को कैसे हाइलाइट करें?
सर्वोत्तम कार्यालय उत्पादकता उपकरण
एक्सेल के लिए कुटूल के साथ अपने एक्सेल कौशल को सुपरचार्ज करें, और पहले जैसी दक्षता का अनुभव करें। एक्सेल के लिए कुटूल उत्पादकता बढ़ाने और समय बचाने के लिए 300 से अधिक उन्नत सुविधाएँ प्रदान करता है। वह सुविधा प्राप्त करने के लिए यहां क्लिक करें जिसकी आपको सबसे अधिक आवश्यकता है...
ऑफिस टैब ऑफिस में टैब्ड इंटरफ़ेस लाता है, और आपके काम को बहुत आसान बनाता है
- Word, Excel, PowerPoint में टैब्ड संपादन और रीडिंग सक्षम करें, प्रकाशक, एक्सेस, विसियो और प्रोजेक्ट।
- नई विंडो के बजाय एक ही विंडो के नए टैब में एकाधिक दस्तावेज़ खोलें और बनाएं।
- आपकी उत्पादकता 50% बढ़ जाती है, और आपके लिए हर दिन सैकड़ों माउस क्लिक कम हो जाते हैं!