बारह महीनों के लिए तालिकाओं के साथ एक कार्यपुस्तिका बनाएँ

वर्कबुक कैसे बनाएं और टेबल का नाम बदलें

ऐसी कार्यपुस्तिकाएँ बनाना चाहते हैं जिनमें बारह कार्यपत्रक हों ताकि आप वर्ष के प्रत्येक महीने के लिए डेटा एकत्र कर सकें? मैक्रो को यह आपके लिए स्वचालित रूप से करने दें।

निम्नलिखित मैक्रो बारह कार्यपत्रकों के साथ एक नई, खाली कार्यपुस्तिका बनाता है और महीने के नामों के शॉर्टहैंड रूप में अलग-अलग शीट्स को नाम देता है, यानी "जनवरी", "फरवरी" इत्यादि। यहां उपयुक्त मैक्रो है:

उप CreateMonth टेबल ()
पूर्णांक के रूप में मंद टैब संख्या
कार्यपुस्तिका के रूप में मंद नया
मंद नाम
नाम = सरणी ("जनवरी", "फरवरी", "मार्च", "अप्रैल", "मई", "जून", _
"जुलाई", "अगस्त", "सितंबर", "अक्टूबर", "नवंबर", "दिसंबर")
TabNumber = Application.SheetsInNewWorkbook
Application.SheetsInNewWorkbook = 12
नया सेट करें = कार्यपुस्तिकाएं। जोड़ें
Application.SheetsInNewWorkbook = TabNumber
TabNumber = 1 से 12 . के लिए
New.Worksheets (TabNumber) .Name = Names (TabNumber-1)
अगला टैब नंबर
अंत उप

शुरू करने के बाद, आपको बारह कार्यपत्रकों के साथ एक कार्यपुस्तिका प्राप्त होगी। निम्न आंकड़ा दिखाता है कि परिणाम कैसा दिखता है:

यदि आप महीने के नामों के बजाय अन्य नामों का उपयोग करना चाहते हैं, तो मान असाइनमेंट में नामों को "नाम" चर में अनुकूलित करें।

युक्ति: यदि आप जानना चाहते हैं कि एक्सेल में मैक्रो कैसे दर्ज करें और शुरू करें, तो आपको यहां एक संक्षिप्त विवरण मिलेगा: http://www.exceldaily.de/excel-makros-vba/artikel/d/so-haben-sie -macros- in-excel-ein.html