वर्कशीट द्वारा विभाजन कार्यपुस्तिका - एक्सेल टिप्स

आपके पास कई कार्यपत्रकों वाली कार्यपुस्तिका है। आप प्रत्येक कार्यपत्रक को किसी भिन्न व्यक्ति को भेजना चाहते हैं। आज, उस डेटा को विभाजित करने के लिए एक मैक्रो।

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

• जो + अन्य प्रत्येक वर्कशीट को एक अलग फाइल में सेव करने का तरीका खोज रहे हैं
• पावर क्वेरी के लिए या शो रिपोर्ट फ़िल्टर पेज का उपयोग करने के बाद उपयोगी है

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

पॉडकास्ट, एपिसोड 2107 से एक्सेल सीखें - प्रत्येक वर्कशीट को नई वर्कबुक में विभाजित करें

अरे वापस स्वागत है। मैं और नेटकास्ट करूंगा। मैं बिल जेलन हूं।

मैंने अपने सिर के पीछे जाना है कि मुझे लंबे समय से ऐसा करने की ज़रूरत है, लेकिन हाल ही में दो पॉडकास्ट वास्तव में इसे घर ले आए।

अभी हाल ही के एपिसोड २१०६ में, जहाँ हम ऑल स्लीकर कॉम्बिनेशन से एक पीडीएफ बना रहे थे। उस एपिसोड में देर से मैंने एक वैकल्पिक तरीका दिखाया, जहाँ हम कई धुरी रिपोर्ट बनाते हैं, लेकिन यह उन सभी को एक ही कार्यपुस्तिका में रखता है और मुझे जोया से एक ईमेल मिला है, जो अच्छी तरह से कहता है, देखो मुझे प्रत्येक वर्कशीट को एक अलग ग्राहक को भेजने की आवश्यकता है, और एक ही बात, मेरे लाइव पावर एक्सेल सेमिनार में, जहां मैं उस ट्रिक को दिखाता हूं, लोग कहते हैं, अच्छा नहीं, हम यह सब एक ही वर्कबुक में नहीं चाहते हैं, हम इसे अलग से चाहते हैं और फिर शायद उससे भी ज्यादा महत्वपूर्ण है, एपिसोड 2077, जहां मैंने इस बारे में बात की थी कि कैसे पावर क्वेरी अब एक फ़ोल्डर में सभी एक्सेल फाइलों को संयोजित करने की क्षमता रखती है, है ना? और यह चमत्कारी है। यह बहुत अच्छा काम करता है। यदि आपके पास 400 एक्सेल फाइलें हैं, जिनमें से प्रत्येक में एक एकल वर्कशीट है, तो यह उन सभी वर्कशीट के सभी डेटा को हड़प लेगा और इसे एक ग्रिड में डाल देगा।जो भयानक है, लेकिन अगर हम लगभग एक ही समस्या थी। 400 वर्कशीट के साथ एक वर्कबुक? यह सही नहीं कर सकता। यह उससे निपट नहीं सकता - फिर भी। ठीक है, अभी, 1 जुलाई 2017, यह उस के साथ सौदा नहीं कर सकता। हो सकता है कि छह महीने में वह इससे निपट सके, लेकिन अभी इसके लिए सिंगल शीट वर्कबुक होनी चाहिए।

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

ठीक है? और निश्चित रूप से हर एक व्यक्ति के लिए, वह सामान, वे, वर्कशीट की वह सूची, जिसे हम विभाजित नहीं करना चाहते हैं, वह अलग होने वाली है, लेकिन मैं यह अनुमान लगाने जा रहा हूं कि लगभग सभी के पास कुछ वर्कशीट हैं, जो वे दान नहीं करते हैं ' t विभाजन करना चाहते हैं।

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

ठीक है और फिर फिर से इसे यथासंभव सामान्य बनाने के लिए, मुझे यहां कई नामित श्रेणियां मिली हैं, मेरा पथ, मेरा उपसर्ग, मेरा प्रत्यय, मेरा प्रकार और मेरा पेस्ट। ठीक है, इसलिए आप यह पता लगाते हैं कि आप इस सामान को कहाँ जाना चाहते हैं। c: रिपोर्ट । मैं चाहता हूं कि हर फ़ाइल में शीट का नाम हो, लेकिन शीट के नाम से पहले, मैं WB, फ़ाइल प्रत्यय और कुछ नहीं का उपसर्ग लगाने जा रहा हूं और फिर आपके पास यहाँ एक विकल्प है: PDF या XLSX।

