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

सक्रिय कार्यपुस्तिका को छोड़कर सभी कार्यपुस्तिकाओं को शीघ्रता से कैसे बंद करें?

लेखक: ज़ियाओयांग अंतिम संशोधित: 2014-11-28

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

VBA कोड के साथ सक्रिय कार्यपुस्तिका को छोड़कर सभी कार्यपुस्तिकाएँ बंद करें

Office Tab से सक्रिय कार्यपुस्तिका को छोड़कर सभी कार्यपुस्तिकाएँ बंद करें


तीर नीला दायां बुलबुला VBA कोड के साथ सक्रिय कार्यपुस्तिका को छोड़कर सभी कार्यपुस्तिकाएँ बंद करें

निम्नलिखित वीबीए कोड के साथ, आप सक्रिय कार्यपुस्तिका को छोड़कर सभी खुली हुई कार्यपुस्तिकाओं को तुरंत बंद कर सकते हैं, कृपया ऐसा करें:

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

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

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

वीबीए कोड: सक्रिय कार्यपुस्तिका को छोड़कर सभी कार्यपुस्तिकाएं बंद करें

Private Sub CloseOtherWorkbook()
'Update 20141126
Dim xWB As Workbook
Application.ScreenUpdating = False
For Each xWB In Application.Workbooks
    If Not (xWB Is Application.ActiveWorkbook) Then
        xWB.Close
    End If
Next
Application.ScreenUpdating = True
End Sub

4। फिर दबायें F5 इस कोड को चलाने के लिए कुंजी, और फिर अन्य सभी कार्यपुस्तिकाएं एक ही बार में बंद कर दी गई हैं, लेकिन केवल सक्रिय को छोड़ दें।


तीर नीला दायां बुलबुला Office Tab से सक्रिय कार्यपुस्तिका को छोड़कर सभी कार्यपुस्तिकाएँ बंद करें

यदि आप किसी नये उत्पाद में रुचि रखते हैं - कार्यालय टैब, यह आपको एक ही टैब वाली विंडो में कई दस्तावेज़/फ़ाइलें खोलने में मदद कर सकता है, इसके साथ, आप सभी कार्यपुस्तिकाओं को बंद कर सकते हैं लेकिन एक क्लिक के साथ सक्रिय छोड़ सकते हैं। आप अधिक जान सकते हैं और डाउनलोड कर सकते हैं कार्यालय टैब से यहाँ उत्पन्न करें.

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

दस्तावेज़-बंद करें-अन्य-कार्यपुस्तिकाएँ-1

फिर उस कार्यपुस्तिका के नाम पर क्लिक करें जिसे आप खुला छोड़ना चाहते हैं, और नाम टैब पर राइट क्लिक करें, फिर चुनें अन्य बंद करें संदर्भ मेनू से, स्क्रीनशॉट देखें:

दस्तावेज़-बंद करें-अन्य-कार्यपुस्तिकाएँ-1

और फिर, आप देख सकते हैं कि केवल आपकी सक्रिय कार्यपुस्तिका खोली गई है।


संबंधित लेख:

Excel में सभी कार्यपुस्तिकाओं को शीघ्रता से कैसे बंद करें?

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

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

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

Description


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

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