यह ट्यूटोरियल VBA का उपयोग करके एक नई कार्यपुस्तिका बनाने के लिए विभिन्न विधियों का प्रदर्शन करेगा।
नई कार्यपुस्तिका बनाएं
एक नई कार्यपुस्तिका बनाने के लिए बस उपयोग करें कार्यपुस्तिकाएँ।जोड़ें:
| 1 | कार्यपुस्तिकाएँ।जोड़ें |
नई जोड़ी गई कार्यपुस्तिका अब है सक्रिय कार्यपुस्तिका.
आप इसे इस कोड का उपयोग करके देख सकते हैं:
| 123456 | उप AddWB ()कार्यपुस्तिकाएँ।जोड़ेंMsgBox ActiveWorkbook.Nameअंत उप |
नई कार्यपुस्तिका बनाएं और ऑब्जेक्ट को असाइन करें
आप नई कार्यपुस्तिका को संदर्भित करने के लिए ActiveWorkbook ऑब्जेक्ट का उपयोग कर सकते हैं। इसका उपयोग करके, आप नई कार्यपुस्तिका को ऑब्जेक्ट वेरिएबल को असाइन कर सकते हैं:
| 1234 | कार्यपुस्तिका के रूप में मंद wbकार्यपुस्तिकाएँ।जोड़ेंडब्ल्यूबी = एक्टिववर्कबुक सेट करें |
लेकिन, कार्यपुस्तिका बनाते समय किसी चर को तुरंत कार्यपुस्तिका असाइन करना बेहतर / आसान होता है:
| 123 | कार्यपुस्तिका के रूप में मंद wbwb = कार्यपुस्तिकाएँ सेट करें। जोड़ें |
अब आप नई कार्यपुस्तिका को उसके चर नाम से संदर्भित कर सकते हैं।
| 1 | MsgBox wb.Name |
नई कार्यपुस्तिका बनाएं और सहेजें
आप एक नई कार्यपुस्तिका भी बना सकते हैं और इसे तुरंत सहेज सकते हैं:
| 1 | Workbooks.Add.SaveAs फ़ाइल नाम: = "NewWB" |
यह कार्यपुस्तिका को आपके डिफ़ॉल्ट फ़ोल्डर (उदा. मेरे दस्तावेज़) में एक .xlsx फ़ाइल के रूप में सहेज लेगा। इसके बजाय, आप कार्यपुस्तिकाओं को सहेजने के लिए हमारी मार्गदर्शिका के साथ SaveAs को अनुकूलित कर सकते हैं।
अब आप कार्यपुस्तिका को इसके नाम से संदर्भित कर सकते हैं:
| 1 | कार्यपुस्तिकाएं ("NewWB.xlsx")। सक्रिय करें |
यह कोड “NewWB.xlsx” को सक्रिय करेगा।
नई कार्यपुस्तिका बनाएं और पत्रक जोड़ें
वर्कबुक बनाने के बाद आप उसे एडिट कर सकते हैं। नई कार्यपुस्तिका में दो शीट जोड़ने के लिए यहां केवल एक उदाहरण दिया गया है (यह मानते हुए कि यह ActiveWorkbook है):
| 1 | ActiveWorkbook.Worksheets.Add Count:=2 |
