فهرست
یو سري یو متغیر دی چې ورته ډول ډیټا ساتي. که چیرې د معلوماتو یوازې یو قطار یا یو کالم شتون ولري، نو دا د یو اړخیز صف په توګه پیژندل کیږي. په هرصورت، کله چې له یو څخه زیات قطار او کالم وي، دا د 2D صف په نوم یادیږي. موږ ریډیم کاروو ترڅو په VBA کې د سرې اندازه بدله کړو. برسیره پردې، موږ د د ساتلو کلیمه د ReDim سره د پخوانیو معلوماتو ساتلو لپاره کاروو. دا مقاله به تاسو ته 2 په 2>ایکسیل VBA<کې د " ReDim خوندي کولو " a 2D سرې چټکې لارې وښیې 3> .
د تمرین کاري کتاب ډاونلوډ کړئ
ماکرو ته د ری ډیم محافظت 2D.xlsm
2 ګټورې لارې چارې ReDim په Excel VBA کې د 2D سرې ساتل
دا بیس ډیټاسیټ دی چې د درې قطارونو او دوه کالمونو سره د 2D سرې څخه رامینځته شوی. لومړی، موږ به دا صف جوړ کړو. بیا، موږ به دې صف ته بل کالم اضافه کړو. موږ به د دې کولو لپاره " ReDim Preserve " وکاروو. برسیره پردې، موږ به وښیو چې څه پیښیږي که چیرې موږ دا ونه کاروو.
د ډیفالټ په توګه، موږ کولی شو یوازې د صف وروستی اړخ (د بیلګې په توګه کالم یا پورتنۍ حد) له سره اندازه کړو. موږ به سرې انتقال کړو، بیا به وروستی ابعاد بدل کړو، او بیا به د 2D سرې په Excel VBA کې د دواړو ابعادو د اندازې کولو لپاره بیا انتقال کړو.
1 . ReDim د وروستي ابعاد 2D سرې ساتل
موږ به لومړی 2D سرې د متحرک په توګه تعریف کړو. بیا، د ReDim بیان په کارولو سره، موږ به یو جوړ کړود دریو قطارونو او دوه کالمونو سره صف. په نهایت کې، موږ به د ReDim بیان بیا د محفوظ کلیدي کلمې سره وکاروو د دوه ابعادي سرې پورتنۍ حد زیات کړئ.
مرحلې:
- د پیل کولو لپاره، فشار ورکړئ ALT+F11 د پورته کولو لپاره VBA ماډل کړکۍ. په بدیل سره، تاسو کولی شئ دا د پراختیا کونکي ټب → انتخاب کړئ بصری اساسی .
- بیا، له داخل کړئ ټب → غوره کړئ موډل . موږ به دلته د VBA کوډ ټایپ کړو.
- بیا، لاندې کوډ په موډل کې ولیکئ کړکۍ.
4224
VBA کوډ ماتول
- لومړی، موږ زنګ وهو د فرعي کړنلاره " Redim_Preserve_2D_Array_Row ".
- بیا، موږ متغیر زموږ_Array د متحرک سرې په توګه اعلان کوو.
- بیا، موږ د صف اندازه تعریفوو. ښکته حد 3 دی، پورتنی حد 2 دی، او دواړه د 1 څخه پیل کیږي.
- بیا، موږ سرې ته ارزښتونه وړاندې کوو .
- له هغې وروسته، موږ ارزښتونه د C6:D8 حجرې رینج ته داخل کړو.
- له هغې وروسته، موږ کوډ به اجرا کړي.
- نو، محفوظ کړئ موډل او چلول<فشار ورکړئ 3> .
- د پایلې په توګه، دا به ارزښتونه د ټاکل شوي حجرو سلسلې ته راستانه کړي. موږ وینو چې " راحیل " په قطار کې دی 1 او کالم 1 موقعیت،کوم چې د VBA کوډ کې د ( 1,1 ) په توګه تعریف شوی.
- اوس، موږ به د سرې اندازه بدله کړو.
- نو، دا په پخواني کوډ کې اضافه کړئ او لومړی د رینج ارزښت بیان لرې کړئ. برسېره پردې، کوډ څنګه ښکاري تاسو کولی شئ د لاندې سنیپ شاټ څخه وګورئ.
8032
- 14>دلته، موږ د ( ) څخه پورتنۍ حد زیات کړی دی. 1 تر 2 ) ته ( 1 تر 3 ) د 1<4 لخوا>.
- بیا، موږ په صف کې ارزښتونه اضافه کړل.
- اوس که موږ دا کوډ اجرا کړو، نو موږ به وګورو چې پخوانۍ ارزښتونه خوندي نه دي. دا به د پخوانیو ارزښتونو لپاره خالي بیرته راستانه شي.
- اوس، موږ کولی شو دا د محفوظ کلیمې په اضافه کولو سره حل کړو. 1>ReDim بیان .
- په پای کې، زموږ بشپړ کوډ به دا وي.
3797
- اوس، که موږ <دا کوډ 1> چل کړئ نو محصول به داسې وي. په دې توګه، موږ به په Excel VBA کې د 2D سرې وروستی ابعاد " ReDim خوندي کړو " " وساتئ او د صف دواړه ابعاد له سره اندازه کړئ.
نور ولولئ: VBA د ځانګړي ترلاسه کولو لپاره په Excel کې له کالم څخه سرې ته ارزښتونه (3 معیارونه)
ورته لوستل
- په Excel کې د جدول سرې نوم څنګه (سره اسانه ګامونه)
- ایکسیل VBA د CSV فایل په صف کې لوستلو لپاره (4 مثالي مثالونه)
- څنګه په Excel کې رینج ته سرې بدل کړئVBA (3 لارې)
- Excel VBA: له یوه صف څخه نقلونه لرې کړئ (2 مثالونه)
2. ReDim دواړه ابعاد په 2D کې خوندي کړئ د Excel VBA
په دې وروستي میتود کې، موږ به تاسو ته د بیا اندازې کولو مرحلې وښیو او " ReDim Preserve " د 2D سرې . دلته، موږ به د VBA ټرانسپوز فنکشن څخه کار واخلو ترڅو د صف د ښکته حد اندازه بدل کړو. که موږ هڅه وکړه چې په لومړي میتود کې د سرې ټیټ حد اندازه کړو، نو موږ به د " د رینج څخه بهر سبسکریپټ " تېروتنه وګورو. اوس، پرته له نورو اډو، راځئ چې وګورو چې موږ څنګه کولی شو دا حل کړو او خپل هدف ته ورسیږو. لومړی، لکه څنګه چې په لومړي میتود کې ښودل شوي ، ماډول کړکۍ راوباسئ.
8611
- سربیره پردې، د وروستي میتود لپاره کوډ داسې ښکاري.
4122
VBA کوډ ماتول
- لومړی، موږ د فرعي طرزالعمل " ReDim_Preserve_2D_Array_Both_Dimensions " ته زنګ وهو. .
- بیا، پاتې کوډونه تر VBA Transpose فنکشن پورې یو شان دي لکه په لومړي کوډ کې.
- دلته، موږ سرې ته لېږدول کېږي.
- بیا، موږ د سرې پورتنۍ باؤنډ زیاتوو.
- له هغې وروسته، موږ بیا سرې لیږدوو. له همدې امله، بالاخره دا به ټیټ حد ته بدلون ورکړي.
- بیا، موږ د بیا تنظیم شوي سرې لپاره ارزښتونه دننه کوو پداسې حال کې چېد زړو معلوماتو ساتل.
- په نهایت کې، موږ ارزښتونه د سیل سلسلې ته لیکو C6:E9 .
- وروسته دا چې، لکه څنګه چې په لومړي میتود کې ښودل شوي ، چلول دا کوډ.
- په دې توګه، موږ کولی شو وګورو چې کوډ څنګه ساتي. د 2D سرې د " ReDim محافظت " او VBA لیږد فنکشن په کارولو سره.
نور ولولئ: VBA په Excel کې د اری لیږدولو لپاره (3 میتودونه)
د یادولو لپاره شیان
- 14> ReDim Preserve نشي کولی د صف ټیټ حد بدل کړي. د دې کولو لپاره، موږ اړتیا لرو چې د لیږد فنکشن وکاروو.
- موږ کولی شو یوازې ریډیم په متحرک صفونو کې وکاروو.
پایله
موږ تاسو ته د " ریډیم خوندي کولو " لپاره دوه ګړندي لارې ښودلې a 2D سری په Excel VBA کې. که تاسو د دې میتودونو په اړه کومې ستونزې سره مخ یاست یا زما لپاره کوم نظر لرئ، لاندې تبصره کولو کې وړیا احساس وکړئ. برسېره پردې، تاسو کولی شئ زموږ سایټ ته لاړ شئ ExcelWIKI د Excel پورې اړوند نورو مقالو لپاره. د لوستلو لپاره مننه، غوره وساتئ!