فهرست
یو له خورا مهم او پراخه کارول شوي افعال څخه چې موږ یې په Visual Basic Application (VBA) کې کاروو د موندلو فنکشن دی. په دې مقاله کې، زه به تاسو ته وښیم چې تاسو څنګه کولی شئ د مناسب مثالونو او انځورونو سره د Excel FIND فنکشن کاروئ.
د تمرین کاري کتاب ډاونلوډ کړئ
په Excel.xlsm کې په VBA کې فنکشن ومومئ
6 په VBA کې د FIND فنکشن کارولو لپاره ګړندي مثالونه
دلته یې لرو د مارتین کتاب پلورنځي په نوم د کتاب پلورنځي د کتابونو نومونو، لیکوالانو او بیې سره یو ډیټا ترلاسه کړه.
نن ورځ زموږ هدف د دې ډیټا سیټ څخه د VBA د فائنډ فنکشن مختلف ډوله کارونې لیدل دي.
1. په VBA کې د موندلو فنکشن د هیڅ پیرامیټر سره وکاروئ
تاسو کولی شئ د موندل فنکشن د VBA پرته له پیرامیټرونو څخه کار واخلئ.
بیا دا د یو ځانګړي ارزښت لپاره به د حجرو په لړ کې لټون وکړي او هغه لومړۍ لوبه بیرته راولي چې دا ومومي.
راځئ د نوم لټون وکړو "P. B. Shelly” په کالم کې لیکوال ( C4:C13 ).
د Find function سره کرښه به دا وي:
Set cell = Range("C4:C17").Find("P. B. Shelly") بشپړ VBA کوډ به وي:
0> ⧭ د VBA کوډ:3900
⧭ محصول:
دا یو تولیدوي میکرو نومیږي موندل . که تاسو میکرو چلوئ، دا به بیرته راستانه شي $C$6 ، د لومړي حجرې پته چې نوم یې P دی. B. Shelly .
نور ولولئ: د VBA سره په یوه حد کې ومومئایکسل: د دقیق او جزوي میچونو په شمول
2. په VBA کې د موندلو فنکشن د وروسته پیرامیټر سره پلي کړئ (د ځانګړي حجرې څخه د لټون پیل کولو لپاره)
تاسو کولی شئ د د موندلو فنکشن سره وروسته پیرامیټر وکاروئ په VBA کې. بیا به دا په یوه سلسله کې د سیل لاندې څخه د ارزښت لټون پیل کړي.
د مثال په توګه، راځئ چې د نوم لټون پیل کړو "P. B. Shelly” د لاندې حجرې څخه C6 .
د کوډ کرښه به دا وي:
Set cell = Range("C4:C13").Find("P. B. Shelly", After:=Range("C6")) او بشپړ VBA کوډ به وي:
⧭ VBA کوډ:
3603
⧭ محصول:
دا به بیرته راشي $C$13 ځکه چې دا د لاندې سیل C6 څخه لټون پیل کوي، دا د حجرې C7 څخه دی. نو دا ترلاسه کیږي P. B. Shelly په حجره کې C13 لومړی.
نور ولولئ: په یوه کې د سټینګ موندلو څرنګوالی په Excel کې د VBA کارول سیل
3. په VBA کې د موندلو فنکشن د وروسته پیرامیټر په شاوخوا کې د ریپ کولو سره پرمخ وړئ (په سرکلر ډول د ارزښت لټون کولو لپاره)
د وروسته پیرامیټر د فنډ فنکشن سره په سرکلر ډول د ارزښت لټون کوي
یعنی، دا په یوه سلسله کې د یوې حجرې لاندې لټون پیل کوي، په رینج کې لټون پای ته رسوي، او بیا د رینج له پورتنۍ برخې څخه پیل کیږي.
د مثال په توګه، راځئ د After پیرامیټر په کارولو سره د لاندې سیل C8 څخه د "جان کیټس" نوم لټون پیل کړو.
د کرښه کوډ به وي:
Set cell = Range("C4:C13").Find("John Keats", After:=Range("C8")) اوبشپړ VBA کوډ به وي:
⧭ VBA کوډ:
3284
⧭ محصول:
دا به بیرته راستانه شي $C$7 ځکه چې دا د لاندې سیل C8 څخه لټون پیل کوي، دا له دې څخه دی حجره C9 .
دا د حجرې C13 پورې هیڅ شی نه پیدا کوي، نو دا بیا د حجرې C4 څخه پیل کیږي او په حجره کې یو پیدا کوي C7 .
ورته لوستل:
- څنګه د VBA سره تار ومومئ په Excel کې (8 مثالونه)
- په Excel کې د VBA په کارولو سره دقیق میچ ومومئ (5 لارې)
- څنګه د VBA په کارولو سره ومومئ او بدل کړئ (11) لارې)
4. په VBA کې د موندلو فنکشن د LookAt پیرامیټر سره وکاروئ (د دقیق یا جزوي میچ لپاره)
تاسو کولی شئ په VBA کې د موندل فنکشن وکاروئ>LookAt پیرامیټر.
د دقیق میچ لپاره LookAt = xlWhole وکاروئ او د جزوي لپاره LookAt=xlPart وکاروئ میچ.
د مثال په توګه، راځئ هڅه وکړو چې د د کتاب نوم کالم ( "Ode" په نوم کوم کتاب شته>B4:B13 ).
که موږ د کوډ په کرښه کې xlWhole کاروو:
Set cell = Range("B4:B13").Find("Ode", LookAt:=xlWhole) محصول به یوه تېروتنه وښیې ځکه چې دا به هیڅ دقیق میچ ونه موندل شي.
21>
مګر که تاسو کاروئ:
Set cell = Range("B4:B13").Find("Ode", LookAt:=xlPart) بیا به بیرته راګرځي $B$9 ، ځکه چې هلته یو کتاب شته چې نوم یې "Ode" په حجره کې B7 ، Ode to the Nightingale.
نو د جزوي میچ لپاره بشپړ کوډدا دی:
⧭ VBA کوډ:
8797
5. د لټون لارښود پیرامیټر سره په VBA کې د موندلو فنکشن چل کړئ (د لټون سمت مشخص کولو لپاره)
تاسو کولی شئ په VBA کې د موندل فنکشن هم وکاروئ SearchDirection parameter.
د SearchDirection = xlNext د له پورتنۍ برخې څخه د لټون لپاره وکاروئ.
او SearchDirection = xlPrevious د لټون لپاره له لاندې څخه تر پورتنۍ .
د مثال په توګه، راځئ هڅه وکړو چې لیکوال ایلیف شفق په کالم کې ومومئ لیکوال ( C4:C13 ).
که موږ د کوډ په کرښه کې xlNext کاروو:
Set cell = Range("C4:C13").Find("Elif Shafak", SearchDirection:=xlNext) بیا به بیرته راستانه شي $C$5 .
مګر که تاسو کاروئ:
Set cell = Range("C4:C13").Find("Elif Shafak", SearchDirection:=xlPrevious) بیا به بیرته راګرځي $C$11 .
25>
نو د لټون لپاره بشپړ کوډ د لاندې څخه پورته دی:
⧭ VBA کوډ:
4498
6. په VBA کې د MatchCase پیرامیټر سره فنکشن ومومئ (د قضیې حساس یا غیر حساس میچ لپاره)
په نهایت کې، تاسو کولی شئ د MatchCase پیرامیټر سره موندل فنکشن وکاروئ.
د کیس حساس میچ ، او MatchCase=False د لپاره MatchCase = True وکاروئ د قضیې غیر حساس میچ.
د مثال په توګه، راځئ هڅه وکړو چې د کتاب "مور" په د کتاب نوم کالم کې ومومئ ( B4:B13 ).
که موږ د کوډ په لیکه کې ریښتیا وکاروو:
Set cell = Range("B4:B13").Find("mother", MatchCase:=True) آتوپټ به یوه تېروتنه وښیې ځکه چې دا به وي هیڅ ونه موندمیچ.
مګر که تاسو کاروئ:
Set cell = Range("B4:B13").Find("mother", MatchCase:=False) بیا به بیرته راشي $ B$9 ځکه چې په حجره کې د "مور" په نوم یو کتاب شتون لري B8 .
نو د دې لپاره بشپړ کوډ د کیس غیر حساس میچ دا دی:
⧭ VBA کوډ:
1373
نتیجې
د دې میتودونو په کارولو سره ، تاسو کولی شئ د بصري اساسی غوښتنلیک کې د موندلو فنکشن وکاروئ. ایا تاسو کومه پوښتنه لرئ؟ له موږ څخه پوښتنه وکړئ.
