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

एक्सेल में पिवट टेबल की सुरक्षा कैसे करें?

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

एक्सेल में, हम अन्य उपयोगकर्ताओं द्वारा फ़ील्ड को खींचने या लेआउट को गड़बड़ाने से रोकने के लिए पिवट टेबल की सुरक्षा कैसे कर सकते हैं? इस लेख में, मैं वर्कशीट में पिवट टेबल की सुरक्षा के लिए कुछ तरीकों के बारे में बात करूंगा।

VBA कोड के साथ पिवट टेबल को सुरक्षित रखें

पिवट टेबल को सुरक्षित रखें लेकिन स्लाइसर तक पहुंच की अनुमति दें


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

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

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

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

वीबीए कोड: पिवट टेबल को सुरक्षित रखें

Sub RestrictPivotTable()
'Updateby Extendoffice
Dim xpf As PivotField
Application.ScreenUpdating = False
With ActiveSheet.PivotTables(1)
  .EnableDrilldown = False
  .EnableFieldList = False
  .EnableFieldDialog = False
  .PivotCache.EnableRefresh = False
  For Each xpf In .PageFields
    With pf
      .DragToPage = False
      .DragToRow = False
      .DragToColumn = False
      .DragToData = False
      .DragToHide = False
    End With
  Next xpf
End With
Application.ScreenUpdating = False
    MsgBox "The pivot table has been protected!", vbInformation, "Kutools for Excel"
End Sub

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

दस्तावेज़ पिवट तालिका 1 की सुरक्षा करें

टिप्पणियाँ:

1. यह कोड पिवट तालिका में कई सुविधाओं को अक्षम कर देगा, जैसे उपयोगकर्ताओं को किसी भी फ़ील्ड को किसी भिन्न स्थान पर खींचने से रोकना, और फ़ील्ड सूची, फ़ील्ड सेटिंग्स, ड्रिलडाउन और रीफ्रेश सुविधा को अक्षम करना।

2. यदि सक्रिय शीट में एकाधिक पिवट टेबल हैं, तो यह कोड केवल अंतिम पिवट टेबल पर लागू होता है।


तीर नीला दायां बुलबुला पिवट टेबल को सुरक्षित रखें लेकिन स्लाइसर तक पहुंच की अनुमति दें

कभी-कभी, आप पिवट टेबल की सुरक्षा करना चाह सकते हैं लेकिन फ़िल्टर फ़ंक्शन को लागू करने के लिए स्लाइसर तक पहुंच की अनुमति देना चाहते हैं, निम्नलिखित चरण आपके लिए लाभकारी हो सकते हैं।

1. स्लाइसर डालने के बाद उस पर राइट क्लिक करें और चुनें आकार और गुण संदर्भ मेनू से, स्क्रीनशॉट देखें:

दस्तावेज़ पिवट तालिका 2 की सुरक्षा करें

2. में प्रारूप स्लाइसर फलक, क्लिक करें गुण विकल्पों का विस्तार करने के लिए, और फिर अनचेक करें बंद विकल्प, स्क्रीनशॉट देखें:

दस्तावेज़ पिवट तालिका 3 की सुरक्षा करें

3. फिर फलक बंद करें, और फिर क्लिक करें समीक्षा > शीट को सुरक्षित रखें इस शीट को सुरक्षित रखने के लिए स्क्रीनशॉट देखें:

दस्तावेज़ पिवट तालिका 4 की सुरक्षा करें

4. बाहर निकले में शीट को सुरक्षित रखें डायलॉग बॉक्स, फिर जांचें अनलॉक सेल का चयन करें और पिवोटटेबल और पिवोटचार्ट का उपयोग करें विकल्प केवल में इस कार्यपत्रक के सभी उपयोगकर्ताओं को अनुमति दें सूची बॉक्स, और फिर पासवर्ड दर्ज करें और इसकी पुष्टि करें, स्क्रीनशॉट देखें:

दस्तावेज़ पिवट तालिका 5 की सुरक्षा करें

5। तब दबायें OK संवाद बंद करने के लिए बटन, और अब, जब आप पिवट टेबल रिपोर्ट पर क्लिक करते हैं और इसे बदलने का प्रयास करते हैं, तो इसे संशोधित नहीं किया जाएगा, लेकिन आप आवश्यकतानुसार स्लाइसर सुविधा लागू कर सकते हैं।

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

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

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

Description


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

  • Word, Excel, PowerPoint में टैब्ड संपादन और रीडिंग सक्षम करें, प्रकाशक, एक्सेस, विसियो और प्रोजेक्ट।
  • नई विंडो के बजाय एक ही विंडो के नए टैब में एकाधिक दस्तावेज़ खोलें और बनाएं।
  • आपकी उत्पादकता 50% बढ़ जाती है, और आपके लिए हर दिन सैकड़ों माउस क्लिक कम हो जाते हैं!
Comments (5)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
Thank you for this tip. My question is, how do I reverse the code and edit the pivot table now?
This comment was minimized by the moderator on the site
For Each xpf In .PageFields
With pf

а где "х" потеряли?))) должно же быть With xpf
This comment was minimized by the moderator on the site
The macro doesn't work it just throws an object error
This comment was minimized by the moderator on the site
Hi, andrew,
The code works well, after applying the code, you will get the prompt box to remind you the pivot table has been protected, and then close it, now, when changing any data in the pivot table, a warning message box will be pop out.
This comment was minimized by the moderator on the site
Does not work. Get a run error
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations