मुख्य सामग्री पर जाएं

एक्सेल में चेकबॉक्स के साथ निर्दिष्ट सेल को लॉक और अनलॉक कैसे करें?

लेखक: सिलुविया अंतिम संशोधित: 2020-09-07

यह आलेख एक्सेल में निर्दिष्ट कोशिकाओं की एक श्रृंखला को लॉक और अनलॉक करने के लिए चेकबॉक्स का उपयोग करने के बारे में बात कर रहा है।

वीबीए कोड का उपयोग करके चेकबॉक्स के साथ निर्दिष्ट सेल को लॉक और अनलॉक करें


वीबीए कोड का उपयोग करके चेकबॉक्स के साथ निर्दिष्ट सेल को लॉक और अनलॉक करें

वर्कशीट में चेकबॉक्स को चेक या अनचेक करते समय नीचे दी गई वीबीए स्क्रिप्ट आपको निर्दिष्ट सेल की एक श्रृंखला को अनलॉक या लॉक करने में मदद कर सकती है। कृपया निम्नानुसार करें.

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 बटन.

चेकबॉक्स को चेक करते समय, निर्दिष्ट सीमा में सभी सेल अनलॉक हो जाएंगे और आपको एक मिलेगा एक्सेल के लिए कुटूल नीचे दाईं ओर जैसा डायलॉग बॉक्स स्क्रीनशॉट में दिखाया गया है।


संबंधित लेख:

सर्वोत्तम कार्यालय उत्पादकता उपकरण

🤖 कुटूल्स एआई सहयोगी: निम्न के आधार पर डेटा विश्लेषण में क्रांति लाएं: बुद्धिमान निष्पादन   |  कोड जनरेट करें  |  कस्टम फ़ॉर्मूले बनाएं  |  डेटा का विश्लेषण करें और चार्ट बनाएं  |  कुटूल फ़ंक्शंस का आह्वान करें...
लोकप्रिय सुविधाएँ: डुप्लिकेट ढूंढें, हाइलाइट करें या पहचानें   |  रिक्त पंक्तियाँ हटाएँ   |  डेटा खोए बिना कॉलम या सेल को संयोजित करें   |   फॉर्मूला के बिना गोल ...
सुपर लुकअप: एकाधिक मानदंड VLookup    मल्टीपल वैल्यू वीलुकअप  |   अनेक शीटों में VLookup   |   फजी लुकअप ....
उन्नत ड्रॉप-डाउन सूची: शीघ्रता से ड्रॉप डाउन सूची बनाएं   |  आश्रित ड्रॉप डाउन सूची   |  बहु-चयन ड्रॉप डाउन सूची ....
स्तम्भ प्रबंधक: कॉलमों की एक विशिष्ट संख्या जोड़ें  |  कॉलम ले जाएँ  |  छिपे हुए कॉलम की दृश्यता स्थिति टॉगल करें  |  रेंज और कॉलम की तुलना करें ...
फीचर्ड फीचर्स: ग्रिड फोकस   |  डिजाइन देखें   |   बड़ा फॉर्मूला बार    कार्यपुस्तिका एवं शीट प्रबंधक   |  संसाधन लाइब्रेरी (ऑटो टेक्स्ट)   |  खजूर बीनने वाला   |  कार्यपत्रकों को संयोजित करें   |  एन्क्रिप्ट/डिक्रिप्ट सेल    सूची के अनुसार ईमेल भेजें   |  सुपर फ़िल्टर   |   विशेष फ़िल्टर (फ़िल्टर बोल्ड/इटैलिक/स्ट्राइकथ्रू...) ...
शीर्ष 15 टूलसेट12 टेक्स्ट टूल्स (पाठ जोड़ें, अक्षर हटाएँ, ...)   |   50 + चार्ट प्रकार (गैन्ट चार्ट, ...)   |   40+ प्रैक्टिकल सूत्र (जन्मदिन के आधार पर आयु की गणना करें, ...)   |   19 निवेशन टूल्स (QR कोड डालें, पथ से चित्र सम्मिलित करें, ...)   |   12 रूपांतरण टूल्स (शब्दों को संख्याएँ, मुद्रा रूपांतरण, ...)   |   7 विलय और विभाजन टूल्स (उन्नत संयोजन पंक्तियाँ, विभाजन कोशिकाओं, ...)   |   ... और अधिक

एक्सेल के लिए कुटूल के साथ अपने एक्सेल कौशल को सुपरचार्ज करें, और पहले जैसी दक्षता का अनुभव करें। एक्सेल के लिए कुटूल उत्पादकता बढ़ाने और समय बचाने के लिए 300 से अधिक उन्नत सुविधाएँ प्रदान करता है।  वह सुविधा प्राप्त करने के लिए यहां क्लिक करें जिसकी आपको सबसे अधिक आवश्यकता है...

Description


ऑफिस टैब ऑफिस में टैब्ड इंटरफ़ेस लाता है, और आपके काम को बहुत आसान बनाता है

  • Word, Excel, PowerPoint में टैब्ड संपादन और रीडिंग सक्षम करें, प्रकाशक, एक्सेस, विसियो और प्रोजेक्ट।
  • नई विंडो के बजाय एक ही विंडो के नए टैब में एकाधिक दस्तावेज़ खोलें और बनाएं।
  • आपकी उत्पादकता 50% बढ़ जाती है, और आपके लिए हर दिन सैकड़ों माउस क्लिक कम हो जाते हैं!
Comments (0)
No ratings yet. Be the first to rate!
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations