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

एक्सेल में एक साथ कई वर्कशीट को कैसे सुरक्षित रखें?

लेखक: ज़ियाओयांग अंतिम संशोधित: 2020-06-04

मान लीजिए कि आपके पास एक कार्यपुस्तिका है जिसमें कई कार्यपत्रक हैं, और अब आपको सभी कार्यपत्रकों या कुछ विशिष्ट कार्यपत्रकों को सुरक्षित रखने की आवश्यकता है, सामान्यतः एक्सेल में, आप केवल प्रोटेक्ट शीट फ़ंक्शन के साथ शीट को एक-एक करके सुरक्षित कर सकते हैं, लेकिन यह विधि कठिन है और यदि कई शीटें हैं तो उन्हें संरक्षित करने की आवश्यकता होने पर समय लेने वाला होता है। आप एक्सेल में एक साथ कई शीटों को जल्दी और आसानी से कैसे सुरक्षित रखते हैं?

सभी शीटों को एक साथ VBA कोड से सुरक्षित रखें

एक्सेल के लिए कुटूल के साथ एक साथ कई शीट को सुरक्षित रखें

एक्सेल के लिए कुटूल के साथ एक साथ कई शीटों को असुरक्षित करें


तीर नीला दायां बुलबुला सभी शीटों को एक साथ VBA कोड से सुरक्षित रखें

निम्नलिखित वीबीए कोड के साथ, आप एक ही पासवर्ड से सक्रिय कार्यपुस्तिका की सभी शीटों को एक साथ सुरक्षित कर सकते हैं, ऐसा करें:

1. दबाए रखें ALT + F11 कुंजियाँ, और यह खुल जाती है अनुप्रयोगों के लिए माइक्रोसॉफ्ट विज़ुअल बेसिक खिड़की.

2। क्लिक करें सम्मिलित करें > मॉड्यूल, और निम्नलिखित कोड को इसमें पेस्ट करें मॉड्यूल विंडो.

वीबीए कोड: एक कार्यपुस्तिका में सभी कार्यपत्रकों को एक साथ सुरक्षित रखें:

Sub protect_all_sheets()
top: 
pass = InputBox("password?") 
repass = InputBox("Verify Password") 
If Not (pass = repass) Then 
MsgBox "you made a boo boo" 
Goto top 
End If 
For i = 1 To Worksheets.Count 
If Worksheets(i).ProtectContents = True Then Goto oops 
Next 
For Each s In ActiveWorkbook.Worksheets 
s.Protect Password:=pass 
Next 
Exit Sub 
oops: MsgBox "I think you have some sheets that are already protected. Please unprotect all sheets then running this Macro." 
End Sub

3। फिर दबायें F5 कोड चलाने के लिए कुंजी, और प्रॉम्प्ट बॉक्स में संरक्षित शीट के लिए पासवर्ड इनपुट करें, स्क्रीनशॉट देखें:

डॉक-प्रोटेक्ट-मल्टीपल-शीट्स1-1

4। क्लिक करें OK, और फिर पासवर्ड की पुष्टि करने के लिए पासवर्ड दोबारा इनपुट करें।

डॉक-प्रोटेक्ट-मल्टीपल-शीट्स2-2

5। तब दबायें OK, और सभी शीट्स को एक ही पासवर्ड से सुरक्षित किया गया है।


तीर नीला दायां बुलबुला एक्सेल के लिए कुटूल के साथ एक साथ कई शीट को सुरक्षित रखें

कभी-कभी, आप अपनी कार्यपुस्तिका में सभी शीटों को सुरक्षित नहीं रखना चाहते हैं, और केवल कुछ विशिष्ट शीटों को सुरक्षित रखना चाहते हैं, इस स्थिति में, उपरोक्त कोड काम नहीं करेगा। लेकिन इसके साथ एक्सेल के लिए कुटूलहै वर्कशीट को सुरक्षित रखें उपयोगिता, आप सभी शीट और विशिष्ट शीट दोनों को जल्दी और आसानी से सुरक्षित कर सकते हैं।

एक्सेल के लिए कुटूल : 300 से अधिक उपयोगी एक्सेल ऐड-इन्स के साथ, 60 दिनों में बिना किसी सीमा के आज़माने के लिए निःशुल्क

स्थापित करने के बाद एक्सेल के लिए कुटूल, कृपया निम्न चरणों का पालन करें:

1। क्लिक करें कुटूल्स प्लस > वर्कशीट को सुरक्षित रखें, स्क्रीनशॉट देखें:

2. में वर्कशीट को सुरक्षित रखें संवाद बॉक्स में, उन शीटों का चयन करें जिन्हें आप सुरक्षित रखना चाहते हैं। (डिफ़ॉल्ट रूप से, वर्तमान कार्यपुस्तिका के भीतर सभी कार्यपत्रकों की जाँच की जाती है।) स्क्रीनशॉट देखें:

डॉक-प्रोटेक्ट-मल्टीपल-शीट्स4-4

3. और क्लिक करें OK, और फिर प्रोटेक्ट वर्कशीट संवाद बॉक्स में पासवर्ड टाइप करें और पुष्टि करें। स्क्रीनशॉट देखें:

डॉक-प्रोटेक्ट-मल्टीपल-शीट्स5-5

4। तब दबायें OK, चयनित कार्यपत्रक सुरक्षित कर दिए गए हैं।

इस सुविधा के बारे में अधिक जानने के लिए प्रोटेक्ट वर्कशीट पर क्लिक करें।


तीर नीला दायां बुलबुला एक्सेल के लिए कुटूल के साथ एक साथ कई शीटों को असुरक्षित करें

आप एक ही समय में किसी कार्यपुस्तिका में एकाधिक संरक्षित कार्यपत्रकों को कैसे असुरक्षित कर सकते हैं? बिल्कुल, एक्सेल के लिए कुटूल भी प्रदान करता है असुरक्षित वर्कशीट आपके लिए उन्हें तुरंत असुरक्षित करने की उपयोगिता।

कृपया निम्नलिखित चरणों के साथ करें:

1. अपनी कार्यपुस्तिका खोलें जिसमें संरक्षित कार्यपत्रक हैं।

2। तब दबायें कुटूल्स प्लस > असुरक्षित वर्कशीट, स्क्रीनशॉट देखें:

3. में असुरक्षित वर्कशीट संवाद बॉक्स में, संरक्षित शीट को सूची बॉक्स में सूचीबद्ध करें, फिर क्लिक करें Ok बटन, स्क्रीनशॉट देखें:

डॉक-प्रोटेक्ट-मल्टीपल-शीट्स7-7

4. और फिर ए असुरक्षित वर्कशीट आपको वह पासवर्ड दर्ज करने की याद दिलाने के लिए संवाद बॉक्स प्रकट होता है जो आपने कार्यपत्रकों की सुरक्षा के लिए बनाया है, स्क्रीनशॉट देखें:

डॉक-प्रोटेक्ट-मल्टीपल-शीट्स8-8

5. पासवर्ड टाइप करने के बाद क्लिक करें Ok, सूची बॉक्स में सभी चेक की गई वर्कशीट असुरक्षित कर दी गई हैं।

नोट: वर्कशीट में एक ही पासवर्ड होना चाहिए।

इस अनप्रोटेक्ट वर्कशीट सुविधा के बारे में अधिक जानने के लिए।

अभी एक्सेल के लिए कुटूल डाउनलोड करें और निःशुल्क परीक्षण करें!


तीर नीला दायां बुलबुला डेमो: एक्सेल के लिए कुटूल के साथ एक साथ सभी वर्कशीट को सुरक्षित या असंरक्षित करें

एक्सेल के लिए कुटूल: 300 से अधिक उपयोगी एक्सेल ऐड-इन्स के साथ, 30 दिनों में बिना किसी सीमा के आज़माने के लिए निःशुल्क। अभी डाउनलोड करें और निःशुल्क परीक्षण करें!

संबंधित लेख:

एक्सेल में एक साथ कई वर्कशीट को असुरक्षित कैसे करें?

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

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

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

Description


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

  • Word, Excel, PowerPoint में टैब्ड संपादन और रीडिंग सक्षम करें, प्रकाशक, एक्सेस, विसियो और प्रोजेक्ट।
  • नई विंडो के बजाय एक ही विंडो के नए टैब में एकाधिक दस्तावेज़ खोलें और बनाएं।
  • आपकी उत्पादकता 50% बढ़ जाती है, और आपके लिए हर दिन सैकड़ों माउस क्लिक कम हो जाते हैं!
Comments (21)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
I am trying to use this in a shared workbook but I get a Microsoft Visual Basic error "Run-time error '1004": Application-defined or object-defined error" I am just looking for suggestions on how to get around this. Any help would be appreciated
This comment was minimized by the moderator on the site
Occurs when sheet is already locked
This comment was minimized by the moderator on the site
Thanks for the wonder full tool to protect & unprotect all the sheets at a time. Please guide me I am able to unprotect all sheets in my work book at a time but when I run protect all sheets VBA Code then only first 4 sheets are protected & rest or left unprotected. Please help me to sort out the issue.
This comment was minimized by the moderator on the site
How do I mask the password using the VBA method? I can not find this information via google or F1 help files. Thanks in advance!
This comment was minimized by the moderator on the site
Hi I used this code now I it wont accept my password to get back into my spreadsheet !!
This comment was minimized by the moderator on the site
I have chart tabs and worksheets in my Excel 2013 workbook. The VBA coding above works for the protecting the worksheets but not the separate chart tabs. How do i password protect the multiple chart tabs and multiple worksheets in my workbook? Thanks!
This comment was minimized by the moderator on the site
Hey, I need some help, the above code was very helpful, but it locks the sort (auto filter as well) can you please provide code to solve that problem and also where it would be inserted. Thank you in advance.
This comment was minimized by the moderator on the site
Thank you! This is awesome, I was even able to modify the VBA code so that I could unprotect all sheets at once! :) Sub unprotect_all_sheets() top: pass = InputBox("password?") repass = InputBox("Verify Password") If Not (pass = repass) Then MsgBox "you made a boo boo" GoTo top End If For i = 1 To Worksheets.Count Next For Each s In ActiveWorkbook.Worksheets s.Unprotect Password:=pass Next Exit Sub oops: MsgBox "I think you have some sheets that are already protected. Please unprotect all sheets B4 running this Macro." End Sub
This comment was minimized by the moderator on the site
when i activated this VBA, hyperlink doesn't work. how can i make them work? tnx :)
This comment was minimized by the moderator on the site
I am suddenly having the 1004 error as well. Anyone find a solution?
This comment was minimized by the moderator on the site
I'm suddenly having the error 1004 issue. Have been using the macro for months now it randomly fails.
There are no comments posted here yet
Load More
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations