فهرست
پدې مقاله کې ، زه به تاسو ته وښیم چې تاسو څنګه کولی شئ په VBA کې یو تار په صف کې وویشئ. Split یو له خورا مهم او پراخه کارول شوي افعال څخه دی چې موږ یې په VBA کې کاروو. تاسو به په هر ډول ممکنه لارو VBA کې تار ویشل زده کړئ.
د VBA سپلیټ فنکشن (چټک لید)
=Split(Expression As String, [Delimiter], [Limit As Long=1], [CompareAsVbCompareMethod=vbBinaryCompare]) 
د تمرین کاري کتاب ډاونلوډ کړئ
یو سټرینګ په Array.xlsm کې وویشئ
3 لارې په VBA کې په یوه صف کې د تار ویشلو لپاره
راځئ چې زموږ په لاس کې تار ولرو "موږ د متحده ایالاتو، کاناډا، آسټرالیا او فرانسې د ویزې لپاره غوښتنه وکړه .” .
زه به تاسو ته وښیم چې تاسو څنګه کولی شئ دا تار په هر ډول ممکنه طریقو سره د VBA د سپلیټ فنکشن په کارولو سره په صف کې وویشئ. .
1. په VBA
کې د سټرینګ د ویشلو لپاره هر ډول ډیلیمیټر وکاروئ
تاسو کولی شئ د ډیلیمیټر په توګه هر تار وکاروئ ترڅو په VBA کې تار تقسیم کړئ.
<0 دا کیدای شي یو ځای ("") ، یو کوما (",") ، یو سیمیکون (":") ، یو واحد کرکټر، a د حروفونو تار، یا هر څه.⧭ بېلګه 1:
راځئ چې د کوما په توګه د سټرینګ په کارولو سره تقسیم کړو ډیلیمیټر.
د کوډ کرښه به دا وي:
Arr = Split(Text, ",") بشپړ VBA کوډ به وي:
⧭ VBA کوډ:
8551
⧭ محصول:
دا به تار په یوه صف کې وویشي چې پکې شامل دي {"موږ د متحده ایالاتو د ویزې لپاره غوښتنه کړې"، "کاناډا"، "استرالیا"، "فرانس”}.
⧭ بېلګه 2:
تاسو کولی شئ یو ځای (“”) د حد په توګه وکاروئ.
د کوډ کرښه به دا وي:
Arr = Split(Text, " ") بشپړ VBA کوډ به وي:
⧭ VBA کوډ:
6167
⧭ محصول:
دا به تار په یوه صف کې وویشي چې پکې {"موږ"، "تطبیق شوي"، "لکه"، "د"، "ویزه"، "د"، "امریکا"، "کاناډا،"، "آسټرالیا،"، "فرانسه،"}.
⧭ د یادولو وړ شیان:
- ډیفالټ ډیلیمیټر یو ځای (“”) دی.
- یعنی، که تاسو کوم حد نه داخل کړئ، نو دا به د ډیلیمیټر په توګه ځای وکاروي.
نور ولولئ: په ایکسل کې د کریکټ په واسطه سټینګ تقسیم کړئ (6 مناسبې لارې)
ورته لوستل:
15>16>2. یو تار په یو صف کې د هر ډول شیانو سره تقسیم کړئ
تاسو کولی شئ د خپلې خوښې سره سم د هر ډول توکو سره یو تار په سري کې وویشئ.
د توکو شمیر په توګه دننه کړئ د درېیم دلیل د Split function .
⧭ بېلګه:
راځئ چې تقسیم کړو په لومړي 3 توکو کې د خلع سره د ډیلیمیټر په توګه تار.
د کوډ کرښه بهوي:
Arr = Split(Text, " ", 3) او VBA کوډ به وي:
⧭ د VBA کوډ:
1545
⧭ محصول:
دا به تار په یو ډول وویشي سرې چې لومړی 3 توکي لري چې د ډیلیمیټر ځای لخوا جلا شوي.
⧭ د یادولو وړ شیان:
- ډیفالټ دلیل -1 دی.
- دا پدې مانا ده چې که تاسو دلیل داخل نه کړئ، دا به ویشل شي. تار د امکان تر حده په اعظمي شمیر کې.
نور ولولئ: په Excel کې د اوږدوالي له مخې تار ویشلو څرنګوالی (8 لارې)
3. په VBA
سپلایټ فنکشن تاسو ته د قضیې حساس او دواړه کارولو وړاندیز کوي ترڅو د قضیې حساس او غیر حساس ډیلیمیټر دواړه وکاروئ. کیس غیر حساس ډیلیمیټر.
د کیس غیر حساس حد لپاره، د څلورم دلیل د 1. په توګه دننه کړئ. 3>
او د کیس غیر حساس حد لپاره، د څلورم دلیل د 0 په توګه دننه کړئ.
⧭<2 1 بیلګه: د قضیې غیر حساس حد
په ورکړل شوي تار کې، راځئ چې متن "فار" د حد په توګه او 2 په توګه په پام کې ونیسو. د صفونو د ټولو توکو شمیر.
اوس، د کیس غیر حساس قضیې لپاره، د کوډ کرښه به دا وي:
Arr = Split(Text, "FOR ", 3,1) او بشپړ VBA کوډ به وي:
⧭ VBA کوډ:
4357
⧭ محصول:
لکه څنګه چې ډیلیمیټر کیس غیر حساس دلته دی، د "لپاره دا به د "لپاره" په توګه کار وکړي او دا به تار د دوه توکو په صف کې وویشي.
⧭ 2 بېلګه: د قضیې حساس حد
بیا، د کیس حساس قضیې لپاره، د کوډ کرښه به دا وي:
Arr = Split(Text, "FOR ", 3,0) او بشپړ VBA کوډ به وي:
1>⧭ VBA کوډ:
4709
⧭ محصول:
لکه څنګه چې ډیلیمیټر کیس حساس دی دلته " FOR” به د “for” په توګه نه وي او دا به تار د دوو توکو په صف کې نه ویشي.
نور ولولئ: ایکسیل VBA: له یوه سرې څخه نقلونه لرې کړئ (2 مثالونه)
⧭ د یادولو وړ شیان: <3
- د استدلال اصلي ارزښت 0 دی.
- یعنی، که تاسو د څلورم دلیل ارزښت ونه کړئ، دا به د کیس حساس میچ لپاره کار وکړي.
نتیجې
له دې امله، د دې میتودونو په کارولو سره، تاسو کولی شئ د <1 څخه کار واخلئ د VBA د سپلایټ فنکشن د توکو په یوه لړۍ کې د تار ویشلو لپاره. ایا تاسو کومه پوښتنه لرئ؟ له موږ څخه پوښتنه وکړئ.