तो हम XLSX के साथ शुरू करने जा रहे हैं, हम बाद में बचत करने से पहले इस पेस्ट मूल्यों के बारे में बात करेंगे। ठीक है और अभी यह पहली जुलाई 2017 का संस्करण है, पहले वाला। यदि हम इसमें सुधार करते हैं, तो मैं इसे वेबपृष्ठ पर प्रतिस्थापित कर दूंगा और आप YouTube विवरण में वेबपृष्ठ को नीचे पा सकते हैं। ठीक है तो यहाँ है कि यह कैसे काम करने जा रहा है। यह एक XLSM फ़ाइल है। इसलिए आपको यह सुनिश्चित करना होगा कि मैक्रोज़ को अनुमति दी जाए। alt = "" T, M, S, सुरक्षा के लिए आपको कम से कम इस स्तर पर या नीचे होना चाहिए। यदि आप शीर्ष पर हैं, तो आपको बदलने की आवश्यकता है, यह वर्कबुक को बंद कर देता है, फिर से खोल देता है। जब आप वर्कबुक खोलते हैं, तो यह कहने वाला होता है, क्या आप यहां मैक्रों को स्वीकार करने के लिए तैयार हैं और यह एक बड़ा मैक्रो नहीं है: कोड की अड़सठ लाइनें और बहुत कुछ बस मेनू से मान प्राप्त करने से संबंधित है। चादर,अब चर क्या हैं

हालांकि यहाँ महत्वपूर्ण बात यह है कि यह ActiveWorkbook पर काम करने वाला है। इसलिए आप उस कार्यपुस्तिका पर स्विच करने जा रहे हैं, जिसमें डेटा है और फिर उसे चलाने के लिए CTRL SHIFT S दबाएँ और यह ActiveWorkbook का पता लगाने जा रहा है और यह वह है जो इसे विभाजित करता है। यह ("मायपाथ") पकड़ लेता है और यह सिर्फ इसलिए है क्योंकि मैं हमेशा उस बैकलैश को रखना भूल जाता हूं, यदि अंतिम चरित्र बैकस्लैश नहीं है, तो मैं बैकस्लैश जोड़ने जा रहा हूं और फिर यहां नीचे वास्तविक काम है।

प्रत्येक वर्कशीट के लिए, मूल में, सक्रिय WBO.Worksheets में, हम यह देखने के लिए परीक्षण करने जा रहे हैं कि क्या यह एक है जो वहाँ पर है और कॉलम B. यदि यह है, यदि यह नहीं है तो हम इस शीट को निर्यात करने जा रहे हैं और मैं कोड की इस लाइन से प्यार है। WS.copy कहता है, जब मैं इस कार्यपुस्तिका, इस वर्कशीट को इस बड़ी कार्यपुस्तिका से ले रहा हूं, तो आप 20 या 400 कार्यपत्रकों को जानते हैं और हम WS.copy पर जा रहे हैं, जो इसकी एक प्रति बनाता है और इसे एक नए कार्यपुस्तिका पर ले जाता है और हम जानते हैं, हम जानते हैं कि नई कार्यपुस्तिका अब मैक्रो में सक्रिय कार्यपुस्तिका बन जाएगी और निश्चित रूप से उस कार्यपुस्तिका में केवल एक पत्रक है और वह पत्रक सक्रिय पत्रक है।

तो ठीक है, यहाँ मैं वर्कबुक के नाम का पता लगा सकता हूँ। इसे सेट करें, इस ऑब्जेक्ट पर लागू करें वैरिएबल, वर्कबुक नया, वर्कशीट नया और फिर बाद में, जब मुझे बंद करना होगा, तो मैंने काम करने के बाद WBN.close कर सकता है। हम सभी चर का उपयोग करके नए फ़ाइल नाम का पता लगाते हैं। उस फ़ाइल को मारें, अगर यह पहले से मौजूद है और फिर, अगर यह एक एक्सेल फाइल है, तो हम एक बचत के रूप में करते हैं, अगर यह पीडीएफ है।

और वैसे भी यह पीडीएफ कोड केवल विंडोज में काम करता है, यदि आप मैक पर हैं, तो क्षमा करें, आपको बराबर मैक कोड का पता लगाने के लिए कहीं और जाना होगा। मेरे पास मैक नहीं है। मुझे पता है कि एक मैक पर एक पीडीएफ को बचाने का एक तरीका है। मुझे पता है कि कोड अलग है। आपको यह पता लगाना होगा कि एक विंडोज में असली एक्सेल में वापस आ गया है या फिर हम कर रहे हैं, हम बंद कर देते हैं।

ठीक है, इसलिए यह सिर्फ एक साधारण सा मैक्रो है, हमारे डेटा वर्कबुक पर यहां स्विच करें, जिसमें सभी वर्कशीट हैं। यहां 20 अलग-अलग वर्कशीट हैं, साथ ही दो जो मैं नहीं करना चाहता हूं और फिर CTRL SHIFT S इसे पसंद करते हैं और हम इसे फ्लैश करेंगे क्योंकि यह हर एक को बनाता है। वहां हम हैं: 21 फाइलें बनाई गईं।

आइए विंडोज एक्सप्लोरर पर एक नज़र डालें और यहां मेरा ओएस (सी :) रिपोर्ट्स है, यह प्रत्येक वर्कशीट के लिए बनाया गया है, मूल कार्यपुस्तिका में नामित यह डब्ल्यूबी अप फ्रंट के साथ एक नया संस्करण बनाया गया है। अब ठीक है, जो, जब जो ने मुझे यह नोट भेजा है, उन्होंने कहा कि वह ग्राहकों को यह डेटा भेजने जा रहे हैं और मुझे पहली बार में घबराहट हुई है क्योंकि मैंने कहा, एक दूसरा जो रुको, हम एक समस्या है क्योंकि आप जा रहे हैं गैरी, उसके डेटा भेजने के लिए जा रहा है, है ना? लेकिन यह है, आह, आप एक लाइव, लाइव डेटा सेट जानते हैं, यह एक लाइव पिवट टेबल है। सामान के सभी यहाँ, आप उस जैसे अन्य ग्राहकों के लिए सभी जानकारी प्राप्त करने में सक्षम हो सकता है, है ना? लड़का, आप ग्राहक A को अन्य सभी ग्राहकों के लिए सूचना नहीं भेजना चाहते हैं। यह एक परेशानी हो सकती है और वास्तव में, जब मैं शो नोट को फिर से प्रसारित करता हूं, तो वह मुझसे ज्यादा चालाक था, क्योंकि उसने कहा:मैं उन्हें पीडीएफ फाइलों के रूप में बनाना चाहता हूं। मैं जैसा था, ठीक है, ठीक है, फिर, हाँ, हमें पीडीएफ फाइलों के बारे में चिंता करने की ज़रूरत नहीं है, यह ठीक है, लेकिन मैंने मैक्रो में जो कुछ जोड़ा है, वह बचत से पहले पेस्ट वैल्यूज़ कहने की क्षमता थी? सच।

So you set that equal to TRUE and that's going to invoke this tiny bit of code here, where we say, If PasteV Then the UsedRange.Copy and then UsedRange.PasteSpecial (xlPasteValues), UsedRange, rather than copying and pasting all 17 billion cells, it'll limit it down to well, the UsedRange.

Alright, so let's switch back, switch those Worksheet that has the data, CTRL SHIFT S for split and then this new version in the reports directory, you'll see that it has gotten rid of the Pivot Table and left just the data there. So that way they can't get to all data.

Alright, we'll try the other feature. We'll try if we switch from Excel to PDF change the prefix to PDFFileOf, whatever we want there. I won't even try the suffix, something. Alright and then switch to the data, CTRL SHIFT S. Alrighty, so we get the same files PDFFileOf the Worksheet name, something of PDF and we should have just nice little PDFs in there, like that.

Alright so there you have it the.com Worksheet Splitter. Hopefully generic enough, for whatever you need. Download it again from the link there in the YouTube comments. To learn more about VBA, check out this book Excel 2016 VBA and Macros by myself and Tracy ?08:50.640. Click that I on the top right hand corner, to read more about the book.

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

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

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

यहाँ नमूना फ़ाइल डाउनलोड करें: Podcast2107.xlsm