فهرست
په VBA کې تاسو کولی شئ د وروستي قطار موندلو لپاره مختلف میتودونه وکاروئ. په دې مقاله کې، زه په Excel کې د VBA د وروستي قطار موندلو مختلف میتودونه تشریح کوم.
د دې وضاحت څرګندولو لپاره، زه د نمونې ډیټاسیټ کاروم. په ډیټاسیټ کې 4 کالمونه شتون لري چې د پلور معلوماتو استازیتوب کوي. دا کالمونه دي د خرڅلاو شخص، سیمه، محصول، او قیمت .
د تمرین لپاره ډاونلوډ کړئ
VBA د وروستي قطار موندل د وروستي قطار موندلو لپارهتاسو کولی شئ د VBA په کارولو سره د وروستي قطار موندلو لپاره د SpecialCells طریقه وکاروئ.
لومړی، پرانیزئ tab >> بیا د Visual Basic
13>
د Microsoft Visual Basic for Applications یوه نوې کړکۍ وټاکئ.
اوس، له Insert >> ماډول
A ماډول به پرانستل شي.
بیا لاندې کوډ په <2 کې ولیکئ> ماډل
.9074
دلته، ما د LastRow_SpecialCells په نوم یو فرعي پروسیجر رامینځته کړی، چیرې چې د اوږد ډول د variable LastRow اعلان شو.
بیا د Range.SpecialCells میتود په کارولو سره متغیر تعریف شو. دلته، ما کالم A ( A:A ) د حد په توګه کارولی دی. چمتو شوي xlCellTypeLastCell د ډول پیرامیټر په توګه د SpecialCells ، دا به د حد لپاره وروستی حجره بیرته راولي (د دې قضیې لپاره، له کالم څخه A ).
ما د نتیجې د ښودلو لپاره د پیغام بکس کارولی دی.
له هغې وروسته، کوډ خوندي کړئ او بیرته لاړ شئ کاري پاڼه.
بیا، د لید ټب >> خلاص کړئ. له ماکرو >> وټاکئ ماکرو وګورئ
16>
بیا، یو د ډیالوګ بکس به ښکاره شي.
0>
اوس، د ماکرو نوم څخه د LastRow_SpecialCells د کار کتاب هم وټاکئ په Macros in کې.
په پای کې، چلول ټاکل شوی ماکرو .
په دې توګه، دا به د پیغام بکس ښکاره شي چې د وروستي قطار شمیره ښیې.
2. د غیر خالي حجرو لپاره د Rows.Count کارول
تاسو کولی شئ د VBA په کارولو سره د وروستي قطار موندلو لپاره Rows.Count میتود وکاروئ .
اوس، Developer tab >> خلاص کړئ. بیا د Visual Basic
19>
د Microsoft Visual Basic for Applications یوه نوې کړکۍ وټاکئ.
اوس، له Insert >> ماډول
A ماډول به پرانستل شي.
بیا لاندې کوډ په <2 کې ولیکئ>ماډول .
8409
دلته، ما د LastRow_NonEmpty په نوم یو فرعي پروسیجر رامینځته کړی، چیرې چې د اوږد ډول متغیر وروستی اعلان شوی دی.
اوس، سیلز(قطارونه. شمیرنه، 1) به حساب کړي چې په لومړي کالم کې څومره قطارونه شتون لري. بیا کارول شوی End(xlUp).Row اوس به دا وروستی کارول شوی قطار په Excel رینج کې ومومي.
په پای کې، ما د پیغام بکس د ښودلو لپاره کارولی دی.پایله.
بیا، کوډ خوندي کړئ او بیرته ورک پاڼې ته لاړ شئ.
دلته، وګورئ ټب >> خلاص کړئ. له ماکرو >> وټاکئ ماکرو وګورئ
19>
اوس، یو د ډیالوګ بکس به ښکاره شي.
0>
بیا، د ماکرو نوم څخه LastRow_NonEmpty د کار کتاب هم وټاکئ په ماکرو کې کې.
په پای کې، ټاکل شوی ماکرو چل کړئ.
په دې توګه، دا به د پیغام بکس ښکاره شي چې د وروستي قطار شمیره ښیې.
22>
3. د هر انتخاب شوي کالم لپاره د قطار شمیره کارول
په VBA، کې د هر ټاکل شوي کالم په کارولو سره تاسو کولی شئ وروستی قطار ومومئ.
لومړی د Developer tab >> خلاص کړئ. بیا د Visual Basic
13>
د Microsoft Visual Basic for Applications یوه نوې کړکۍ وټاکئ.
اوس، له Insert >> ماډول
A ماډول به پرانستل شي.
بیا لاندې کوډ په <2 کې ولیکئ>ماډول .
2894
دلته، ما د LastRow_AnyColumn په نوم یو فرعي پروسیجر رامینځته کړی، چیرې چې د اوږد ډول متغیر وروستی اعلان شوی دی.
بیا، په رینج کې کالم B د پیرامیټر په توګه او همدارنګه د قطارونو شمیره ، دا دا به حساب کړي چې په ورکړل شوي کالم کې څومره قطارونه دي B . بل، کارول شوی پای (xlup). قطار کوم چې به وروستی کارول شوی قطار په Excel رینج کې ومومي.
وروستی، ما د پیغام بکس د ښودلو لپاره کارولی دی.پایله.
بیا، کوډ خوندي کړئ او بیرته ورک پاڼې ته لاړ شئ.
بیا، د وګورۍ ټب >> خلاص کړئ. له ماکرو >> وټاکئ ماکرو وګورئ
16>
دلته، یو د ډیالوګ بکس به ښکاره شي.
24>
اوس، د ماکرو نوم څخه د LastRow_AnyColumn د کار کتاب هم په Macros in کې وټاکئ.
په پای کې، ټاکل شوی ماکرو چل کړئ.
په دې توګه، دا به د پیغام بکس ښکاره شي چې د وروستي قطار شمیره ښیې.
25>
ورته لوستل:
- VBA په ایکسل کې کالم کې ومومئ (7 طریقې) 28>27> د VBA په کارولو سره ومومئ او بدل کړئ (11 لارې)
- په Excel کې د VBA په کارولو سره دقیق میچ ومومئ (5 لارې)
- په Excel کې د VBA سره سټرینګ موندلو څرنګوالی (8 مثالونه)
4. د وروستي قطار موندلو لپاره د UsedRange کارول
تاسو کولی شئ د وروستي موندلو لپاره د کاري پاڼې UsedRange ملکیت وکاروئ قطار د VBA په کارولو سره.
اوس، خلاص کړئ Developer tab >> بیا Visual Basic
بیا، د د غوښتنلیکونو لپاره د مایکروسافټ Visual Basic نوې کړکۍ به پاپ اپ شي.
اوس، له Insert >> ماډول
A ماډول به پرانستل شي.
بیا لاندې کوډ په ماډول .
5427
دلته، ما د LastRow_UsedRange په نوم یو فرعي کړنلاره جوړه کړې، چیرې چې د اوږد ډول متغیر LastRow اعلان شوی دی.
بیا، تعریف شوید ActiveSheet.UsedRange.Rows میتود په کارولو سره متغیر هم چمتو شوی ActiveSheet.UsedRange.Rows.Count د ActiveSheet.UsedRange.Rows د پیرامیټر په توګه، دا به بیرته راستانه شي. وروستۍ کرښه.
ما د نتیجې د ښودلو لپاره د پیغام بکس کارولی دی.
اوس، کوډ خوندي کړئ او بیرته ورک پاڼې ته لاړ شئ.
<0 بیا، د لیدټب >> خلاص کړئ. له ماکرو>> وټاکئ ماکرو وګورئ 
بیا، یو د ډیالوګ بکس به پاپ اپ شي.
بیا، له ماکرو څخه نوم د LastRow_UsedRange د کار کتاب هم وټاکئ په ماکرو کې کې.
په پای کې، چلول ټاکل شوی ماکرو >.
په دې توګه، دا به د پیغام بکس پاپ اپ وکړي چې د وروستي قطار شمیره ښیې.
5. د وروستي موندلو لپاره د Range.Find کارول قطار
تاسو کولی شئ د VBA په کارولو سره د وروستي قطار موندلو لپاره Range.Find میتود وکاروئ.
اوس، <2 خلاص کړئ>Developer tab >> بیا د Visual Basic
دلته د Microsoft Visual Basic for Applications یوه نوې کړکۍ وټاکئ.
اوس، له داخل کړئ >> ماډول
A ماډول به پرانستل شي.
بیا لاندې کوډ په موډل کې ولیکئ.
5659
دلته، ما د Range_Find_Method په نوم یو فرعي پروسیجر رامینځته کړی، چیرې چې د اوږد ډول متغیر لاست رو اعلان شوی. .
بیا د Cells.Find میتود په کارولو سره متغیر تعریف کړئ. دلته، 7 اعلان شویپیرامیټرونه په کوم پیرامیټ کې چې ما کارولی ("*") کوم چې به لومړی غیر خالي حجره ومومي. A1 په وروسته پیرامیټ کې د رینج په توګه د پیل کولو لپاره ورکړل شوی. په LookAt پیرامیټ کې چمتو شوي xlPart په حجره کې د متن هرې برخې ته د کتلو لپاره.
LookIn:=xlFormulas پیرامیټر به وګوري فورمولونه که چیرې شتون ولري. SearchOrder:=xlByRows پیرامیټ به له ښي څخه کیڼ لور ته حرکت وکړي او د هر قطار له لارې به پورته شي تر هغه چې دا یو غیر خالي حجره ومومي.
MatchCase:=False پیرامیټر به موند ته ووایي چې د پورتنۍ یا ټیټو حروفو په پام کې نیولو سره نه. کله چې یو خالي ځای وموندل شي دا ودریږي او د قطار شمیره بیرته راګرځوي.
ما د پایلې ښودلو لپاره د پیغام بکس کارولی دی.
اوس، خوندي کړئ کوډ او بیرته ورشیټ ته لاړ شئ.
دلته د View tab >> خلاص کړئ. له ماکرو >> وټاکئ ماکرو وګورئ
16>
اوس، یو د ډیالوګ بکس به ښکاره شي.
0>34>اوس، د ماکرو نوم څخه انتخاب کړئ رینج_فائنډ_میتود هم د ماکرو په کې دننه کاري پاڼه وټاکئ.
په پای کې، چلول ټاکل شوی ماکرو .
په دې توګه، دا به د پیغام بکس ښکاره شي چې د وروستي قطار شمیره ښیې.
پایله
پدې مقاله کې، ما د VBA په Excel کې د وروستي قطار موندلو لپاره 5 لارې تشریح کړې. تاسو کولی شئ د وروستي قطار موندلو لپاره هر ډول میتودونه تعقیب کړئ. که تاسو د دې میتودونو په اړه کوم ګډوډي یا پوښتنه لرئ تاسو کولی شئلاندې تبصره وکړئ.
