मैक्रो सेल से शीट्स बनाएं - एक्सेल टिप्स

आपके पास पाठ का एक कॉलम है। कॉलम के प्रत्येक पाठ के लिए, आप एक नया वर्कशीट और उस वर्कशीट को सेल में मान के लिए नाम देना चाहते हैं।

वीडियो देखेंा

• पाम प्रत्येक खाता संख्या के लिए एक वर्कशीट बनाना चाहता है
• वर्तमान में, वह शो रिपोर्ट फ़िल्टर पेज का उपयोग कर रही है
• तेजी से रास्ता खोज रहे हैं
• कार्यपुस्तिका को XLSM के रूप में सहेजें
• Macro Security को alt = "+ TMS से चेक करें और दूसरे स्तर पर सेट करें
• Alt + F11
• मॉड्यूल डालें
• दिखाए गए अनुसार कोड टाइप करें
• Alt + Q एक्सेल में लौटने के लिए
• Alt + F8
• मैक्रो का चयन करें और विकल्प पर क्लिक करें
• Ctrl + Shift + W को असाइन करें

वीडियो ट्रांसक्रिप्ट

पॉडकास्ट से एक्सेल सीखें, एपिसोड 2082: वर्कशीट मैक्रो बनाएँ

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

मेरा मतलब है कि वर्तमान में, पाम ने नोट किया कि वह बहुत ही चतुर तरीके से ऐसा कर रही है, उन सभी कार्यपत्रकों को कैसे बनाया जाए लेकिन यह अभी भी एक परेशानी है। वह डालें, पिवट टेबल, ओके और फिर उस नई पिवट टेबल से, वह अकाउंट्स क्षेत्र में और फिर डेटा को मान क्षेत्र में डालता है। और फिर, वह विकल्प पर जाती है, रिपोर्ट फ़िल्टर पृष्ठ दिखाएं, खाते के सभी पृष्ठ दिखाएं, और BAM! उसे चादरें मिलती हैं जैसे वह चाहती है। अब जब डेटा गलत स्थान पर है, तो वह वास्तव में कहती है कि इस समय वह सिर्फ हर चीज को समूहों में लेकर जाती है और फिर उस तरह की धुरी तालिकाओं को हटा देती है, ठीक है? इसलिए, यह वह विधि है जिसका वह अभी उपयोग कर रही है और मैं यह देखना चाहती हूं कि क्या मैं उस कार्यपत्रक से कुछ तेजी से कर सकती हूं।

तो जिस तरह से हम यह करने जा रहे हैं वह है कि आप शीट को प्री-सेलेक्ट करें, शीट को प्री-सेलेक्ट करें। इसके अलावा, यदि आपने पहले कभी मैक्रोज़ नहीं किया है, तो टॉम के लिए ऑल्ट + टी, मैरी के लिए एम, एस के लिए सैम और पहली पसंद से दूसरी पसंद में बदलाव करें। वास्तव में, वास्तव में महत्वपूर्ण, आपकी फ़ाइल जिसकी गारंटी है वह .xlsx के रूप में सहेजी गई है। यह काम नहीं करेगा यदि आप इसे इस तरह से छोड़ते हैं, तो आपको फ़ाइल करना होगा, इस रूप में सहेजें और इस एक्सेल मैक्रो-सक्षम कार्यपुस्तिका को चुनना होगा। वह शीर्ष एक डिफ़ॉल्ट है और वह शीर्ष एक भयानक फ़ाइल प्रारूप है जिसे मैक्रोज़ का उपयोग करने की अनुमति नहीं है।

ठीक है, इसलिए हम उस डेटा Alt + F11 का चयन करने जा रहे हैं, VBA संपादक को खोलता है। यदि आपने पहले कभी VBA नहीं किया है, तो आप इस बदसूरत स्क्रीन को यहाँ प्राप्त करने जा रहे हैं। इन्सर्ट, मॉड्यूल कहेंगे और हमारा नया मॉड्यूल है और आप इस कोड को टाइप करने जा रहे हैं: शब्द सब क्रिएटशीट्स ()। जैसे ही आप टाइप करते हैं कि वे एंड सब को डालने जा रहे हैं, लेकिन उन दोनों के बीच हम चयन के लिए प्रत्येक सेल के लिए कहने जा रहे हैं। हम कार्यपत्रक सेट करने जा रहे हैं और वास्तव में हमें यह कार्य करना चाहिए। वर्कशीट = वर्कशीट सेट करना चाहते हैं। जोड़ें। अब, Worksheets.Add को यह जानने की जरूरत है कि हम इसे कहाँ जोड़ना चाहते हैं और मैं क्या करना चाहता हूं क्या मैं सिर्फ इस कार्यपत्रक को जोड़ना चाहता हूं आखिरी कार्य के बाद वह कार्यपुस्तिका में है। इसलिए, अब हम यह बताने जा रहे हैं कि हमारे पास कितने वर्कशीट हैं। और यहाँ चलो बस कोशिश करते हैं, चलो कहते हैं: Debug.Print कार्यपत्रक।ठीक है, यह कहता है कि हमारे पास 4 हैं, चलो एक्सेल पर वापस जाएं और जांच करें। 1 2 3 4 इसलिए हम इसे 4 शीट के बाद जोड़ने जा रहे हैं। इसलिए रैप-अप के बाद, हमें एक नई वर्कशीट देखनी चाहिए और वह वर्कशीट वह है जहाँ हम अकाउंट 100 के लिए डेटा डालने जा रहे हैं।

