विषयसूची
जब भी आपको आवश्यकता हो आप एक शीट से दूसरी शीट या कार्यपुस्तिका में एक श्रेणी की प्रतिलिपि बना सकते हैं। कॉपी और पेस्ट करने के विभिन्न प्रकार हैं। इस लेख के बाद, आपको एक्सेल वीबीए कॉपी रेंज को दूसरी शीट पर उपयोग करने के विभिन्न तरीकों के बारे में पता चलेगा।
व्याख्या को जीवंत बनाने के लिए, मैं एक नमूना डेटासेट का उपयोग करने जा रहा हूं जो विशेष व्यक्तियों की व्यक्तिगत जानकारी का प्रतिनिधित्व करता है। . डेटासेट में 4 कॉलम होते हैं। ये कॉलम हैं प्रथम नाम, अंतिम नाम, पूरा नाम, और ईमेल ।
अभ्यास के लिए कार्यपुस्तिका डाउनलोड करें
रेंज को अन्य शीट में कॉपी करें। प्रारूपके साथ एक अन्य शीट में जब भी आप कॉपी चाहते हैं तो प्रारूप के साथ एक शीट से दूसरी शीट में एक सीमा कॉपी करें आप इसे <का उपयोग करके कर सकते हैं 2>VBA ।
यहाँ, मैं डेटासेट शीट से withFormat शीट की कॉपी करूंगा।
चलिए प्रक्रिया शुरू करते हैं,
सबसे पहले, डेवलपर टैब >> विज़ुअल बेसिक
चुनें आप ALT + F11 कीबोर्ड का उपयोग VBA <खोलने के लिए भी कर सकते हैं 3>संपादक।
अगला, यह अनुप्रयोगों के लिए Microsoft Visual Basic नाम से एक नई विंडो खोलेगा।
वहां से, Insert <3 खोलें>>> मॉड्यूल चुनें।
एक मॉड्यूल खुलेगा फिर खुले में निम्न कोड टाइप करें >> चुनें मैक्रोज़ देखें
➤ एक डायलॉग बॉक्स पॉप अप होगा।
अब, मैक्रो नाम से Copy_Range_BelowLastCell_AnotherSheets चुनें मैक्रोज़ इन के भीतर कार्यपुस्तिका भी चुनें।
अंत में, चलाएं चयनित मैक्रो ।
इसलिए, यह चयनित रेंज की कॉपी करेगा और इसे दूसरी शीट की अंतिम पंक्ति से चिपकाएगा .
8. वीबीए किसी रेंज को दूसरी वर्कबुक की आखिरी पंक्ति में कॉपी करें
अगर आप कॉपी करना चाहते हैं किसी अन्य कार्यपुस्तिका शीट की अंतिम पंक्ति तक आप VBA का भी उपयोग कर सकते हैं।
यहां, मैं डेटासेट2 से कॉपी की एक श्रेणी बनाऊंगा शीट से शीट1 की Book2 लेकिन पहले गैर-खाली सेल से।
प्रक्रिया शुरू करने के लिए,
सबसे पहले, डेवलपर टैब >> विजुअल बेसिक
चुनें VBA संपादक खोलने के लिए आप ALT + F11 कीबोर्ड का भी उपयोग कर सकते हैं। <1
अगला, यह अनुप्रयोगों के लिए Microsoft Visual Basic की एक नई विंडो खोलेगा।>>> मॉड्यूल चुनें।
एक मॉड्यूल खुलेगा फिर खुले हुए मॉड्यूल में निम्न कोड टाइप करें।
5669
यहां, मैंने उप प्रक्रिया Copy_Range_BelowLastCell_To_Another_Workbook जहां wsCopy और wsDestination <की घोषणा की 3>है वर्कशीट टाइप, lCopyLastRow और lDestLastRow हैं लंबा प्रकार।
सबसे पहले, सेट का इस्तेमाल शीट को कॉपी करने के लिए चर और गंतव्य शीट को सेट करने के लिए किया जाता है।
अगला, कॉपी रेंज में कॉलम A के डेटा के आधार पर अंतिम पंक्ति को खोजने के लिए पंक्ति विधि का उपयोग किया।
फिर से, पंक्ति विधि का उपयोग किया डेस्टिनेशन रेंज में कॉलम A के डेटा के आधार पर पहली खाली पंक्ति खोजने के लिए ऑफ़सेट एक प्रॉपर्टी को नीचे ले जाने के लिए भी इस्तेमाल किया गया।
अंत में, कॉपी किया गया डेटासेट2 शीट का डेटा Excel VBA कॉपी रेंज से दूसरी शीट.xlsm वर्कबुक से डेस्टिनेशन शीट1 वर्कबुक Book2.xlsx .
अब, कोड सहेजें और वर्कशीट पर वापस जाएं।
अगला, देखें टैब >> मैक्रोज़ >> चुनें मैक्रोज़ देखें
➤ एक डायलॉग बॉक्स पॉप अप होगा।
अब, मैक्रो नाम से Copy_Range_BelowLastCell_To_Another_Workbook चुनें मैक्रोज़ इन के भीतर कार्यपुस्तिका भी चुनें।
अंत में, चलाएं चयनित मैक्रो ।
इसलिए, यह कॉपी मौजूदा शीट से चयनित श्रेणी को किसी अन्य कार्यपुस्तिका की अंतिम पंक्ति में कॉपी करेगा।
<0
अभ्यास अनुभाग
मैंने एक्सेल VBA कॉपी रेंज के इन समझाए गए तरीकों का अभ्यास करने के लिए कार्यपुस्तिका में एक अभ्यास पत्र प्रदान किया है दूसरी शीट पर।
निष्कर्ष
इस लेख में, मैंने 8 अलग-अलग प्रकार के आसान और त्वरित तरीके बताए हैंएक्सेल वीबीए रेंज को दूसरी शीट में कॉपी करें। ये अलग-अलग तरीके आपको एक शीट से दूसरी शीट पर और एक शीट से दूसरी वर्कबुक में कॉपी करने में मदद करेंगे। अंतिम लेकिन कम से कम, यदि आपके पास किसी भी प्रकार के सुझाव, विचार और प्रतिक्रिया है, तो कृपया नीचे टिप्पणी करने में संकोच न करें।
मॉड्यूल।7695
यहाँ, मैंने उप प्रक्रिया Copy_Range_withFormat_ToAnother_Sheet
की घोषणा की मैंने रेंज B1:E10 को मौजूदा शीट से शीट के नाम withFormat में कॉपी करने के लिए लिया है।
यहाँ, मैंने कॉपी का उपयोग किया है चयनित श्रेणी को कॉपी करने के लिए विधि, कॉपी विधि किसी भी श्रेणी को प्रारूप के साथ कॉपी करती है।
अंत में, सहेजें कोड और कार्यपत्रक पर वापस जाएं .
अगला, देखें टैब >> मैक्रोज़ >> चुनें मैक्रोज़ देखें
➤ एक डायलॉग बॉक्स पॉप अप होगा।
अब, मैक्रो नाम से Copy_Range_withFormat_ToAnother_Sheet चुनें मैक्रोज़ इन के भीतर कार्यपुस्तिका भी चुनें।
अंत में, चलाएं चयनित मैक्रो ।
इसलिए, यह चयनित रेंज को प्रारूप के साथ मेरे द्वारा चुनी गई नई शीट में कॉपी कर देगा ( विथफॉर्मेट) ।
2. वीबीए बिना फॉर्मेट के एक रेंज को दूसरी शीट में कॉपी करें
यह भी है VBA का उपयोग करके फ़ॉर्मेट के बिना किसी अन्य शीट में कॉपी करना संभव है।
यहां, मैं कॉपी <3 करूंगा> डेटासेट शीट से बिना प्रारूप शीट तक की एक सीमा।
चलिए प्रक्रिया शुरू करते हैं,
अब, डेवलपर खोलें टैब >> चुनें विजुअल बेसिक ( ALT + F11 का उपयोग करें)
अगला, यह <2 खुल जाएगा>अनुप्रयोगों के लिए Microsoft Visual Basic।
फिर, Insert खोलें >> मॉड्यूल चुनें।
एक मॉड्यूल खुलेगा फिर खुले हुए मॉड्यूल में निम्न कोड टाइप करें।
8861
यहां, मैंने सब प्रोसीजर Copy_Range_WithoutFormat_Toanother_Sheet
मैंने रेंज ले ली है B1:E10 मौजूदा शीट से शीट के नाम विदाउटफॉर्मेट में कॉपी करने के लिए।
यहाँ, मैंने चयनित रेंज को कॉपी करने के लिए कॉपी विधि का उपयोग किया लेकिन यह भी उल्लेखित Paste:=xlPasteValues PasteSpecial विधि में ताकि यह केवल चयनित श्रेणी के Values पेस्ट करेगा, प्रारूप नहीं।
अंत में। , कोड सहेजें और वर्कशीट पर वापस जाएं।
अगला, देखें टैब >> मैक्रोज़ >> चुनें मैक्रोज़ देखें
➤ एक डायलॉग बॉक्स पॉप अप होगा।
अब, मैक्रो नाम से Copy_Range_WithoutFormat_Toanother_Sheet का चयन करें और मैक्रोज़ में के भीतर कार्यपुस्तिका का भी चयन करें।
अंत में, चयनित मैक्रो चलाएं।
इस प्रकार, यह प्रतिलिपि चयनित श्रेणी केवल मानों नहीं प्रारूप<3 के साथ>.
3. प्रारूप और कॉलम चौड़ाई
कभी-कभी आप के साथ अन्य शीट में एक रेंज कॉपी कर सकते हैं किसी भी चयनित श्रेणी को ज्यों का त्यों कॉपी करें, उसके लिए आप प्रारूप और कॉलम चौड़ाई वाली श्रेणी को कॉपी कर सकते हैं।
यहाँ, मैं डेटासेट शीट से फ़ॉर्मेट और amp; स्तंभ की चौड़ाई शीट.
VBA ,
पहले, डेवलपर टैब >> विजुअल बेसिक
चुनें VBA संपादक खोलने के लिए आप ALT + F11 कीबोर्ड का भी उपयोग कर सकते हैं। <1
अगला, यह अनुप्रयोगों के लिए Microsoft Visual Basic की एक नई विंडो खोलेगा।
वहां, Insert खोलें >> मॉड्यूल चुनें।
एक मॉड्यूल खुलेगा फिर खुले हुए मॉड्यूल में निम्न कोड टाइप करें।
5770
यहां, मैंने सब प्रोसीजर Copy_Range_to_Another_Sheet_with_FormatAndColumnWidth
मैंने रेंज ले ली है B1:E10 मौजूदा शीट से गंतव्य शीट नाम प्रारूप और amp; कॉलम की चौड़ाई ।
यहां, मैंने चयनित रेंज को कॉपी करने के लिए कॉपी विधि का उपयोग किया। मैंने PasteSpecial पद्धति का भी उपयोग किया जहां मैंने Paste:=xlPasteColumnWidths का उल्लेख किया ताकि यह चयनित श्रेणी को प्रारूप और स्तंभ की चौड़ाई के साथ पेस्ट कर सके .
अंत में, कोड सहेजें और वर्कशीट पर वापस जाएं।
अगला, देखें टैब >> मैक्रोज़ >> चुनें मैक्रोज़ देखें
➤ एक डायलॉग बॉक्स पॉप अप होगा।
अब, मैक्रो नाम से Copy_Range_to_Another_Sheet_with_FormatAndColumnWidth का चयन करें और मैक्रोज़ में के भीतर कार्यपुस्तिका का चयन करें।
अंत में, भागो चयनित मैक्रो ।
नतीजतन, यह कॉपी चयनित रेंज को प्रारूप और कॉलम चौड़ाई के साथ कॉपी करेगा।<1
4. वीबीए फॉर्मूला
अगर आपके डेटासेट में कोई फॉर्मूला है, जिसे आप कॉपी करना चाहते हैं, तो रेंज को दूसरी शीट में कॉपी करें। चिंता न करें! आप फ़ॉर्मूला वाली रेंज को फ़ॉर्मूला बरकरार रखते हुए दूसरी शीट पर कॉपी कर सकते हैं।
यहां, मैं डेटासेट शीट से कॉपी एक रेंज to WithFormula sheet
प्रक्रिया शुरू करते हैं,
शुरू करने के लिए, डेवलपर टैब >> विज़ुअल बेसिक चुनें ( आप ALT + F11 कीबोर्ड का भी उपयोग कर सकते हैं)
अगला, यह अनुप्रयोगों के लिए Microsoft Visual Basic को खोलेगा।
वहाँ से, Insert >> मॉड्यूल चुनें।
एक मॉड्यूल खुलेगा फिर खुले हुए मॉड्यूल में निम्न कोड टाइप करें।
4502
यहाँ, मैंने उप प्रक्रिया Copy_Range_withFormula_ToAnother_Sheet
मैंने सीमा ले ली है B1:E10 मौजूदा शीट से डेस्टिनेशन शीट नाम WithFormula पर कॉपी करने के लिए।
यहाँ, मैंने चयनित रेंज को कॉपी करने के लिए कॉपी विधि का उपयोग किया। मैंने PasteSpecial पद्धति का भी उपयोग किया, जहां मैंने Paste:=xlPasteFormulas का उल्लेख किया, ताकि इसमें चयनित श्रेणी के साथ Formulas भी हो।
आखिरकार , कोड सहेजें और वर्कशीट पर वापस जाएं।
फिर, दृश्य खोलें टैब >> मैक्रोज़ >> चुनें मैक्रोज़ देखें
➤ एक डायलॉग बॉक्स पॉप अप होगा।
अब, मैक्रो नाम से Copy_Range_withFormula_ToAnother_Sheet चुनें मैक्रोज़ के भीतर कार्यपुस्तिका भी चुनें।
अंत में, चलाएं चयनित मैक्रो ।
इस प्रकार, यह कॉपी सभी चयनित सेल रेंज सूत्र के साथ होगा।
समान रीडिंग:
- VBA रेंज ऑफ़सेट का उपयोग कैसे करें (11 तरीके)
- एक्सेल में रेंज में प्रत्येक सेल के लिए वीबीए (3 तरीके)
- एक्सेल में वीबीए के रेंज ऑब्जेक्ट का उपयोग कैसे करें (5 गुण)
5. किसी श्रेणी को ऑटोफ़िट के साथ दूसरी शीट में कॉपी करें
जब किसी श्रेणी को दूसरी शीट में कॉपी करते समय आप ऑटोफ़िट पद्धति का भी उपयोग कर सकते हैं VBA से AutoFit नई शीट में कॉपी की गई रेंज।
यहां, मैं डेटासेट से कॉपी एक रेंज शीट टू ऑटोफिट शीट
चलिए प्रक्रिया शुरू करते हैं,
सबसे पहले, डेवलपर टैब >> विजुअल बेसिक
चुनें VBA संपादक खोलने के लिए आप ALT + F11 कीबोर्ड का भी उपयोग कर सकते हैं। <1
अगला, यह अनुप्रयोगों के लिए Microsoft Visual Basic की एक विंडो खोलेगा।
फिर, Insert > खोलें ;> मॉड्यूल चुनें।
एक मॉड्यूल खुलेगा फिर खुले में निम्न कोड टाइप करें मॉड्यूल ।
7626
यहां, मैंने उप प्रक्रिया Copy_Range_withFormat_AutoFit
की घोषणा की सबसे पहले, मैंने वर्कशीट डेटासेट का चयन किया। फिर रेंज B1:E10 मौजूदा शीट से कॉपी करने के लिए ऑटोफिट नाम की डेस्टिनेशन शीट ले ली।
यहां, मैंने कॉपी का इस्तेमाल किया चुने गए रेंज को कॉपी करने का मेथड और ऑटोफिट मेथड दिए गए कॉलम बी:ई में ऑटोफिट हो जाएगा।
अंत में, सेव करें कोड और जाएं कार्यपत्रक पर वापस जाएँ।
अगला, देखें टैब >> मैक्रोज़ >> चुनें मैक्रोज़ देखें
➤ एक डायलॉग बॉक्स पॉप अप होगा।
अब, मैक्रो नाम से Copy_Range_withFormat_AutoFit चुनें मैक्रोज़ इन के भीतर कार्यपुस्तिका भी चुनें।
अंत में, चलाएं चयनित मैक्रो ।
इसलिए, यह चयनित रेंज को एक नई शीट में कॉपी कर देगा और ऑटोफिट कॉलम भी।
6. VBA किसी रेंज को दूसरी वर्कबुक में कॉपी करें
अगर आप चाहें तो रेंज को एक शीट से दूसरी शीट में कॉपी भी कर सकते हैं एक भिन्न कार्यपुस्तिका का।
यहां, मैं डेटासेट शीट से बुक1 की शीट1 की कॉपी की कॉपी करूंगा। कार्यपुस्तिका।
चलिए प्रक्रिया शुरू करते हैं,
सबसे पहले, डेवलपर टैब >> विज़ुअल बेसिक चुनें (y आप ALT + F11 कीबोर्ड का भी उपयोग कर सकते हैं)
फिर, यह Microsoft Visual खोलेगाएप्लीकेशन के लिए बेसिक।
अगला, इन्सर्ट >> मॉड्यूल चुनें।
एक मॉड्यूल खुलेगा फिर खुले हुए मॉड्यूल में निम्न कोड टाइप करें।
3152
यहां, मैंने सब प्रोसीजर Copy_Range_WithFormat_Toanother_WorkBook
मैंने रेंज <2 ले ली है>B3:E10 शीट नाम से डेटासेट मौजूदा शीट से नई कार्यपुस्तिका नाम बुक1 और शीट नाम शीट1 में कॉपी करने के लिए।
यहाँ, मैंने कॉपी विधि का उपयोग चयनित श्रेणी को नई कार्यपुस्तिका में कॉपी करने के लिए किया।
अंत में, कोड सहेजें और कार्यपत्रक पर वापस जाएं।
अगला, दृश्य टैब >> मैक्रोज़ >> चुनें मैक्रोज़ देखें
➤ एक डायलॉग बॉक्स पॉप अप होगा।
अब, मैक्रो नाम से Copy_Range_WithFormat_Toanother_WorkBook चुनें मैक्रोज़ इन के भीतर कार्यपुस्तिका भी चुनें।
अंत में, चलाएं चयनित मैक्रो ।
अब, यह चयनित रेंज को डेटासेट शीट से अन्य कार्यपुस्तिका में कॉपी करेगा।
7. किसी श्रेणी को किसी अन्य शीट की अंतिम पंक्ति में कॉपी करें
किसी भी स्थिति में, यदि आप किसी श्रेणी को दूसरी शीट में कॉपी करना चाहते हैं किसी विशेष सेल या अंतिम सेल से आप इसे VBA का उपयोग करके कर सकते हैं।
प्रक्रिया में प्रवेश करने से पहले, मैं आपको बताना चाहता हूं कि, मैंने दो नई शीट ली हैं जिनमें पूरा नाम, ईमेल, और पता ।
आइए पहले डेटासेट2 शीट देखें।
यहां अंतिम सेल के नीचे शीट है।
यहां, मैं कॉपी से एक श्रेणी डेटासेट2 शीट से अंतिम सेल के नीचे लेकिन पहले गैर-खाली सेल से।
शुरू करने के लिए, डेवलपर टैब >> Visual Basic
चुनें इसके बाद, यह Microsoft Visual Basic for Applications को खोलेगा।
फिर, खोलें >> डालें मॉड्यूल चुनें।
एक मॉड्यूल खुलेगा फिर खुले हुए मॉड्यूल में निम्न कोड टाइप करें।
4795
यहां, मैंने उप प्रक्रिया Copy_Range_BelowLastCell_AnotherSheets
सबसे पहले, मैंने शीट <2 का चयन किया>Dataset2 और फिर पंक्ति विधि का उपयोग अंतिम पंक्ति की गणना करने के लिए किया और lr में गिनने वाली पंक्ति को रखा।
फिर लिया गया श्रेणी A2:C & lr मौजूदा शीट से डेस्टिनेशन शीट नाम अंतिम सेल के नीचे पर कॉपी करने के लिए।
फिर से, पंक्ति विधि का उपयोग अंतिम को गिनने के लिए किया गया अंतिम सेल के नीचे नामक एक अन्य शीट की पंक्ति और lrAnotherSheet में गिने हुए पंक्ति को रखा।
यहाँ, मैंने कॉपी विधि का उपयोग किया चयनित रेंज को कॉपी करने के लिए और ऑटोफिट विधि दिए गए कॉलम A:C में स्वतः फिट हो जाएगी।
अंत में, सहेजें कोड और वापस जाएं कार्यपत्रक के लिए।
अगला, देखें टैब >> मैक्रोज़ से
