इस लेख में, हम आपको 5 Excel VBA को सहेजने और वर्कबुक को बंद करने का उपयोग करने के तरीके दिखाएंगे। चूंकि समय बहुत मूल्यवान है, हम Excel VBA का उपयोग करके सांसारिक कार्यों को छोड़ कर बहुत समय बचा सकते हैं। इसके अलावा, हमने एक डेटासेट लिया है जिसमें 3 कॉलम : " नाम ", " बॉर्न ", और " नवीनतम कार्य " शामिल है। यह डेटासेट 6 लोगों के जन्म वर्ष और उनकी नवीनतम फिल्म जानकारी का प्रतिनिधित्व करता है।

प्रैक्टिस वर्कबुक डाउनलोड करें

वर्कबुक.xlsm को बचाने और बंद करने के लिए वीबीए

एक्सेल में वीबीए का उपयोग करके वर्कबुक को बचाने और बंद करने के 5 उदाहरण

1. एक्सेल वीबीए का उपयोग करके सक्रिय वर्कबुक को सहेजें और बंद करें

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

चरण:

अपना कोड टाइप करने से पहले हमें VBA मॉड्यूल लाने की आवश्यकता है । ऐसा करने के लिए -

• सबसे पहले, डेवलपर टैब >>> विज़ुअल बेसिक चुनें।

वैकल्पिक रूप से, आप ऐसा करने के लिए भी ALT + F11 दबा सकते हैं। इसके बाद “ Microsoft Visual Basic अनुप्रयोग के लिए ” दिखाई देगा।

• दूसरा, Insert से >>> मॉड्यूल चुनें।

यहां, हम टाइप करेंगेकोड।

• तीसरा, मॉड्यूल के अंदर निम्न कोड टाइप करें।

3625

VBA कोड ब्रेकडाउन

• सबसे पहले, हम अपनी सब प्रोसीजर Save_and_Close_Active_Workbook कॉल कर रहे हैं .
• फिर, हम अपनी वर्तमान कार्यपुस्तिका को सक्रिय कार्यपुस्तिका के रूप में संदर्भित कर रहे हैं।
• उसके बाद, बंद करें विधि का उपयोग करके हम अपनी फ़ाइल बंद कर रहे हैं।
• आखिरकार, हमने SaveChanges को True पर सेट कर दिया है, जिससे हमारी वर्कबुक सेव हो जाएगी बंद होने पर ।

अब, हम अपना कोड निष्पादित करेंगे।

• पहले, सहेजें यह मॉड्यूल .
• दूसरा, हमारे कोड के अंदर क्लिक करें।
• अंत में, रन बटन दबाएं।

अगर हम अपने Excel Application पर जाते हैं, तो हम देखेंगे कि हमारी वर्कबुक बंद है। इस प्रकार, हमने Excel VBA का उपयोग करके कार्यपुस्तिका को सफलतापूर्वक सहेज लिया है और बंद कर दिया है।

और पढ़ें: एक्सेल में सभी कार्यपुस्तिकाओं के लिए मैक्रो कैसे बचाएं (आसान चरणों के साथ)

2. विशिष्ट कार्यपुस्तिका को सहेजने और बंद करने के लिए एक्सेल VBA

दूसरी विधि के लिए, हम सेव और क्लोज़ एक विशिष्ट वर्कबुक दूसरे VBA कोड का उपयोग करके उपयोग करेंगे। यहां, हमने दो वर्कबुक खोली हैं और हम बाईं ओर से सेव और बंद पहली वर्कबुक करेंगे।

चरण:

• पहले, जैसा कि विधि 1 में दिखाया गया है, VBA को सामने लाएंमॉड्यूल ।
• दूसरी बात यह कोड उस मॉड्यूल के अंदर टाइप करें।

2198

• सबसे पहले, हम अपनी सब प्रोसीजर Save_and_Close_Specific_Workbook को कॉल कर रहे हैं।
• फिर, हम वर्कबुक ऑब्जेक्ट के अंदर हमारी पहली वर्कबुक का जिक्र कर रहे हैं।
• उसके बाद, बंद करें विधि का उपयोग करके हम बंद कर रहे हैं हमारी फ़ाइल।
• अंत में, हमने SaveChanges से True सेट किया है, जो बंद होने पर हमारी कार्यपुस्तिका को सहेज लेगा .

• तीसरा, जैसा कि विधि 1 में दिखाया गया है, कोड को निष्पादित करें।

इसके बाद, हम देखेंगे कि पहला कार्यपुस्तिका बंद है और केवल दूसरी कार्यपुस्तिका खुली है । इसलिए, हमने आपको सेविंग और क्लोजिंग एक वर्कबुक का एक और तरीका दिखाया है।

और पढ़ें: Excel VBA: शीट को नई वर्कबुक के रूप में बिना खोले सेव करें

3. विशिष्ट फ़ोल्डर में विशिष्ट वर्कबुक को सहेजें और बंद करें

तीसरी विधि के लिए , हम सहेजने और एक फ़ोल्डर में एक विशिष्ट कार्यपुस्तिका Excel VBA का उपयोग करके सहेजने और बंद करने जा रहे हैं।<3

चरण:

• पहले, जैसा कि विधि 1 में दिखाया गया है, VBA मॉड्यूल लाएं।
• दूसरा, इस कोड को उस मॉड्यूल के अंदर टाइप करें।

6539

VBA कोड ब्रेकडाउन

• सबसे पहले, हम अपने सब को कॉल कर रहे हैंप्रक्रिया Save_and_Close_Workbook_in_Specific_Folder ।
• उसके बाद, SaveAs पद्धति का उपयोग करके हम अपनी फ़ाइल को एक विशिष्ट स्थान पर सहेज रहे हैं।
• फिर, हम फ़ाइल नाम को मूल कार्यपुस्तिका के समान रखते हैं।
• अंत में, हम अपनी कार्यपुस्तिका को बंद करते हैं ।

• तीसरा, जैसा कि मेथड 1 में दिखाया गया है, कोड को एक्जीक्यूट करें।

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

और पढ़ें: पीडीएफ को विशिष्ट फ़ोल्डर में सहेजने के लिए एक्सेल वीबीए मैक्रो (7 आदर्श उदाहरण)

समान रीडिंग

• Excel VBA: बिना किसी संकेत के कार्यपुस्तिका को सहेजें (आसान चरणों के साथ)
• [फिक्स किया गया!] एक्सेल मेरे स्वरूपण को सहेज क्यों नहीं रहा है ? (7 संभावित कारण)
• Excel को PDF लैंडस्केप के रूप में कैसे सेव करें (त्वरित चरणों के साथ)
• Excel VBA से पथ का उपयोग करके फ़ाइल के रूप में सहेजें सेल (त्वरित चरणों के साथ)
• [फिक्स्ड!] एक्सेल सीएसवी फ़ाइल सहेजे नहीं जा रहे परिवर्तन (6 संभावित समाधान)

4। Excel में कार्यपुस्तिका सहेजें और बंद करें

चौथी विधि के लिए, हम Excel में कार्यपुस्तिका को बंद करने और सहेजने के लिए VBA बटन बनाने जा रहे हैं।

चरण:

• सबसे पहले, जैसा कि विधि 1 में दिखाया गया है, VBA को सामने लाएंमॉड्यूल ।
• दूसरा, इस कोड को उस मॉड्यूल के अंदर टाइप करें।

9487

• सबसे पहले, हम अपने सब प्रोसीजर बटन_क्लिक_सेव_एंड_क्लोज_वर्कबुक को कॉल कर रहे हैं।
• उसके बाद, सेव मेथड का उपयोग करके हम सेव अपनी वर्कबुक
• आखिरकार, हम क्लोज हमारी वर्कबुक का उपयोग कर रहे हैं Quit तरीका।

अब, हम यहां VBA बटन डालेंगे।

• सबसे पहले, डेवलपर<2 से> टैब >>> सम्मिलित करें >>> बटन (फॉर्म कंट्रोल) चुनें।

• फिर, माउस कर्सर बदल जाएगा और बॉक्स वर्कबुक के अंदर।

उसके बाद, मैक्रो असाइन करें संवाद बॉक्स दिखाई देगा।

• फिर, " बटन_क्लिक_सेव_एंड_क्लोज़_वर्कबुक " चुनें।
• उसके बाद, ओके दबाएं।

<3

फिर, हम वर्कबुक में बटन 1 देखेंगे।

• अंत में, बटन पर क्लिक करें।

यह बचाएगा और बंद हमारी कार्यपुस्तिका ।

और पढ़ें: एक्सेल में सेव बटन के लिए VBA कोड (4 वेरिएंट)

5. एक्सेल VBA को लागू करते हुए सभी ओपन वर्कबुक को सेव और क्लोज करें

इस आखिरी विधि में, हम सभी खुली कार्यपुस्तिकाएं को सहेजने और बंद करने जा रहे हैं। इस बार, हमारे पास वही दो कार्यपुस्तिकाएँ हैं, जैसा कि विधि 3 में है, हालाँकि, इस बार, हम सहेजेंगे और बंद दोनों कार्यपुस्तिकाएं । यहां, हम फॉर नेक्स्ट लूप का उपयोग अपनी वर्कबुक्स के माध्यम से जाने के लिए करेंगे।

चरण:

• सबसे पहले, जैसा कि विधि 1 में दिखाया गया है, VBA मॉड्यूल लाएं।
• दूसरा, इस कोड को उसके अंदर टाइप करें मॉड्यूल ।

8016

वीबीए कोड ब्रेकडाउन

• पहले , हम अपने उप प्रक्रिया CloseAndSaveOpenWorkbooks को कॉल कर रहे हैं। .
• उसके बाद, सेव मेथड का उपयोग करके हम सेव अपनी फाइल्स कर रहे हैं।
• फिर, हम बंद हमारी वर्तमान कार्यपुस्तिका को छोड़कर सभी कार्यपुस्तिकाएं । 1> प्रॉपर्टी से बाहर निकलें।

• तीसरा, जैसा कि विधि 1 में दिखाया गया है, कोड निष्पादित करें।

इसलिए, यह सहेजेगा और बंद दो कार्यपुस्तिकाएं करेगा। हम देख सकते हैं कि तारीख संशोधित दोनों कार्यपुस्तिकाओं के लिए समान है। अंत में, हमने 5 भिन्न Excel VBA मैक्रो सहेजने और कार्यपुस्तिका को बंद करने को दिखाया है।

और पढ़ें: मैक्रो को पर्सनल मैक्रो वर्कबुक में कैसे सेव करें?

निष्कर्ष

हमने आपको दिखाया है 5 त्वरित और आसान समझने के लिए Excel VBA to सेव और वर्कबुक को बंद करें । यदि आपको कोई समस्या आती है, तो बेझिझक नीचे टिप्पणी करें। इसके अलावा, आप हमारी साइट पर जा सकते हैं Exceldemy अधिक Excel से संबंधित लेखों के लिए। पढ़ने के लिए धन्यवाद, उत्कृष्ट प्रदर्शन करते रहें!