सामग्री सारणी
जेव्हा तुम्हाला गरज असेल तेव्हा तुम्ही एका शीटवरून दुसऱ्या शीटवर किंवा वर्कबुकमध्ये श्रेणी कॉपी करू शकता. कॉपी आणि पेस्ट करण्याचे वेगवेगळे प्रकार आहेत. या लेखानंतर, तुम्हाला एक्सेल VBA कॉपी श्रेणी दुसऱ्या शीटवर वापरण्याचे वेगवेगळे मार्ग कळतील.
स्पष्टीकरण जिवंत करण्यासाठी, मी विशिष्ट व्यक्तींच्या वैयक्तिक माहितीचे प्रतिनिधित्व करणारा नमुना डेटासेट वापरणार आहे. . डेटासेटमध्ये 4 स्तंभ आहेत. हे स्तंभ आहेत नाव, आडनाव, पूर्ण नाव, आणि ईमेल .
सराव करण्यासाठी वर्कबुक डाउनलोड करा
व्हीबीए रेंज दुसर्‍या शीटवर कॉपी करा फॉरमॅटसह दुसर्‍या शीटवरजेव्हा तुम्हाला एका शीटवरून दुसर्‍या शीटवर स्वरूप सह श्रेणी कॉपी करायची असेल तेव्हा तुम्ही ते फक्त वापरून करू शकता. 2>VBA .
येथे, मी डेटासेट शीटपासून विदफॉर्मेट शीटपर्यंत श्रेणी कॉपी करेन.
चला प्रक्रिया सुरू करूया,
प्रथम, डेव्हलपर टॅब उघडा >> Visual Basic
तुम्ही VBA <उघडण्यासाठी ALT + F11 कीबोर्ड देखील वापरू शकता. 3>संपादक.
पुढे, ते Microsoft Visual Basic for Applications नावाची नवीन विंडो उघडेल.
तेथून, Insert <3 उघडा>>> मॉड्युल निवडा.
A मॉड्युल ओपन होईल नंतर उघडलेल्या मध्ये खालील कोड टाइप करा >> निवडा मॅक्रो पहा
➤ एक संवाद बॉक्स पॉप अप होईल.
आता, मॅक्रो नावावरून Copy_Range_BelowLastCell_AnotherSheets निवडा मॅक्रो मध्ये देखील कार्यपुस्तिका निवडा.
शेवटी, चालवा निवडलेले मॅक्रो .
म्हणून, ते निवडलेल्या श्रेणीची कॉपी करेल आणि दुसर्‍या शीटच्या शेवटच्या ओळीतून पेस्ट करेल .
8. VBA दुसर्‍या वर्कबुकच्या शेवटच्या पंक्तीवर श्रेणी कॉपी करा
तुम्हाला कॉपी दुसर्‍या वर्कबुक शीटच्या शेवटच्या पंक्तीपर्यंतची श्रेणी तुम्ही VBA देखील वापरू शकता.
येथे, मी डेटासेट2 वरून श्रेणी कॉपी करेन शीट ते पुस्तक2 चे पत्रक1 परंतु पहिल्या रिक्त नसलेल्या सेलमधून.
45>
प्रक्रिया सुरू करण्यासाठी,
प्रथम, डेव्हलपर टॅब उघडा >> Visual Basic
तुम्ही ALT + F11 कीबोर्ड VBA संपादक उघडण्यासाठी देखील वापरू शकता. <1
पुढे, ते ऍप्लिकेशन्ससाठी Microsoft Visual Basic ची नवीन विंडो उघडेल.
तेथून, Insert <3 उघडा>>> मॉड्युल निवडा.
A मॉड्युल ओपन होईल नंतर उघडलेल्या मॉड्युल मध्ये खालील कोड टाइप करा.
7748
येथे, मी उपप्रक्रिया Copy_Range_BelowLastCell_To_Another_Workbook जेथे wsCopy आणि wsDestination <घोषित केले 3> वर्कशीट प्रकार, lCopyLastRow आणि lDestLastRow आहेत लांब प्रकार आहेत.
प्रथम, कॉपी करण्यासाठी शीट आणि गंतव्य पत्रकासाठी व्हेरिएबल्स सेट करण्यासाठी सेट वापरले.
पुढे, कॉपी श्रेणीतील स्तंभ A च्या डेटावर आधारित शेवटची पंक्ती शोधण्यासाठी पंक्ती पद्धत वापरली.
पुन्हा, पंक्ती पद्धत वापरली गंतव्य श्रेणीतील स्तंभ A च्या डेटावर आधारित पहिली रिकामी पंक्ती शोधण्यासाठी देखील ऑफसेट एक गुणधर्म खाली हलविण्यासाठी वापरला.
शेवटी, कॉपी केली चा डेटा डेटासेट2 शीट वरून एक्सेल व्हीबीएची श्रेणी दुसर्‍या शीटवर कॉपी करा.xlsm कार्यपुस्तिका गंतव्यस्थानापर्यंत पत्रक1 वर्कबुकचे Book2.xlsx .
आता, कोड सेव्ह करा आणि वर्कशीटवर परत जा.
पुढे, पहा टॅब उघडा >> कडून मॅक्रो >> निवडा मॅक्रो पहा
➤ एक संवाद बॉक्स पॉप अप होईल.
आता, मॅक्रो नावावरून Copy_Range_BelowLastCell_To_Another_Workbook निवडा मॅक्रो मधील कार्यपुस्तिका देखील निवडा.
शेवटी, चालवा निवडलेले मॅक्रो .
म्हणून, ते विद्यमान शीटपासून दुसर्‍या वर्कबुकच्या शेवटच्या ओळीत निवडलेली श्रेणी कॉपी करेल.
<0
सराव विभाग
मी एक्सेल VBA कॉपी श्रेणीच्या या स्पष्ट केलेल्या पद्धतींचा सराव करण्यासाठी कार्यपुस्तिकेत सराव पत्रक दिले आहे दुसर्‍या शीटवर.
निष्कर्ष
या लेखात, मी 8 विविध प्रकारचे सोपे आणि जलद मार्ग स्पष्ट केले आहेत.Excel VBA श्रेणी दुसऱ्या शीटवर कॉपी करा. हे वेगवेगळे मार्ग तुम्हाला एका शीटवरून दुसर्‍या पत्रकावर आणि एका शीटवरून दुसर्‍या वर्कबुकमध्ये श्रेणी कॉपी करण्यात मदत करतील. सर्वात शेवटी, तुमच्याकडे कोणत्याही प्रकारच्या सूचना, कल्पना आणि अभिप्राय असल्यास कृपया खाली टिप्पणी द्या.
मॉड्यूल.6464
येथे, मी उपप्रक्रिया कॉपी_रेंज_विथ फॉरमॅट_टूअनदर_शीट
घोषित केले मी सध्याच्या शीटवरून शीटच्या नावावर कॉपी करण्यासाठी B1:E10 श्रेणी घेतली आहे Format सह .
येथे, मी कॉपी वापरले निवडलेली श्रेणी कॉपी करण्यासाठी पद्धत, कॉपी पद्धत स्वरूप सह कोणतीही श्रेणी कॉपी करते.
शेवटी, सेव्ह कोड आणि वर्कशीटवर परत जा. .
पुढे, पहा टॅब >> उघडा. कडून मॅक्रो >> निवडा मॅक्रो पहा
➤ एक संवाद बॉक्स पॉप अप होईल.
आता, मॅक्रो नावावरून Copy_Range_withFormat_ToAnother_Sheet निवडा तसेच मॅक्रो मधील कार्यपुस्तिका निवडा.
शेवटी, चालवा निवडलेले मॅक्रो .
म्हणून, ते मी निवडलेल्या नवीन शीटवर स्वरूप निवडलेली श्रेणी कॉपी करेल स्वरूपासह) .
2. VBA फॉरमॅटशिवाय श्रेणी दुसर्‍या शीटवर कॉपी करा
हे देखील आहे VBA वापरून स्वरूप विना दुसर्‍या शीटवर श्रेणी कॉपी करणे शक्य आहे.
येथे, मी कॉपी करेन <3 डेटासेट शीटपासून विना-फॉर्मेट शीटपर्यंतची श्रेणी.
प्रक्रिया सुरू करूया,
आता, डेव्हलपर उघडा टॅब >> Visual Basic निवडा ( ALT + F11 वापरा)
पुढे, ते उघडेल अनुप्रयोगांसाठी मायक्रोसॉफ्ट व्हिज्युअल बेसिक.
नंतर, उघडा घाला >> मॉड्युल निवडा.
A मॉड्युल ओपन होईल नंतर उघडलेल्या मॉड्युल मध्ये खालील कोड टाइप करा.
2344
येथे, मी उप प्रक्रिया Copy_Range_WithoutFormat_Toanother_sheet
मी श्रेणी घेतली आहे B1:E10 विद्यमान शीटवरून शीटच्या नावावर कॉपी करण्यासाठी विनाफॉर्मेट .
येथे, मी निवडलेल्या श्रेणीची कॉपी करण्यासाठी कॉपी पद्धत वापरली. नमूद पेस्ट:=xlPasteValues PasteSpecial पद्धतीमध्ये जेणेकरुन ते केवळ निवडलेल्या श्रेणीची मूल्ये पेस्ट करेल, स्वरूप नाही.
शेवटी. , कोड सेव्ह करा आणि वर्कशीटवर परत जा.
पुढे, पहा टॅब >> उघडा. कडून मॅक्रो >> निवडा मॅक्रो पहा
➤ एक संवाद बॉक्स पॉप अप होईल.
आता, मॅक्रो नावावरून Copy_Range_WithoutFormat_Toanother_Sheet निवडा आणि मॅक्रो मधील कार्यपुस्तिका देखील निवडा.
शेवटी, निवडलेले मॅक्रो चालवा.
अशा प्रकारे, ते केवळ मूल्ये नाही स्वरूप<3 सह निवडलेली श्रेणी कॉपी करेल >.
3. फॉरमॅट आणि कॉलम रुंदीसह श्रेणी दुसर्‍या शीटवर कॉपी करा
कधीकधी तुम्हाला करायचे असेल कोणतीही निवडलेली श्रेणी जशी आहे तशी कॉपी करा, त्यासाठी तुम्ही स्वरूप आणि स्तंभ रुंदी असलेली श्रेणी कॉपी करू शकता.
येथे, मी डेटासेट शीट पासून स्वरूपात श्रेणी कॉपी करीन & स्तंभाची रुंदी पत्रक.
VBA ,
वापरून कार्य करण्याची प्रक्रिया पाहण्यासाठी प्रथम, डेव्हलपर टॅब >> उघडा. Visual Basic
तुम्ही ALT + F11 कीबोर्ड VBA संपादक उघडण्यासाठी देखील वापरू शकता. <1
पुढे, ते ऍप्लिकेशन्ससाठी Microsoft Visual Basic ची नवीन विंडो उघडेल.
तेथे, Insert उघडा. >> मॉड्युल निवडा.
A मॉड्युल ओपन होईल नंतर उघडलेल्या मॉड्युल मध्ये खालील कोड टाइप करा.
2323
येथे, मी उप प्रक्रिया Copy_Range_to_Another_Sheet_with_FormatAndColumnWidth
मी श्रेणी घेतली आहे B1:E10 विद्यमान शीटवरून गंतव्य पत्रकाच्या नावावर कॉपी करण्यासाठी स्वरूप & स्तंभाची रुंदी .
येथे, मी निवडलेली श्रेणी कॉपी करण्यासाठी कॉपी पद्धत वापरली आहे. मी PasteSpecial पद्धत देखील वापरली आहे जिथे मी Paste:=xlPasteColumnWidths नमूद केले आहे जेणेकरून ते स्वरूप आणि स्तंभ रुंदी सोबत निवडलेल्या श्रेणीला पेस्ट करेल. .
शेवटी, कोड सेव्ह करा आणि वर्कशीटवर परत जा.
पुढे, पहा टॅब >> उघडा. कडून मॅक्रो >> निवडा मॅक्रो पहा
➤ एक संवाद बॉक्स पॉप अप होईल.
आता, मॅक्रो नावामधून कॉपी_रेंज_टू_अन्य_शीट_विथ_फॉर्मॅटअँड कॉलमविड्थ निवडा आणि मॅक्रो मधील मध्ये वर्कबुक देखील निवडा.
शेवटी, निवडलेले चालवा मॅक्रो .
परिणामी, ते स्वरूप आणि स्तंभ रुंदी सह निवडलेली श्रेणी कॉपी करेल.
4. VBA फॉर्म्युलासह दुसर्‍या शीटवर श्रेणी कॉपी करा
तुमच्या डेटासेटमध्ये कोणतेही सूत्र तुम्हाला कॉपी करायचे असल्यास. काळजी नाही! तुम्ही फॉर्म्युला असलेली श्रेणी फॉर्म्युला अबाधित ठेवून दुसर्‍या शीटवर कॉपी करू शकता.
येथे, मी डेटासेट शीटमधील श्रेणी कॉपी करेन Formula शीट
प्रक्रिया सुरू करूया,
सुरुवात करण्यासाठी, डेव्हलपर टॅब उघडा >> Visual Basic निवडा ( तुम्ही ALT + F11 कीबोर्ड देखील वापरू शकता)
11>
पुढे, ते ऍप्लिकेशन्ससाठी Microsoft Visual Basic उघडेल.
तेथून, Insert >> उघडा. मॉड्युल निवडा.
A मॉड्युल ओपन होईल नंतर उघडलेल्या मॉड्युल मध्ये खालील कोड टाइप करा.
8309
येथे, मी उप प्रक्रिया Copy_Range_withFormula_ToAnother_Sheet
मी श्रेणी घेतली आहे B1:E10 विद्यमान शीटवरून गंतव्य पत्रक नावावर कॉपी करण्यासाठी Formula .
येथे, मी निवडलेली श्रेणी कॉपी करण्यासाठी कॉपी पद्धत वापरली. मी PasteSpecial पद्धत देखील वापरली आहे जिथे मी Paste:=xlPasteFormulas चा उल्लेख केला आहे जेणेकरून ते निवडलेल्या श्रेणीसह फॉर्म्युले घेऊन जाईल.
शेवटी , कोड सेव्ह करा आणि वर्कशीटवर परत जा.
नंतर, दृश्य उघडा टॅब >> कडून मॅक्रो >> निवडा मॅक्रो पहा
➤ एक संवाद बॉक्स पॉप अप होईल.
आता, मॅक्रो नावावरून Copy_Range_withFormula_ToAnother_Sheet निवडा तसेच मॅक्रो मधील कार्यपुस्तिका निवडा.
शेवटी, चालवा निवडलेले मॅक्रो .
अशा प्रकारे, ते फॉर्म्युला सह निवडलेल्या सर्व सेल रेंज कॉपी करेल.
समान वाचन:
- व्हीबीए रेंज ऑफसेट कसे वापरावे (11 मार्ग)
- एक्सेलमधील रेंजमधील प्रत्येक सेलसाठी VBA (3 पद्धती)
- एक्सेलमध्ये VBA चे रेंज ऑब्जेक्ट कसे वापरावे (5 गुणधर्म)
5. ऑटोफिटसह श्रेणी दुसर्‍या शीटवर कॉपी करा
तर एखाद्या श्रेणीची दुसऱ्या शीटवर कॉपी करताना तुम्ही ऑटोफिट पद्धत देखील वापरू शकता VBA ते ऑटोफिट नवीन शीटमधील कॉपी केलेल्या श्रेणीमध्ये.
येथे, मी डेटासेट मधील श्रेणी कॉपी करेन शीट ते ऑटोफिट शीट
प्रक्रिया सुरू करूया,
प्रथम, डेव्हलपर टॅब उघडा >> Visual Basic
तुम्ही ALT + F11 कीबोर्ड VBA संपादक उघडण्यासाठी देखील वापरू शकता. <1
पुढे, ते ऍप्लिकेशन्ससाठी Microsoft Visual Basic ची विंडो उघडेल.
नंतर, Insert > उघडा ;> मॉड्युल निवडा.
A मॉड्युल ओपन होईल नंतर उघडलेल्या मध्ये खालील कोड टाइप करा मॉड्युल .
5376
येथे, मी उप प्रक्रिया Copy_Range_withFormat_AutoFit
घोषित केले प्रथम, मी वर्कशीट डेटासेट निवडले. नंतर AutoFit नावाच्या गंतव्य पत्रकावर विद्यमान शीटवरून कॉपी करण्यासाठी B1:E10 श्रेणी घेतली.
येथे, मी कॉपी वापरले. निवडलेल्या श्रेणीची कॉपी करण्याची पद्धत आणि AutoFit पद्धत दिलेल्या स्तंभांमध्ये ऑटोफिट होईल B:E .
शेवटी, सेव्ह कोड आणि जा वर्कशीटवर परत.
पुढे, पहा टॅब उघडा >> कडून मॅक्रो >> निवडा मॅक्रो पहा
➤ एक संवाद बॉक्स पॉप अप होईल.
आता, मॅक्रो नावावरून Copy_Range_withFormat_AutoFit तसेच मॅक्रो मध्ये वर्कबुक निवडा.
शेवटी, चालवा निवडलेले मॅक्रो .
म्हणून, ते नवीन शीटवर निवडलेली श्रेणी कॉपी करेल आणि ऑटोफिट स्तंभ देखील.
6. VBA श्रेणी दुसर्‍या वर्कबुकमध्ये कॉपी करा
तुम्ही इच्छित असल्यास तुम्ही एका शीटवरून दुसऱ्या शीटवर श्रेणी कॉपी देखील करू शकता वेगळ्या वर्कबुकचे.
येथे, मी पुस्तक1 च्या डेटासेट शीटपासून पत्रक1 ची श्रेणी कॉपी करेन कार्यपुस्तिका.
प्रक्रिया सुरू करूया,
प्रथम, डेव्हलपर टॅब उघडा >> Visual Basic निवडा (y तुम्ही ALT + F11 कीबोर्ड)
नंतर, ते Microsoft Visual उघडेलअनुप्रयोगांसाठी मूलभूत.
पुढे, उघडा घाला >> मॉड्युल निवडा.
A मॉड्युल ओपन होईल नंतर उघडलेल्या मॉड्युल मध्ये खालील कोड टाइप करा.
4076
येथे, मी उप प्रक्रिया Copy_Range_WithFormat_Toanother_WorkBook
मी श्रेणी घेतली आहे B3:E10 शीटच्या नावावरून डेटासेट विद्यमान शीटवरून नवीन वर्कबुक नावावर कॉपी करण्यासाठी पुस्तक1 आणि पत्रकाचे नाव पत्रक1 .
येथे, मी निवडलेली श्रेणी नवीन वर्कबुकमध्ये कॉपी करण्यासाठी कॉपी पद्धत वापरली.
शेवटी, सेव्ह करा कोड आणि वर्कशीटवर परत जा.
पुढे, पहा टॅब उघडा >> कडून मॅक्रो >> निवडा मॅक्रो पहा
➤ एक संवाद बॉक्स पॉप अप होईल.
आता, मॅक्रो नावावरून Copy_Range_WithFormat_Toanother_WorkBook निवडा मॅक्रो मध्ये देखील कार्यपुस्तिका निवडा.
शेवटी, चालवा निवडलेले मॅक्रो .
आता, ते डेटासेट शीटवरून निवडलेली श्रेणी कॉपी दुसऱ्या वर्कबुकवर करेल.
7. दुसर्‍या शीटच्या शेवटच्या पंक्तीवर श्रेणी कॉपी करा
कोणत्याही परिस्थितीत, जर तुम्हाला श्रेणी कॉपी करायची असेल तर दुसऱ्या शीटवर एका विशिष्ट सेलमधून किंवा शेवटच्या सेलमधून तुम्ही ते VBA वापरून करू शकता.
प्रक्रियेत प्रवेश करण्यापूर्वी, मी तुम्हाला सांगू इच्छितो की, मी दोन नवीन शीट्स घेतल्या आहेत ज्यात पूर्ण नाव, ईमेल, आणि पत्ता .
आधी डेटासेट2 शीटचे निरीक्षण करूया.
हे शेवटच्या सेलच्या खाली शीट आहे.
येथे, मी कॉपी करेन ची रेंज 2>डेटासेट2 शीट शेवटच्या सेलच्या खाली परंतु पहिल्या नॉन-रिक्त सेलमधून.
सुरुवात करण्यासाठी, डेव्हलपर टॅब >> उघडा. Visual Basic निवडा
पुढे, ते Microsoft Visual Basic for Applications उघडेल.
नंतर, उघडा घाला >> मॉड्युल निवडा.
A मॉड्युल ओपन होईल नंतर उघडलेल्या मॉड्युल मध्ये खालील कोड टाइप करा.
8984
येथे, मी उप प्रक्रिया Copy_Range_BelowLastCell_AnotherSheets
प्रथम, मी शीट निवडले डेटासेट2 आणि नंतर शेवटची पंक्ती मोजण्यासाठी पंक्ती पद्धत वापरली आणि मोजलेली पंक्ती lr मध्ये ठेवली.
नंतर घेतली श्रेणी A2:C आणि lr विद्यमान शीटवरून गंतव्य पत्रक नावावर कॉपी करण्यासाठी शेवटच्या सेलच्या खाली .
पुन्हा, शेवटची मोजण्यासाठी पंक्ती पद्धत वापरली शेवटच्या सेलच्या खाली नावाच्या दुसर्‍या शीटची पंक्ती आणि मोजलेली पंक्ती lrAnotherSheet मध्ये ठेवली.
येथे, मी कॉपी पद्धत वापरली. निवडलेल्या श्रेणीची कॉपी करण्यासाठी आणि AutoFit पद्धत दिलेल्या स्तंभांना ऑटोफिट करेल A:C .
शेवटी, कोड सेव्ह करा आणि परत जा वर्कशीटवर.
पुढे, पहा टॅब उघडा >> मॅक्रो कडून
