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

वर्कबुक खोलने या बंद करने पर वीबीए मैक्रो कैसे चलाएं?

लेखक: रवि अंतिम संशोधित: 2020-09-02

कई मामलों में हम उन परिचालनों को प्राप्त करने के लिए वीबीए कोड का उपयोग कर सकते हैं जिनका एक्सेल अंतर्निहित फ़ंक्शन समर्थन नहीं करता है। लेकिन क्या आपने कभी कार्यपुस्तिका खोलने या बंद करने के प्रत्येक समय वीबीए मैक्रो को चलाने का प्रयास किया है। इस लेख में, मैं आपको बताऊंगा कि हर बार कार्यपुस्तिका खोलते या बंद करते समय VBA कोड कैसे चलाया जाता है।

कार्यपुस्तिका बंद करने या खोलने पर VBA कोड चलाएँ


कार्यपुस्तिका बंद करने या खोलने पर VBA कोड चलाएँ

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

2। डबल क्लिक करें प्रोजेक्ट में यह वर्कबुक - VBAप्रोजेक्ट खोलने के लिए फलक यह कार्यपुस्तिका (कोड) खिड़की.
खोलने या बंद करने पर दस्तावेज़ रन कोड 1

2. कोड विंडो में, चयन करें कार्यपुस्तिका बाईं ड्रॉप डाउन सूची से. ध्यान दें कि, डिफ़ॉल्ट रूप से, प्रारंभिक दाईं ड्रॉप डाउन सूची में प्रदर्शित किया जाएगा, यदि नहीं, तो इसे बदल दें प्रारंभिक.
खोलने या बंद करने पर दस्तावेज़ रन कोड 2

3. फिर पहली और आखिरी लाइन के बिना अपना कोड कॉपी करें और बीच में पेस्ट करें Private Sub Workbook_Open() और End Sub जैसा कि नीचे स्क्रीनशॉट में दिखाया गया है।
खोलने या बंद करने पर दस्तावेज़ रन कोड 3

4। तब दबायें सहेजें पॉपिंग रिमाइंडर डायलॉग में कोड को सेव करने के लिए बटन पर क्लिक करें नहीं.
खोलने या बंद करने पर दस्तावेज़ रन कोड 4

5 फिर ए इस रूप में सहेजें संवाद पॉप आउट हो जाता है, फ़ाइल को इस रूप में सहेजें एक्सेल मैक्रो-सक्षम वर्कबुक और फ़ाइल रखने के लिए एक फ़ोल्डर चुनें।
खोलने या बंद करने पर दस्तावेज़ रन कोड 5

6। क्लिक करें सहेजें बटन। अब कार्यपुस्तिका खुली होने पर कोड चलेगा।

यदि आप हर बार कार्यपुस्तिका बंद करते समय कोड चलाना चाहते हैं, तो चयन करें निष्क्रिय करें दाईं ओर ड्रॉप डाउन सूची से कोड विंडो, और उस कोड को कॉपी करें जिसे आप चलाएंगे और बीच में पेस्ट करेंगे Private Sub Workbook_Deactivate() और End Sub.

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

🤖 कुटूल्स एआई सहयोगी: निम्न के आधार पर डेटा विश्लेषण में क्रांति लाएं: बुद्धिमान निष्पादन   |  कोड जनरेट करें  |  कस्टम फ़ॉर्मूले बनाएं  |  डेटा का विश्लेषण करें और चार्ट बनाएं  |  कुटूल फ़ंक्शंस का आह्वान करें...
लोकप्रिय सुविधाएँ: डुप्लिकेट ढूंढें, हाइलाइट करें या पहचानें   |  रिक्त पंक्तियाँ हटाएँ   |  डेटा खोए बिना कॉलम या सेल को संयोजित करें   |   फॉर्मूला के बिना गोल ...
सुपर लुकअप: एकाधिक मानदंड 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
Hello,

I have used this VBA code with some success. I find that when I am working on more than one workbook at a time, each time I switch the focus from the macro enabled workbook to another workbook, the macro is run. I don't want it to run until I actually manually "CLOSE" the file. Do you now how I can accomplish that?
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations