किसी साझा असुरक्षित कार्यपुस्तिका में पंक्तियों या स्तंभों को हटाने से कैसे रोकें?
जब आप किसी कार्यपुस्तिका को दूसरों के साथ साझा करते हैं, तो आप कार्यपुस्तिका की सुरक्षा किए बिना दूसरों को अपनी साझा कार्यपुस्तिका के कॉलम या पंक्तियों को हटाने से कैसे रोक सकते हैं? यहां मुझे एक वीबीए कोड मिला जो दूसरों को साझा कार्यपुस्तिका में कॉलम और पंक्तियों को हटाने से रोक सकता है।
VBA के साथ साझा कार्यपुस्तिका में पंक्तियों या स्तंभों को हटाने से रोकें
VBA के साथ साझा कार्यपुस्तिका में पंक्तियों या स्तंभों को हटाने से रोकें
1। दबाएँ ऑल्ट + F11 एक खोलने के लिए अनुप्रयोग के लिए माइक्रोसॉफ्ट विज़ुअल बेसिक खिड़की.
2। क्लिक करें सम्मिलित करें > मॉड्यूल एक मॉड्यूल विंडो खोलने के लिए, फिर निम्न VBA को विंडो में कॉपी करें।
वीबीए: पंक्तियों या स्तंभों को हटाने से रोकें।
Sub StopDeleteRowCols()
'Updateby20221221
Dim xBarControl As CommandBarControl
Application.OnKey "^{-}", ""
For Each xBarControl In Application.CommandBars.FindControls(ID:=293)
xBarControl.Enabled = False
Next
For Each xBarControl In Application.CommandBars.FindControls(ID:=294)
xBarControl.Enabled = False
Next
End Sub
3। क्लिक करें रन बटन या F5 इस कोड को चलाने के लिए कीबोर्ड पर कुंजी दबाएं।
फिर जब अन्य लोग चयनित कॉलम या पंक्तियों को हटाने के लिए राइट क्लिक करते हैं, तो संदर्भ मेनू में डिलीट विकल्प लागू नहीं किया जा सकता है। स्क्रीनशॉट देखें:
साथ ही, यह उपयोगकर्ताओं को पंक्तियों या स्तंभों को हटाने के लिए शॉर्टकट Ctrl + - कुंजियों का उपयोग करने से रोकता है।
नोट:
(1) यदि आपने अपनी कार्यपुस्तिका साझा की है समीक्षा > कार्यपुस्तिका साझा करें, अब आप कोई भी VBA मैक्रोज़ नहीं जोड़ सकते। इसलिए, बेहतर होगा कि आप कार्यपुस्तिका साझा करने से पहले VBA जोड़ें।
(2) यह वीबीए अक्षम कर देगा मिटाना जब आप चयनित कॉलम या पंक्तियों पर राइट क्लिक करते हैं तो सभी कार्यपुस्तिकाओं में संदर्भ मेनू में।
(3) पुनः स्थापित करना मिटाना संदर्भ मेनू में, कृपया दोनों को बदलें झूठा साथ में यह सच है उपरोक्त VBA में, और VBA को फिर से चलाएँ।
सर्वोत्तम कार्यालय उत्पादकता उपकरण
एक्सेल के लिए कुटूल के साथ अपने एक्सेल कौशल को सुपरचार्ज करें, और पहले जैसी दक्षता का अनुभव करें। एक्सेल के लिए कुटूल उत्पादकता बढ़ाने और समय बचाने के लिए 300 से अधिक उन्नत सुविधाएँ प्रदान करता है। वह सुविधा प्राप्त करने के लिए यहां क्लिक करें जिसकी आपको सबसे अधिक आवश्यकता है...
ऑफिस टैब ऑफिस में टैब्ड इंटरफ़ेस लाता है, और आपके काम को बहुत आसान बनाता है
- Word, Excel, PowerPoint में टैब्ड संपादन और रीडिंग सक्षम करें, प्रकाशक, एक्सेस, विसियो और प्रोजेक्ट।
- नई विंडो के बजाय एक ही विंडो के नए टैब में एकाधिक दस्तावेज़ खोलें और बनाएं।
- आपकी उत्पादकता 50% बढ़ जाती है, और आपके लिए हर दिन सैकड़ों माउस क्लिक कम हो जाते हैं!