فهرست
کله چې موږ د ډیری ایکسل شیټونو سره معامله کوو، ځینې وختونه موږ باید ډاټا له یو سپریڈ شیټ څخه بل ته کاپي کړو. د VBA پلي کول په Excel کې د هر ډول عملیاتو د چلولو لپاره ترټولو مؤثره، چټکه او خوندي طریقه ده. په دې مقاله کې، موږ به تاسو ته وښایئ چې څنګه په Excel کې د VBA میکرو سره د یوې کاري پاڼې څخه بل ته ډاټا کاپي او پیسټ کړئ .
د کار کتاب ډاونلوډ کړئ
تاسو کولی شئ د وړیا تمرین Excel کاري کتاب له دې ځایه ډاونلوډ کړئ.
کاپي او پیسټ له یوې ورکشیټ څخه بل.xlsm
15 میتودونه چې د VBA سره ډیټا کاپي او پیسټ کول په Excel کې له یو ورکشیټ څخه بل ته ډیټا
پدې برخه کې به تاسو 15 میتودونه زده کړئ چې تاسو څنګه کولی شئ ډیټا کاپي کړئ یوه کاري پاڼه او په Excel کې د VBA سره په بل کې پیسټ کړئ.
پورته هغه ډیټا سیټ دی چې دا مقاله به زموږ د مثال په توګه په پام کې ونیسي.
1. د VBA میکرو ایمبډ کړئ ترڅو د ډیټا رینج کاپي او پیسټ کړئ له یوې ورکشیټ څخه بلې ته
د VBA سره د یو ورک شیټ څخه بل ته د ډیټا یو لړ کاپي او پیسټ کولو مرحلې تشریح شوي. لاندې.
مرحلې:
- په پیل کې، په خپل کیبورډ کې Alt + F11 فشار ورکړئ یا ټب ته لاړ شئ پرمخ وړونکی -> Visual Basic د خلاصولو لپاره Visual Basic Editor .
- په پاپ اپ کوډ کې کړکۍ، د مینو بار څخه، کلیک وکړئ داخل کړئ -> ماډل .
- اوس، لاندې کوډ کاپي کړئ اوپه Excel کې فلټر شوي حجرې (4 میتودونه)
- د چلولو وخت تېروتنه 1004: د رینج ټولګي د پیسټ ځانګړي میتود ناکام شو
- څنګه پیسټ کول لینک او لیږد کول Excel (8 چټکې لارې)
12. د یوې سلسلې په پای کې یو قطار پیسټ کړئ پداسې حال کې چې د پورتنۍ رینج څخه کاپي شوي فورمول ساتل
کله چې تاسو غواړئ یو ارزښت کاپي کړئ او فورمول یې دننه وساتئ پداسې حال کې چې دا پیسټ کړئ بل قطار، بیا د VBA کوډ سره تاسو کولی شئ دنده په اسانۍ سره اجرا کړئ.
مرحلې:
- لومړی، خلاص کړئ بصری بنسټیز مدیر د Developer tab څخه او Insert a Module په کوډ کړکۍ کې.
- دوهم، لاندې کاپي کوډ او پیسټ د کوډ کړکۍ کې یې کړئ.
7961
ستاسو کوډ اوس د چلولو لپاره چمتو دی.
<11
وروستی قطار په سمه توګه کاپي شوی دی دا د دې تر څنګ په قطار کې دی.
نور ولولئ: په اکسل کې په اتوماتيک ډول له یو سیل څخه بل ته ډیټا کاپي کولو څرنګوالی
13. VBA په بل خلاص کې له یوې شیټ څخه بلې شیټ ته د ډیټا نقل کولو لپاره مګر خوندي شوی کاري کتاب
زموږ د مثال کاري کتاب نوم ته پام وکړئ، سرچینه کاري کتاب<19 موږ به د دې کاري کتاب څخه د ډیټاسیټ شیټ څخه ډاټا کاپي کړو او په بل کاري کتاب کې چې د منزل کاري کتاب نومیږي په بل کاري پاڼه کې پیسټ کړو. پرانستل شوی مګر خوندي شوی ندیتر اوسه .
مراحلې:
- لومړی، د Visual Basic Editor څخه خلاص کړئ د Developer tab او Insert a Module په کوډ کړکۍ کې.
- دوهم، لاندې کوډ کاپي کړئ او پیسټ کړئ د کوډ کړکۍ کې.
3487
ستاسو کوډ اوس د چلولو لپاره چمتو دی.
48>
- بیا، دا کوډ چلوئ
ډیټا د ډیټاسیټ شیټ څخه د سرچینې کاري کتاب اوس په پاڼه پاڼه کې په د منزل کاري کتاب کې کاپي شوی دی.
نور ولولئ: ایکسیل VBA: د سیل ارزښت کاپي او بل سیل ته پیسټ کړئ
14. میکرو په بل خلاص او خوندي شوي کاري کتاب کې له یوې شیټ څخه بلې شیټ ته ډیټا بیا تولیدولو لپاره
دا ځل به موږ ډیټا کاپي کړو له ډیټاسیټ<19 پاڼه د سرچینې کاري کتاب او پیسټ په پاڼه کاري پاڼه کې <1 د منزل کاري کتاب 2>. مګر اوس، کاري کتاب خلاص او خوندي شوی .
ګامونه: 3>
- لومړی، خلاص کړئ بصری بنسټیز مدیر<2 د Developer tab څخه او Insert a Module په کوډ کړکۍ کې.
- دوهم، لاندې کوډ کاپي کړئ او پیسټ د کوډ کړکۍ کې یې کړئ.
6664
ستاسو کوډ اوس د چلولو لپاره چمتو دی.
50>
- وروسته، دا کوډ چل کړئ 1> سرچینهکاري کتاب اوس په پاڼه2 په د منزل کاري کتاب کې کاپي شوی. او نوم ته وګورئ، دا کاري کتاب دا ځل خوندي شوی .
نور ولولئ: څنګه په Excel کې کاپي او پیسټ کړئ پرته له دې چې فارمیټ بدل کړئ<2
15. VBA په بل تړل شوي کاري کتاب کې له یوې ورکشیټ څخه بلې ورکشیټ ته ډیټا کاپي او پیسټ کولو لپاره پلي کړئ
په تیرو دوه برخو کې موږ زده کړل چې څنګه ډیټا کاپي او پیسټ کړو له یوې ورکشیټ څخه بل کاري کتاب کې چې دا دی. خلاص په دې برخه کې به موږ کوډ زده کړو چې څنګه د کار کتاب بندولو په وخت کې ډیټا کاپي او پیسټ کړو .
مراحلې:
- <12 لومړی، د Developer ټب څخه Visual Basic Editor خلاص کړئ او د کوډ کړکۍ کې Insert a Module
- دوهم، لاندې کوډ کاپي کړئ او پیسټ کړئ د کوډ کړکۍ کې.
7453
ستاسو کوډ اوس د چلولو لپاره چمتو دی.
- بیا، چل کړئ دا کوډ. 14>
- د 1 څخه تر 14 پورې میتودونه ستاسو کاري کتاب ته اړتیا لريپرانیستل . کله چې په دې میتودونو کې ښودل شوي د میکرو کوډونو اجرا کول مه هیروئ ، د سرچینې او منزل کاري کتاب دواړه خلاص وساتئ.
- پداسې حال کې چې ستاسو کاري کتابونه خوندي شوي نو د فایل نوم د فایل ډول سره ولیکئ د کوډ دننه. کله چې کاري کتابونه خوندي نه شي، نو د فایل ډول پرته یوازې د فایل نوم ولیکئ. د مثال په توګه، که ستاسو کار کتاب خوندي شوی ، نو بیا " منزل. xlsx " ولیکئ، مګر که د کار کتاب خوندي شوی نه دی ، بیا د کوډ دننه " منزل " ولیکئ.
که څه هم، دا ځل د کار کتاب و تړل شوی مګر بیا هم د کوډ اجرا کولو وروسته، د ډیټاسیټ شیټ څخه ډیټا په د سرچینې کاري کتاب اوس په کې کاپي شوی 18>Sheet3 پاڼه په د منزل کاري کتاب کې له خلاصیدو پرته د بل کاري کتاب څخه
د یادولو وړ شیان
نتیجې
دې مقالې تاسو ته وښودله چې څنګه د VBA سره په Excel کې د یو ورک شیټ څخه بل ته ډیټا کاپي او پیسټ کړئ. زه امید لرم چې دا مقاله ستاسو لپاره خورا ګټوره وه. که تاسو د موضوع په اړه کومه پوښتنه لرئ نو وړیا احساس وکړئ.
پیسټ په کوډ کړکۍ کې.6348
ستاسو کوډ اوس د چلولو لپاره چمتو دی.
د کوډ دا ټوټه به د شیټ څخه د B2 څخه F9 ته کاپي کړي د Dataset او هغه په B2 رینج کې پیسټ کړي. په کاپي پیسټ په نوم شیټ .
- بیا، په خپل کیبورډ یا مینو کې F5 فشار ورکړئ bar انتخاب چلول -> فرعي/کارونکي فورمه چلول . تاسو کولی شئ یوازې د میکرو چلولو لپاره په فرعي مینو بار کې د کوچني پلی آیکون باندې کلیک وکړئ.
20>
لاندې عکس وګورئ .
په نهایت کې، د ډیټاسیټ شیټ څخه ټول ډیټا اوس په کاپي پیسټ کې کاپي شوي دي. زموږ د ایکسل کاري کتاب کې 19> شیټ.
نور ولولئ: ایکسل VBA: رینج بل کاري کتاب ته کاپي کړئ
2 . VBA میکرو په Excel کې د یو فعال کاري پاڼې څخه بل ته ډاټا کاپي او پیسټ کولو لپاره
په تیره برخه کې، موږ د فعالولو لپاره د کاري پاڼې اړتیا نه درلوده. مګر پدې برخه کې به موږ زده کړو چې څنګه په فعاله کاري پاڼه کې ډیټا کاپي او پیسټ کړو .
مرحلې:
- په ورته ډول د پخوا په څیر، د Developer tab څخه Visual Basic Editor خلاص کړئ او د کوډ کړکۍ کې Insert a Module
- د کوډ په کړکۍ کې، لاندې کوډ کاپي کړئ او پیسټ کړئ دا.
6751
ستاسو کوډ اوس د چلولو لپاره چمتو دی.
- بیا، چل کړئ کوډ لکه څنګه چې پورته ښودل شوی او پایله یې په لاندې کې وګورئانځور.
دا ځل، د ډیټاسیټ شیټ ټول معلومات اوس په کې کاپي شوي پیسټ شیټ چې موږ د ډیټا کاپي کولو دمخه فعال کړی و.
نور ولولئ: د یو سیل څخه بل شیټ ته متن کاپي کولو لپاره د ایکسل فارمول<2
3. د VBA میکرو سره په Excel کې له یوې ورکشیټ څخه بل ته یو واحد حجره کاپي او پیسټ کړئ
په پورتنۍ برخو کې، تاسو زده کړل چې څنګه یو شمیر ډیټا له یوې ورکشیټ څخه بلې ته کاپي او پیسټ کړئ. اوس، تاسو به وګورئ چې څنګه کاپي او پیسټ کړئ کله چې تاسو د ډیټا یوه ټوټه په خپل Excel سپریډ شیټ کې لرئ.
لاندې عکس وګورئ، <1 رینجشیټ یوازې یو ارزښت لري.24>
موږ به وګورو چې موږ څنګه کولی شو دا یو حجره په بل کې کاپي او پیسټ کړو شیټ په Excel کې د VBA سره.
مرحلې:
- لکه څنګه چې پورته ښودل شوي، خلاص کړئ بصری بنسټیز مدیر د Developer tab څخه او Insert a Module په کوډ کړکۍ کې.
- په کوډ کړکۍ کې، لاندې کاپي کوډ او پیسټ
3703
ستاسو کوډ اوس د چلولو لپاره چمتو دی.
25>
- بیا، د کوډ دا ټوټه چلوئ او لاندې عکس ته پام وکړئ.
26>
هغه واحد ډیټا “ دا حجره کاپي کړئ<19 ” په حجره B4 کې په ډیټاسیټ شیټ کې اوس په کاپي رینج پاڼه کې کاپي شوی سیل B2 .
نور ولولئ: یوازې کاپي کولو لپاره ایکسل VBAمنزل ته ارزښتونه (ماکرو، UDF، او یوزر فارم)
4. کاپي شوي ډیټا له یو ورکشیټ څخه بل ته د پیسټ ځانګړي میتود سره په Excel میکرو کې پیسټ کړئ
تاسو کولی شئ د یو ورک شیټ څخه ډیټا کاپي کړئ او هغه د Excel د PasteSpecial<2 سره په بیلابیلو لارو پیسټ کړئ> طریقه د VBA سره. د دې کولو لپاره ګامونه لاندې ورکړل شوي دي.
1> مرحلې: 3> 11> 12> لومړی، د پرمخ وړونکي څخه Visual Basic Editor خلاص کړئ د کوډ کړکۍ کې ټب او داخل کړئ یو ماډل په کوډ کړکۍ کې. 12> دویم، لاندې کوډ کاپي کړئ او پیسټ کړئ<2 دا د کوډ کړکۍ ته ورشئ.
9907
ستاسو کوډ اوس د چلولو لپاره چمتو دی.
27>
- بل، چل کړئ د کوډ دا ټوټه.
پورتني انځور ته وګورئ. د Dataset شیټ څخه ډاټا اوس په Excel کې PasteSpecial شیټ کې لیږدول کیږي.
نور ولولئ : په Excel کې د ارزښتونو او فارمیټونو کاپي کولو لپاره د VBA پیسټ ځانګړی (9 مثالونه)
5. په Excel کې له یوه ورکشیټ څخه بل ته د وروستي حجرې لاندې د کاپي او پیسټ کولو لپاره میکرو
موږ دمخه په ډیټاسیټ 2> شیټ کې ځینې ډیټا لرو (په دې کې ښودل شوي د پېژندنې برخه). اوس، د دې برخې راتلونکی برخه وګورئ. موږ اوس په بل شیټ کې ځینې نوي معلومات لرو چې نوم یې وروستی سیل .
29>
هغه څه چې موږ یې دلته کول غواړو، موږ به یې وکړو. ځانګړي معلومات کاپي کړئ (حجرې B5 ته F9) له ډاټاسیټ شیټ څخه او پیسټ هغه چې په کې ديد وروستي حجرې لاندې د دې وروستۍ حجرې پاڼه.
مرحلې: 3>
- لومړی، د Developer ټب څخه Visual Basic Editor خلاص کړئ او د کوډ کړکۍ کې Insert a Module .
- دوهم، لاندې کوډ کاپي کړئ او پیسټ کړئ په کوډ کړکۍ کې.
5142
ستاسو کوډ اوس د چلولو لپاره چمتو دی.
- بیا، دا کوډ چل کړئ . لاندې انځور ته وګورئ.
دلته، یوازې د ډیټاسیټ شیټ څخه غوره شوي ډاټا اوس <1 ده په Excel کې د وروستي حجرې پاڼه
کې د وروستي حجرې لاندې کاپي.نور ولولئ: په Excel کې د ارزښتونو کاپي او پیسټ کولو فورمول ( 5 بېلګې)
6. VBA میکرو د ورک شیټ پاکولو لپاره لومړی بیا بل ورک شیټ ته کاپي او پیسټ کړئ
څه به وي که تاسو په خپل موجوده شیټ کې غلط ډیټا لرئ او تاسو غواړئ اصلي ډیټا هلته استخراج کړئ.
لاندې انځور کې وګورئ. موږ به د پاک حد شیټ څخه ډاټا پاک کړو او دلته به د Dataset شیټ څخه ډاټا د VBA کوډ سره ذخیره کړو.
مرحلې:
- لومړی، د Developer ټب څخه Visual Basic Editor خلاص کړئ او Insert کړئ د کوډ په کړکۍ کې a ماډول .
- دوهم، لاندې کوډ کاپي کړئ او پیسټ کړئ د کوډ کړکۍ کې.<13
7148
ستاسو کوډ اوس د چلولو لپاره چمتو دی.
33>
- بیا، د کوډ دا ټوټه چل کړئ . وګورهلاندې انځور.
په پاک حد پاڼه کې پخوانۍ ډاټا اوس د Dataset پاڼه.
نور ولولئ: ماکرو د معیارونو پراساس له یو کاري کتاب څخه بل ته ډیټا کاپي کولو لپاره
7. د Range.Copy فعالیت
سره د یوې کاري پاڼې څخه بل ته ډیټا کاپي او پیسټ کولو لپاره میکرو اوس، موږ به د VBA کوډ زده کړو چې څنګه ډیټا کاپي او پیسټ کړو په Excel کې د Range.Copy فنکشن سره یو کاري پاڼه بل ته.
مرحات:
- لومړی، <1 خلاص کړئ> Visual Basic Editor د Developer tab څخه او Insert a Module په کوډ کړکۍ کې.
- دوهم، کاپي لاندې کوډ او پیسټ کړئ د کوډ کړکۍ کې.
1823
ستاسو کوډ اوس د چلولو لپاره چمتو دی.
- بیا، د کوډ دا ټوټه چل کړئ او لاندې عکس ته وګورئ.
36>
موږ په بریالیتوب سره د ډیټا نقل کړی دی د Dataset شیټ په کاپي رینج شیټ کې د Range.Copy فعالیت سره.
نور ولولئ: د سیل ارزښت بل حجرې ته د کاپي کولو لپاره د ایکسل فارمول
ورته لوستل
- <1 د معیارونو پراساس بل ورکشاپ ته قطارونو کاپي کولو لپاره ایکسل VBA
- د ارزښتونو پیسټ کولو لپاره VBA وکاروئ y په Excel کې د فارمیټ نه پرته
- څنګه کولاي شو کاپي او پیسټ کړو د لیدلو وړ حجرې یوازې په Excel کې (3 اسانه لارې)
- کاپي او پیسټ کړئپه Excel کې کار نه کوي (9 لاملونه او حلونه)
- د میکرو په کارولو سره په Excel کې ډیری قطارونه کاپي کولو څرنګوالی (4 مثالونه)
8. د USEDRANGE ملکیت
سره د یو ورکشیټ څخه بل ته د ډیټا نقل کولو لپاره میکرو کوډ پلي کړئ دا ځل به موږ د VBA کوډ زده کړو چې څنګه له یو څخه ډیټا کاپي او پیسټ کړو په Excel کې د UsedRange خاصیت سره بل ته کاري پاڼه ایډیټر د Developer ټب څخه او د کوډ کړکۍ کې Insert a Module .
9098
ستاسو کوډ اوس د چلولو لپاره چمتو دی.
- بیا، چل کړئ د کوډ دا ټوټه.
38>
لکه څنګه چې موږ په پورتني انځور کې لیدلی شو، موږ په بریالیتوب سره کاپي او پیسټ کړی دی. د USEDRANGE ملکیت سره د Dataset شیټ UsedRange پاڼه کې ډاټا.
نور ولولئ: په Excel کې په څو حجرو کې د ورته ارزښت کاپي کولو څرنګوالی (4 میتودونه)
9. VBA میکرو په Excel کې له یوې شیټ څخه بلې ته غوره شوي ډیټا کاپي او پیسټ کولو لپاره
تاسو کولی شئ د VBA<سره له یو ورک شیټ څخه بل ته یوازې ځینې ټاکل شوي ډاټا کاپي او پیسټ کړئ 2>. د دې کولو لپاره ګامونه لاندې ښودل شوي دي.
مرحلې:
- لومړی، د Developer<څخه Visual Basic Editor خلاص کړئ 2> ټب او داخل کړئ یو ماډل دننه کړئد کوډ کړکۍ.
- دوهم، لاندې کوډ کاپي کړئ او پیسټ کړئ د کوډ کړکۍ کې.
4302
ستاسو کوډ اوس دی د چلولو لپاره چمتو دی.
دا کوډ به یوازې له B4 څخه F7 ته د Dataset شیټ څخه کاپي کړي او په هغه کې پیسټ کړي د B2 سلسله په پیسټ غوره شوی نومول شوی شیټ کې.
39>
- بل، دا کوډ چلوئ په بریالیتوب سره کاپي شوي او پیسټ شوي پیسټ غوره شوي شیټ په Excel کاري کتاب کې.
نور ولولئ: د VBA پیسټ ځانګړي او پلي کولو څرنګوالی په Excel کې د سرچینې بڼه وساتئ
10. په لومړي خالي قطار کې د یوې کاري پاڼې څخه بل ته د ډیټا نقل کولو لپاره میکرو کوډ
دلته به موږ وګورو چې څنګه د ډیټا کاپي له ډیټاسیټ <19 څخه شیټ او پیسټ کړئ هغه چې په په لومړي خالي حجره کې دي په بل ورک شیټ کې په Excel کې د VBA سره.
ګامونه:
- لومړی، د Developer ټب څخه Visual Basic Editor خلاص کړئ او Insert a Module د کوډ په کړکۍ کې.
- دوهم، لاندې کوډ کاپي کړئ او پیسټ کړئ د کوډ کړکۍ کې.
9998
ستاسو کوډ دی اوس د چلولو لپاره چمتو دی.
- بیا، چل کړئ د کوډ دغه برخه. 14>
- لومړی، خلاص کړئ Visual Basic Editor د Developer tab څخه او Insert a Module په کوډ کړکۍ کې.
- دوهم، کاپي لاندې کوډ او پیسټ کړئ د کوډ کړکۍ کې.
پورتني عکس کې وګورئ. پاڼه 13 په بشپړه توګه خالي وه. د پایلې په توګه، اعدام شوی کوډ چپ شوید ډیټاسیټ شیټ څخه کاپي شوي ډاټا په ډیر لومړي حجره په شیټ 13 شیټ کې په Excel کې.
نور ولولئ: ارزښتونه کاپي او پیسټ کړئ بل خالي قطار ته د Excel VBA سره (3 مثالونه)
11. VBA امبډ کړئ ترڅو د آټو فلټر شوي ډیټا له یو اکسل شیټ څخه بل ته کاپي او پیسټ کړئ
موږ کولی شو د سرچینې ډیټاسیټ فلټر کړو او یوازې فلټر شوي ډیټا په بل ورک شیټ کې کاپي او پیسټ کړئ کې اکسل. دا مقاله تعقیب کړئ ترڅو زده کړئ چې څنګه دا ګام په ګام د VBA سره ترسره کړئ.
مرحلې:
3025
ستاسو کوډ اوس د چلولو لپاره چمتو دی.
- بیا، دا کوډ چل کړئ . یوازې هغه قطار چې " Dean " لري، به فلټر شي او په بل شیټ کې کاپي شي.
په پورته عکس کې پام وکړئ. د B کالم څخه یوازې فلټر شوي ډاټا " ډین " اوس کاپي شوي او په شیټ15 شیټ کې کاپي شوي .
نور ولولئ: د VBA (7 میتودونو) په کارولو سره په Excel کې کاپي او پیسټ کولو څرنګوالی 3>
- څنګه د اکسیل VBA سره د لیدو وړ قطارونو اتومات فلټر او کاپي کړئ
- په Excel کې بل ورکشاپ ته ځانګړي ارزښتونه کاپي کړئ (5 میتودونه)
- څنګه ضم شوی او کاپي کول