जब हम कई एक्सेल शीट के साथ काम कर रहे होते हैं, तो कभी-कभी हमें एक स्प्रेडशीट से दूसरी स्प्रेडशीट में डेटा कॉपी करना पड़ता है। एक्सेल में किसी भी ऑपरेशन को चलाने के लिए VBA को लागू करना सबसे प्रभावी, तेज और सबसे सुरक्षित तरीका है। इस लेख में, हम आपको दिखाएंगे कि वीबीए मैक्रो के साथ एक्सेल में एक वर्कशीट से दूसरे वर्कशीट से डेटा को कॉपी और पेस्ट कैसे करें ।

वर्कबुक डाउनलोड करें

आप नि:शुल्क अभ्यास एक्सेल वर्कबुक यहां से डाउनलोड कर सकते हैं।

एक वर्कशीट से दूसरी वर्कशीट में कॉपी और पेस्ट करें।xlsm

एक्सेल में एक वर्कशीट से दूसरे वर्कशीट में डेटा को कॉपी और पेस्ट करने के लिए VBA के साथ 15 तरीके

इस सेक्शन में, आप 15 तरीके सीखेंगे कि कैसे आप से डेटा कॉपी कर सकते हैं एक वर्कशीट और उसे दूसरे में VBA के साथ एक्सेल में पेस्ट करें।

ऊपर वह डेटासेट है जिसे यह लेख हमारे उदाहरण के रूप में मानेगा। 3>

1. एक वर्कशीट से दूसरे में डेटा की एक श्रेणी को कॉपी और पेस्ट करने के लिए वीबीए मैक्रो को एम्बेड करें

वीबीए के साथ एक वर्कशीट से दूसरे में डेटा की एक श्रेणी को कॉपी और पेस्ट करने के चरणों का वर्णन किया गया है नीचे।

चरण:

• शुरुआत में, अपने कीबोर्ड पर Alt + F11 दबाएं या टैब पर जाएं डेवलपर -> Visual Basic खोलने के लिए Visual Basic Editor .

• पॉप-अप कोड में विंडो, मेनू बार से Insert -> मॉड्यूल .

• अब, नीचे दिए गए कोड को कॉपी करें औरएक्सेल में फ़िल्टर किए गए सेल (4 तरीके)
• रन टाइम एरर 1004: रेंज क्लास का पेस्टस्पेशल मेथड फेल हुआ
• लिंक कैसे पेस्ट करें और इसमें ट्रांसपोज करें एक्सेल (8 त्वरित तरीके)

12। उपरोक्त रेंज से कॉपी किए गए फॉर्मूला को रखते हुए एक रेंज के नीचे एक पंक्ति पेस्ट करें

जब आप किसी वैल्यू को कॉपी करना चाहते हैं और फॉर्मूला को अंदर रखना चाहते हैं इसे पेस्ट करते समय दूसरी पंक्ति, फिर VBA कोड के साथ आप कार्य को आसानी से निष्पादित कर सकते हैं।

चरण:

• पहले, दृश्य खोलें मूल संपादक डेवलपर टैब से और सम्मिलित करें एक मॉड्यूल कोड विंडो में।
• दूसरा, निम्नलिखित को कॉपी करें कोड और इसे कोड विंडो में पेस्ट करें।

8845

आपका कोड अब चलने के लिए तैयार है।

और पढ़ें: एक्सेल में एक सेल से दूसरे सेल में डेटा को स्वचालित रूप से कैसे कॉपी करें

हमारी उदाहरण कार्यपुस्तिका के नाम पर ध्यान दें, स्रोत कार्यपुस्तिका<19 . हम इस कार्यपुस्तिका से डेटासेट पत्रक से डेटा कॉपी करेंगे और इसे गंतव्य कार्यपुस्तिका नामक किसी अन्य कार्यपुस्तिका में किसी अन्य कार्यपत्रक में पेस्ट करेंगे खुला लेकिन सहेजा नहीं गयाअभी तक .

कदम:

• सबसे पहले, विजुअल बेसिक एडिटर से खोलें कोड विंडो में डेवलपर टैब और सम्मिलित करें एक मॉड्यूल ।
• दूसरा, निम्नलिखित कोड कॉपी करें और <इसे कोड विंडो में 1>पेस्ट करें ।

1924

आपका कोड अब चलने के लिए तैयार है।

• अगला, इस कोड को चलाएं ।

डेटासेट शीट से स्रोत वर्कबुक को अब शीट1 शीट में डेस्टिनेशन वर्कबुक में कॉपी किया गया है।

और पढ़ें: Excel VBA: सेल वैल्यू को कॉपी करें और दूसरे सेल में पेस्ट करें

14। एक अन्य खुली और सहेजी गई कार्यपुस्तिका में डेटा को एक शीट से दूसरी शीट में पुन: उत्पन्न करने के लिए मैक्रो

इस बार, हम डेटा की प्रतिलिपि डेटासेट<19 से करेंगे शीट स्रोत वर्कबुक से और पेस्ट इसे शीट2 वर्कशीट <1 में पेस्ट करें डेस्टिनेशन वर्कबुक । लेकिन अब, वर्कबुक ओपन और सेव है ।

स्टेप्स:

• पहले, विजुअल बेसिक एडिटर<2 खोलें> डेवलपर टैब से और सम्मिलित करें एक मॉड्यूल कोड विंडो में।
• दूसरा, निम्नलिखित कोड कॉपी करें और इसे कोड विंडो में पेस्ट करें ।

4712

आपका कोड अब चलने के लिए तैयार है।

• इसके बाद, इस कोड को चलाएं । 1> स्रोतवर्कबुक अब शीट2 शीट में डेस्टिनेशन वर्कबुक में कॉपी हो गई है। और नाम को देखो, यह कार्यपुस्तिका इस बार सहेजी गई थी।

  और पढ़ें: बिना प्रारूप बदले एक्सेल में कॉपी और पेस्ट कैसे करें<2

  15. किसी अन्य बंद वर्कबुक में एक वर्कशीट से दूसरे वर्कशीट में डेटा कॉपी और पेस्ट करने के लिए VBA लागू करें

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

  चरण:

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

  9597

  आपका कोड अब चलने के लिए तैयार है।

  

  • अगला, इस कोड को चलाएं ।

  

  भले ही, इस बार वर्कबुक थी बंद लेकिन कोड निष्पादन के बाद भी, डेटासेट शीट से डेटा स्रोत कार्यपुस्तिका में अब कॉपी किया गया है < डेस्टिनेशन वर्कबुक में 18>शीट3 शीट।

  और पढ़ें: डेटा कॉपी करने के लिए एक्सेल वीबीए बिना खोले किसी अन्य कार्यपुस्तिका से

  याद रखने योग्य बातें

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

  निष्कर्ष <5

  इस लेख ने आपको VBA के साथ Excel में डेटा को एक वर्कशीट से दूसरे वर्कशीट में कॉपी और पेस्ट करने का तरीका दिखाया। मुझे उम्मीद है कि यह लेख आपके लिए बहुत फायदेमंद रहा होगा। विषय के संबंध में आपके कोई प्रश्न हैं तो बेझिझक पूछें।

  इसे कोड विंडो में पेस्ट करें ।

9900

आपका कोड अब चलने के लिए तैयार है।

कोड का यह भाग बी2 से एफ9 तक की रेंज को कॉपी करेगा शीट नाम डेटासेट से और बी2 रेंज में पेस्ट करें कॉपी पेस्ट नामित शीट में।

• फिर, अपने कीबोर्ड पर या मेनू से F5 दबाएं बार सेलेक्ट रन -> Sub/UserForm चलाएँ। आप मैक्रो को चलाने के लिए उप-मेनू बार में छोटे Play आइकन पर भी क्लिक कर सकते हैं।

निम्न छवि देखें .

आखिरकार, डेटासेट शीट से सभी डेटा अब कॉपीपेस्ट<में कॉपी हो गया है हमारी एक्सेल वर्कबुक में 19> शीट। . एक्सेल में एक सक्रिय वर्कशीट से दूसरे में कॉपी और पेस्ट करने के लिए वीबीए मैक्रो

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

कदम:

• उसी तरह पहले की तरह, डेवलपर टैब से विजुअल बेसिक एडिटर खोलें और कोड विंडो में मॉड्यूल डालें डालें।
• कोड विंडो में, निम्नलिखित कोड को कॉपी करें और इसे पेस्ट करें

6760

आपका कोड अब चलने के लिए तैयार है।

• अगला, चलाएं जैसा कि ऊपर दिखाया गया है और परिणाम निम्न में देखेंइमेज.

इस बार, डेटासेट शीट का सारा डेटा अब में कॉपी हो गया है पेस्ट करें वह शीट जिसे हमने डेटा कॉपी करने से पहले एक्टिवेट किया था।

और पढ़ें: एक सेल से दूसरी शीट में टेक्स्ट कॉपी करने का एक्सेल फॉर्मूला<2

3. वीबीए मैक्रो के साथ एक्सेल में एक वर्कशीट से दूसरे में एक सिंगल सेल को कॉपी और पेस्ट करें

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

निम्न छवि को देखें, <1 श्रेणी शीट में केवल एक मान होता है।

हम देखेंगे कि हम कैसे इस एक सेल को दूसरे सेल में कॉपी और पेस्ट कर सकते हैं शीट Excel में VBA के साथ।

स्टेप्स:

• जैसा कि ऊपर दिखाया गया है, विजुअल बेसिक एडिटर<खोलें 2> डेवलपर टैब से और सम्मिलित करें एक मॉड्यूल कोड विंडो में।
• कोड विंडो में, निम्न कॉपी करें कोड और पेस्ट करें

8834

आपका कोड अब चलने के लिए तैयार है।

• अगला, कोड के इस भाग को चलाएं और निम्न छवि पर ध्यान दें। ” in सेल B4 में डेटासेट शीट अब CopyRange शीट में कॉपी हो गई है सेल बी2 ।

और पढ़ें: केवल कॉपी करने के लिए एक्सेल वीबीएगंतव्य के मान (मैक्रो, UDF, और UserForm)

4. एक्सेल मैक्रो में पेस्टस्पेशल विधि के साथ एक वर्कशीट से दूसरे में कॉपी किए गए डेटा को पेस्ट करें

आप एक वर्कशीट से डेटा कॉपी कर सकते हैं और उन्हें एक्सेल के पेस्टस्पेशल<2 के साथ विभिन्न तरीकों से पेस्ट कर सकते हैं।> विधि VBA के साथ। इसे करने के चरण नीचे दिए गए हैं।

चरण:

• सबसे पहले, डेवलपर से विजुअल बेसिक एडिटर खोलें टैब और कोड विंडो में एक मॉड्यूल डालें।
• दूसरा, निम्नलिखित कोड कॉपी करें और पेस्ट करें इसे कोड विंडो में डालें।

3490

आपका कोड अब चलने के लिए तैयार है।

• अगला, चलाएं यह कोड का टुकड़ा।

उपरोक्त तस्वीर को देखें। डेटासेट शीट से डेटा अब एक्सेल में पेस्टस्पेशल शीट में स्थानांतरित कर दिया गया है।

और पढ़ें : एक्सेल में मूल्यों और प्रारूपों को कॉपी करने के लिए VBA पेस्ट स्पेशल (9 उदाहरण)

5। एक्सेल में एक वर्कशीट से दूसरे में अंतिम सेल के नीचे डेटा को कॉपी और पेस्ट करने के लिए मैक्रो

हमारे पास डेटासेट शीट में पहले से ही कुछ डेटा है (दिखाया गया है) परिचय खंड)। अब, इस खंड के आगामी भाग को देखें। अब हमारे पास अंतिम सेल नाम की एक अन्य शीट में कुछ नया डेटा है।

हम यहां क्या करना चाहते हैं, हम यह करेंगे विशिष्ट डेटा कॉपी करें (सेल B5 से F9 तक) डेटासेट शीट से और पेस्ट करें उनमें इस अंतिम सेल शीट के अंतिम सेल के नीचे।

चरण:

• सबसे पहले, डेवलपर टैब से विजुअल बेसिक एडिटर खोलें और कोड विंडो में मॉड्यूल डालें ।
• दूसरा, निम्नलिखित कोड को कॉपी करें और इसे कोड विंडो में पेस्ट करें ।

6309

आपका कोड अब चलने के लिए तैयार है।

• अगला, इस कोड को चलाएं । नीचे दी गई इमेज को देखें।

यहां, डेटासेट शीट से केवल चयनित डेटा अब <1 है>Excel में अंतिम सेल शीट में अंतिम सेल के नीचे कॉपी किया गया।

और पढ़ें: एक्सेल में वैल्यू कॉपी और पेस्ट करने का फॉर्मूला 5 उदाहरण)

6. वर्कशीट को साफ़ करने के लिए VBA मैक्रो पहले फिर किसी अन्य वर्कशीट में कॉपी और पेस्ट करें

अगर आपकी मौजूदा शीट में गलत डेटा है और आप उसमें मूल डेटा निकालना चाहते हैं तो क्या होगा।

निम्न छवि को देखें। हम क्लियर रेंज शीट से डेटा को मिटा देंगे और डेटासेट शीट से डेटा को VBA कोड के साथ यहां स्टोर करेंगे।

स्टेप्स:

• सबसे पहले, डेवलपर टैब से विजुअल बेसिक एडिटर खोलें और इन्सर्ट करें कोड विंडो में एक मॉड्यूल ।
• दूसरा, निम्नलिखित कोड को कॉपी करें और इसे कोड विंडो में पेस्ट करें ।<13

7142

आपका कोड अब चलने के लिए तैयार है।

• अगला, इस कोड को चलाएं । की ओर देखने के लिएनिम्नलिखित चित्र।

क्लियर रेंज शीट में पिछला डेटा अब <के डेटा से बदल दिया गया है 1> डेटासेट शीट।

और पढ़ें: एक कार्यपुस्तिका से दूसरे कार्यपुस्तिका से डेटा को मानदंड के आधार पर कॉपी करने के लिए मैक्रो

7. रेंज के साथ एक वर्कशीट से दूसरे में डेटा कॉपी और पेस्ट करने के लिए मैक्रो। कॉपी फंक्शन

अब, हम VBA कोड सीखेंगे कि कैसे डेटा कॉपी और पेस्ट करें Excel में Range.Copy फ़ंक्शन के साथ एक वर्कशीट से दूसरी ।

चरण:

• सबसे पहले, <1 खोलें डेवलपर टैब से>विज़ुअल बेसिक एडिटर और कोड विंडो में मॉड्यूल डालें डालें।
• दूसरा, कॉपी करें निम्नलिखित कोड और इसे कोड विंडो में पेस्ट करें।

2832

आपका कोड अब चलने के लिए तैयार है।

• अगला, कोड के इस भाग को चलाएं और निम्नलिखित छवि को देखें। डेटासेट शीट कॉपी रेंज शीट में रेंज.कॉपी फंक्शन के साथ। <0 और पढ़ें: सेल वैल्यू को दूसरे सेल में कॉपी करने के लिए एक्सेल फॉर्मूला

  समान रीडिंग

  • मानदंड के आधार पर अन्य वर्कशीट में पंक्तियों को कॉपी करने के लिए एक्सेल वीबीए एक्सेल में नो फॉरमेटिंग के साथ y
  • केवल एक्सेल में विजिबल सेल को कॉपी और पेस्ट कैसे करें (3 आसान तरीके)
  • कॉपी और पेस्ट करेंएक्सेल में काम नहीं कर रहा है (9 कारण और समाधान)
  • मैक्रो का उपयोग करके एक्सेल में एकाधिक पंक्तियों की प्रतिलिपि कैसे करें (4 उदाहरण)

  8. USEDRANGE संपत्ति के साथ एक वर्कशीट से दूसरे में डेटा डुप्लिकेट करने के लिए मैक्रो कोड लागू करें

  इस बार, हम VBA कोड सीखेंगे कि कैसे एक से डेटा कॉपी और पेस्ट करें Excel में UsedRange विशेषता के साथ अन्य वर्कशीट।

  चरण:

  • पहले, Visual Basic खोलें डेवलपर टैब से संपादक और कोड विंडो में मॉड्यूल सम्मिलित करें ।
  • दूसरा, निम्नलिखित कोड कॉपी करें और इसे कोड विंडो में पेस्ट करें।

  4907

  आपका कोड अब चलने के लिए तैयार है।

  

  • अगला, कोड के इस टुकड़े को चलाएं ।

  

  जैसा कि हम उपरोक्त तस्वीर में देख सकते हैं, हमने सफलतापूर्वक कॉपी और पेस्ट कर दिया है डेटासेट शीट से डेटा UsedRange शीट में USEDRANGE प्रॉपर्टी के साथ।

  और अधिक पढ़ें: एक्सेल में एक से अधिक सेल में समान मान को कैसे कॉपी करें (4 विधियाँ)

  9। एक्सेल में एक शीट से दूसरी शीट में चयनित डेटा को कॉपी और पेस्ट करने के लिए VBA मैक्रो

  आप VBA<के साथ एक वर्कशीट से दूसरे में केवल कुछ चयनित डेटा को कॉपी और पेस्ट कर सकते हैं 2>। ऐसा करने के चरण नीचे दिखाए गए हैं।

  चरण:

  • सबसे पहले, डेवलपर<से विजुअल बेसिक एडिटर खोलें। 2> टैब और सम्मिलित करें एक मॉड्यूल मेंकोड विंडो।
  • दूसरा, निम्नलिखित कोड को कॉपी करें और कोड विंडो में पेस्ट करें ।

  7457

  आपका कोड अब है चलाने के लिए तैयार।

  यह कोड डेटासेट शीट से केवल B4 से F7 तक की रेंज कॉपी करेगा और उनमें पेस्ट करेगा PasteSelected नामित शीट में B2 श्रेणी।

  

  • अगला, इस कोड को चलाएं ।

  

  अंत में, डेटासेट शीट से केवल चयनित डेटा एक्सेल वर्कबुक में चयनित पेस्ट शीट में सफलतापूर्वक कॉपी और पेस्ट किया गया है।

  और पढ़ें: VBA पेस्ट स्पेशल कैसे लागू करें और एक्सेल में सोर्स फॉर्मेटिंग रखें

  10। पहली खाली पंक्ति

  यहां, हम देखेंगे कि डेटा को कॉपी करने का तरीका डेटासेट <19 शीट और पेस्ट उनको दूसरे वर्कशीट में एक्सेल में VBA के पहले खाली सेल में पेस्ट करें।

  चरण:

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

  6692

  आपका कोड है अब चलाने के लिए तैयार है।

  

  • अगला, कोड का यह हिस्सा चलाएं ।

  

  उपरोक्त छवि में देखें। शीट13 पूरी तरह खाली थी। नतीजतन, निष्पादित कोड चिपकाया गयाएक्सेल में शीट13 शीट में डेटासेट शीट से कॉपी किया गया डेटा पहले सेल में। 3>

  और पढ़ें: एक्सेल वीबीए के साथ अगली खाली पंक्ति में मूल्यों को कॉपी और पेस्ट करें (3 उदाहरण)

  11। एक एक्सेल शीट से दूसरे में ऑटो-फ़िल्टर किए गए डेटा को कॉपी और पेस्ट करने के लिए VBA एम्बेड करें

  हम स्रोत डेटासेट को फ़िल्टर कर सकते हैं और केवल फ़िल्टर किए गए डेटा को दूसरी वर्कशीट में कॉपी और पेस्ट कर सकते हैं एक्सेल। VBA के साथ चरण दर चरण ऐसा करने का तरीका जानने के लिए इस लेख का अनुसरण करें।

  चरण:

  • पहले, खोलें डेवलपर टैब से विजुअल बेसिक एडिटर और कोड विंडो में मॉड्यूल डालें डालें।
  • दूसरा, कॉपी करें निम्न कोड और इसे कोड विंडो में पेस्ट करें।

  5084

  आपका कोड अब चलने के लिए तैयार है।

  

  • अगला, इस कोड को चलाएं । केवल वह पंक्ति जिसमें " डीन " है, को फ़िल्टर करके दूसरी शीट में कॉपी किया जाएगा।

  

  उपरोक्त छवि में ध्यान दें। B कॉलम से केवल फ़िल्टर किए गए डेटा " डीन " को अब कॉपी करके शीट15 शीट में पेस्ट किया गया है .

  और पढ़ें: वीबीए (7 विधियों) का उपयोग करके एक्सेल में कॉपी और पेस्ट कैसे करें

  समान रीडिंग

  • Excel VBA के साथ दृश्यमान पंक्तियों को ऑटोफ़िल्टर और कॉपी कैसे करें
  • Excel में अन्य वर्कशीट में अद्वितीय मानों की प्रतिलिपि बनाएँ (5 विधियाँ) <13
  • मर्ज को कॉपी कैसे करें और