فهرست
پدې مقاله کې ، موږ به په Excel VBA کې د تار شمیرې ته د بدلولو لپاره ډیری میتودونو په اړه بحث وکړو. موږ به وګورو چې څنګه جوړ شوي فنکشنونه وکاروو او د VBA کوډ مثالونو سره سټینګ ته نمبر بدلولو لپاره د دوی په کارولو سره دودیز فنکشن رامینځته کړو.
د تمرین کاري کتاب ډاونلوډ کړئ
د تمرین لپاره دا د تمرین کاري کتاب ډاونلوډ کړئ پداسې حال کې چې تاسو دا مقاله لوستلئ.
String په Number.xlsm بدل کړئ
3 لارې شمیرې ته سټینګ بدل کړئ په Excel VBA کې
1. د ډول د تبادلې فنکشن په کارولو سره سټرینګ شمیر ته بدل کړئ
ایکسیل ډیری جوړ شوي ډول تبادلې فعالیت وړاندې کوي. موږ کولی شو دا په خپل VBA کوډ کې وکاروو ترڅو په اسانۍ سره د سټینګ ډیټاټایپ څخه مختلف ډیټاټایپ ته بدل کړو.
1.1 سټینګ انټیجر ته
د بدلولو لپاره سټرینګ ته Integer ، موږ کولی شو د CInt فنکشن زموږ په کوډ کې وکاروو. د CInt فنکشن یوازې یو دلیل اخلي او دا باید یو شمیري ارزښت وي . راځئ چې لاندې کوډ د بصری کوډ ایډیټر کې هڅه وکړو.
8612
د چلولو د F5 کیس کړئ کوډ . محصول په MsgBox کې ښودل شوی.
د CInt فنکشن بدل شوی د شمیری تار ارزښت ("12.3" ) د Integer 12.
د CInt فنکشن په اړه د نورو پوهیدو لپاره، لاندې چل کړئ کوډ په کوډ مدیر کې او پایلې وڅارئ.
2992
د آؤټ پټ دلته دیلاندې اسکرین شاټ .
15>
د کوډ تشریح
په دې کوډ کې، موږ د د… بل لوپ د حجرو په تارونو B3:B7 کې د CInt فنکشن پلي کولو لپاره. د پایښت په حجرو کې چاپ شوي C3:C7. موږ د ان پټ ارزښتونو مشخص کولو لپاره د حجرو فنکشن کاروو او چیرته چې د محصول ارزښتونه چاپ کړو.
پایلې
د CInt فنکشن 25.5 ته بل عدد 26 ته بدل شو. له بلې خوا، دا 10.3 ته 10 بدل کړ، نه 11 . کله چې د لسیزې شمیرې ارزښت له .5 څخه کم وي، فعالیت ورته شمیر ته راټیټیږي. مګر د سیمال د عددي تار ارزښت په بل عدد شمیر بدلیږي که چیرې دا د مساوي یا له .5 څخه لوی وي.
یادونه
د انټیجر ارزښت د -32,768 څخه تر 32,767 پورې سلسله لري. که موږ یو شمیري ارزښت ولرو چې د دې حد څخه بهر ، Excel به یو غلطي ښکاره کړي.
16>
1.2 String to Long
د CLng فنکشن د عددي تار ارزښت په اوږده ډیټاټایپ بدلوي. دا د CInt فنکشن سره ورته کار کوي. کلیدي توپیر په دې رینج کې دی چې د -2,147,483,648 او 2,147,483,647 ترمنځ دی.
The code to run is here below:1294
دلته، حجرې B3:B9 ځينې د عددي تار ارزښت لري، او بدل شوي l اونګ شمیرې په حجرو کې دي 3>C3:C9. CLng فعالیت بدل شوی -32800 او 32800 په بریالیتوب سره اوږدو شمیرو ته چې CInt فعالیت نشي کولی. مګر دا به یو تېروتنه هم ترلاسه کړي که چیرې ان پټ عددي ارزښت د حد څخه بهر وي.
1.3 سلسله ډیسیمال ته
د CDec فنکشن په کارولو سره موږ کولی شو بدل کړو a د عددي تار ارزښت تر a لسیزې ډیټا ډول. لاندې کوډ چل کړئ د بدلولو لپاره د شمیري ارزښتونه په حجرو کې B3:B7 لسیزې ډیټاټایپ ته.
7143
1.4 واحد ته سټرنګ
په دې مثال کې، موږ به د ان پټ تارونه په واحد ډیټاټایپ (واحد - دقت د تیرولو نقطه) شمیرې. د دې لپاره، موږ اړتیا لرو د CSng فعالیت وکاروو.
د واحد ډیټاټایپ رینج- (i) -3.402823E38 تر -1.401298E-45 د منفي شمیرونو لپاره.
(ii) 1.401298E-45 تر 3.402823E38 د لپاره مثبت شمیرې.
لاندې کوډ په بصری بنسټیز مدیر کې چل کړئ.
4183
په محصول کې، حجرې B3:B9 ځینې د عددي تار ارزښت لري، او بدل شوي واحد ډیټاټایپ شمیرې په حجرو کې دي C3:C9. مګر دا به هم غلطي ترلاسه کړي 4>که داخله عددي ارزښت د حد څخه بهر وي.
1.5 تار ته دوه برابره
په دې مثال کې، موږ به د ان پټ تارونه په ډبل ډیټاټایپ بدل کړو (دوه ځله دقیق تیریږي -پوائنټ) شمیرې. د دې لپاره، موږ اړتیا لرود CDbl فنکشن کارولو لپاره.
د ډبل ډیټا ټایپ سلسله- (i) -1.79769313486231E308 تر -4.94065645841247E-324 لپاره >منفي شمیرونه.
(ii) 4.94065645841247E-324 to 1.79769313486232E30 sive s positive .
لاندې کوډ په بصری بنسټیز مدیر کې چل کړئ.
3444
په محصول کې، حجرې B3:B9 ځینې لري د عددي سټرینګ ارزښت او د ډبل ډیټاټایپ شمیرې بدلې شوې په حجرو کې دي C3:C9. مګر دا به هم ترلاسه کړي غلطي که چیرې داخل شي عددي ارزښت د حد څخه بهر دی.
1.6 اسعارو ته تار
د د اسعارو ډیټا ډول کار دی کله چې محاسبه د پیسو سره تړاو ولري. سربیره پردې، که موږ په ثابت – پوائنټ حساب کې ډیر دقت غواړو، د اسعارو ډیټا ډول کارول یو ښه انتخاب دی. موږ اړتیا لرو چې د CCur فعالیت وکاروو ترڅو تار په د اسعارو ډیټا ډول بدل کړو. د ډیټا ډول سلسله -922,337,203,685,477.5808 څخه تر 922,337,203,685,477.5808.
کوډ ته بدل کړئ عددي ارزښت 4> د حجرو B3:B7 ته د اسعارو ډیټا ډول په حجرو کې C3:C7 دلته لاندې دی.
8073
1.7 سټرنګ تر بایټ
د CByte فنکشن د عددي سټرینګ ارزښتونه بایټ ډیټا ډول ته بدلوي کوم چې له څخه رینج لري. له 0 څخه تر 255 پورې.
کوډ داسې دیتعقیبوي :
9437
په محصول کې، حجرې B3:B9 ځینې د عددي سټرینګ ارزښت لري، او بدل شوي بایټ ډیټا ډول شمیرې په حجرو کې دي C3:C9. مګر دا به هم غلطي ترلاسه کړي که داخل عددي ارزښت د حد څخه بهر وي.
24>
نور ولولئ: په Excel کې د VBA په کارولو سره اوږد ته سټینګ بدلولو څرنګوالی
ورته لوستل
- سټرینګ په Excel VBA کې دوه ځله بدل کړئ (5 میتودونه)
- د ایکسل VBA سره د متن شمیر ته د بدلولو څرنګوالی (د میکرو سره 3 مثالونه)
- په Excel کې د نمبر ته د بدلولو غلطی حل کړئ (6 میتودونه)
- څنګه په Excel کې شمیرې ته ساینسي نوټیشن بدل کړو (7 میتودونه) 27>28>
2. په Excel کې د سټینګ شمیرې ته د چک کولو او بدلولو لپاره د ګمرک VBA فنکشن کارول
په دې مثال کې، موږ به د بدلولو لپاره یو ګمرک فنکشن جوړ کړو شمیرو ته تارونه بیا موږ کولی شو دا دا دودیز فنکشن زموږ په ورک شیټ کې د جوړ شوی فنکشن وکاروو. په دې مثال کې، موږ به د دودیز فنکشن رامینځته کولو په وخت کې د CInt فنکشن تارونو ته integers بدل کړو. موږ کولی شو ټول نور افعال وکاروو چې په میتود 1 کې تشریح شوي د سټرینګ په مختلف ډیټا ډولونو بدلولو لپاره. اوس، د دې سرته رسولو لپاره لاندې مرحلې تعقیب کړئ.
مرحلې:
- دلته، په حجرو کې B3:B7، موږ ځینې لرو عددي تارارزښتونه.
- اوس، د بصری بنسټیز مدیر کې، لاندې کوډ کاپي او پیسټ بیا Ctrl + S فشار ورکړئ ترڅو Save
7242
- په حجره کې C3 ، ټایپ کول پیل کړئ د د فعالیت نوم ( StringToNumber ). Excel به په اتوماتيک ډول د فعالیت د کارولو وړاندیز وکړي. فنکشن ته د ننوتلو لپاره د Tab کیلي کیږئ.
- د حجرې حواله B3 کېږدئ د یوازینی دلیل په توګه.
- اوس، فشار ورکړئ انټر وروسته له دې چې قوس بند کړئ.
- د د ډکولو دستګاه د سیل C3 د تطبیق لپاره د ښکته ښکته کونج کې ومومئ حجرو ته فنکشن C4:C7.
33>
- وروستی محصول د تار ارزښتونو څخه مطلوب انټیجر شمیرې دي .
3. د VBA کوډ په Excel کې شمیرو ته د حجرو ټاکل شوي سلسله بدلولو لپاره
په دې مثال کې، موږ به د د انتخاب شوي حجرو سلسله بدل کړو د عددونو عددونو ته د تار ارزښتونه لري. که په کومه حجره کې غیر عددي ارزښت ولري، نو محصول به د ډش (-) کرښه وي پرځای . د مرحلې تعقیب کړئ:
- حجرې وټاکئ B3:B6 د عددي تارونه ارزښتونه او B7 چې پکې شامل دي a غیر عددي
35>
- په بصری اساسی مدیر کاپي او لاندې پیسټ کړئ کوډ .
7917
- اوس، د چلولو د آؤټ پټ لکه څنګه چې ښودل شوي F5 فشار ورکړئ لاندې اسکرین شاټ .
36>
یادونه
- موږ کاروو isNumeric function په دوهم او دریم طریقو زموږ د VBA کوډ کې چې دا ګوري چې ایا یو بیان په شمیره بدلیدلی شي.
- په میتود کې 1 ، موږ جوړ شوي فنکشنونه (CInt, CDbl, CSng…..) کارولي ترڅو د عددي سټرینګ ارزښتونه ته شمیرو بدل کړي. مګر که چیرې یو غیر عددي ارزښت وي، دا به د بې مطابقت تېروتنه ښکاره کړي.
نتیجې
اوس، موږ پوهیږو چې څنګه په Excel کې د تار ارزښتونو شمیرو ته بدل کړو. په امید سره، دا به تاسو وهڅوي چې دا فعالیت په ډیر ډاډ سره وکاروئ. کومې پوښتنې یا وړاندیزونه مه هیروئ چې لاندې د تبصرې په بکس کې یې ولیکئ.