अब ठीक है, WS.Name = cell.Value और फिर हमने फैसला किया कि हम खाते के दाईं ओर जो कुछ भी लेने जा रहे हैं: डेटा। और हम उस डेटा को लेने जा रहे हैं और इसे ब्रांड के नए वर्कशीट के सेल बी 1 में डाल दिया है जिसे हमने अभी बनाया है। इसलिए सेल से, सही, प्रत्येक सेल के लिए हम ऑफसेट 1 पंक्तियों 1 कॉलम पर जा रहे हैं और उस मान को पकड़ो, ठीक है? इसलिए हमारे पास हमारे मैक्रो हैं: फ़ाइल, बंद करें और Microsoft Excel में लौटें और फिर हम Alt + F8 दबाएंगे। Alt + F8, CreateSheets, विकल्प पर जाएंगे। लड़का, क्या अच्छा होने वाला है? Ctrl + Shift + W। वर्कशीट के लिए डब्ल्यू। इसलिए मैं वहां Shift + W दबाए रखता हूं, ठीक क्लिक करता हूं, और हम रद्द करें पर क्लिक कर सकते हैं। ठीक है, उन कक्षों का चयन करें और फिर Ctrl + Shift + W। लपेटें के बाद यहीं देखें - BAM! यह उन्हें हर एक पर है। इसमें प्रत्येक व्यक्ति की शीट से डेटा मिला। ठंडा, ठंडा रास्ता।

फ्लाई और निश्चित रूप से कई वर्कशीट बनाने में सक्षम होने के कारण, यह उससे कहीं अधिक काम करेगा। चलिए एक = ROW * 2 इसे नीचे, नीचे, नीचे, नीचे कॉपी करें और उन सभी का चयन करें - ओह रुको, हमें वहां पर कुछ डेटा डालना था। चलो इसे 2 के साथ भरें, ठीक है। और फिर Ctrl + Shift + W। बाम! ओह, मैंने पहले से ही एक शीट 49 का उपयोग किया था। लेकिन देखो, हम सभी पास तक थे, अंत में तेजी से रास्ता। कैसे फ्लाई पर विभिन्न कार्यपत्रकों का एक बहुत बनाने के लिए।

इस कड़ी में, विषय: पाम से इंडी, कॉलम ए में प्रत्येक खाता संख्या के लिए एक वर्कशीट बनाना चाहता है। वर्तमान में, वह पिवेट टेबल्स के शो रिपोर्ट फ़िल्टर पेज का उपयोग कर रहा है। वह तेजी से रास्ता तलाश रही है, ठीक है? तो हम कार्यपुस्तिका को XLSM के रूप में सहेजने जा रहे हैं। हम Alt + TMS पर जा रहे हैं और पहली पसंद नहीं, दूसरी पसंद पर सेट हैं। Alt + F11, अब हम VBA में हैं, मॉड्यूल डालें, दिखाए गए कोड को टाइप करें, Excel में लौटने के लिए Alt + Q, Alt + F8, मैक्रो नाम का चयन करें और विकल्प पर क्लिक करें, Ctrl + Shift + W पर असाइन करें।

अरे, मैं इंडियानापोलिस में अपने सेमिनार में शामिल होने के लिए पाम को धन्यवाद देना चाहता हूं। हमारे पास एक अच्छा समय था, अच्छा समूह। और मैं आपको रोकने के लिए धन्यवाद देना चाहता हूं। हम आपको अगली बार एक और नेटकास्ट से देखेंगे।

फ़ाइल डाउनलोड करें

यहां नमूना फ़ाइल डाउनलोड करें: पॉडकास्ट 2082.xlsm