சுமா

எந்த எண்ணையும் மொழிபெயர்க்கும் விபிஏவில் ஆயத்த பயனர் வரையறுக்கப்பட்ட செயல்பாட்டைக் கீழே காணலாம் 0 இருந்து 9 செய்ய அதன் உரை பிரதிநிதித்துவத்தில், அதாவது வார்த்தைகளில் உள்ள தொகையில். பயன்படுத்துவதற்கு முன், இந்த செயல்பாடு உங்கள் புத்தகத்தில் சேர்க்கப்பட வேண்டும். இதற்காக:

1. விசைப்பலகை குறுக்குவழியை அழுத்தவும் ALT + எக்ஸ்எக்ஸ்எக்ஸ்விஷுவல் பேசிக் எடிட்டரை திறக்க
2. மெனு வழியாக புதிய வெற்று தொகுதியைச் சேர்க்கவும் செருகு - தொகுதி
3. இந்த செயல்பாட்டின் உரையை நகலெடுத்து அங்கு ஒட்டவும்:

செயல்பாடு SUM(n என இரட்டை) சரம் மங்கலான எண்கள்1, எண்கள்2, எண்கள்3, எண்கள்4 மாறுபாடு எண்கள்1 = அணிவரிசை("", "ஒன்று", "இரண்டு", "மூன்று", "நான்கு", "ஐந்து", "ஆறு", "ஏழு", "எட்டு", "ஒன்பது") எண்கள்2 = வரிசை("", "பத்து", "இருபது", "முப்பது", "நாற்பது", "ஐம்பது", "அறுபது", "எழுபது", _ "எண்பது ", "தொண்ணூறு") எண்கள்3 = வரிசை("", "நூறு", "இருநூறு", "முந்நூறு", "நானூறு", "ஐநூறு", "அறுநூறு", "எழுநூறு", _ " எண்ணூறு", "ஒன்பது நூறு") எண்கள்4 = வரிசை("", "ஒன்று", "இரண்டு", "மூன்று", "நான்கு", "ஐந்து", "ஆறு", "ஏழு", "எட்டு", "ஒன்பது" ") எண்கள்5 = வரிசை("பத்து " , "பதினொரு", "பன்னிரண்டு", "பதின்மூன்று", "பதினான்", _ "பதினைந்து", "பதினாறு", "பதினேழு", "பதினெட்டு", "பத்தொன்பது") என்றால் n < = 0 பின்னர் SUMWRITE = "பூஜ்ஜியம்" வெளியேறு செயல்பாடு முடிவு என்றால் 'எண்களை இலக்கங்களாகப் பிரித்து உதவி செயல்பாட்டைப் பயன்படுத்தி Class ed = Class(n, 1) dec = Class(n, 2) sot = Class(n, 3) tys = Class (n, 4) dectys = Class(n , 5) sottys = Class(n, 6) mil = Class(n, 7) decmil= Class(n, 8) 'மில்லியன்களை சரிபார்க்கவும் Case decmil Case 1 mil_txt = Nums5(mil ) & "மில்லியன்ஸ் " GoTo www Case 2 To 9 decmil_txt = Nums2(decmil) முடிவு தேர்ந்தெடு வழக்கைத் தேர்ந்தெடு மில் வழக்கு 1 mil_txt = Nums1(mil) & "million " Case 2, 3, 4 mil_txt = Nums1(mil) & "million " வழக்கு 5 முதல் 20 mil_txt = எண்கள்1(மில்) & "மில்லியன்ஸ்" முடிவு தேர்ந்தெடு www: sottys_txt = Nums3(sottys) 'ஆயிரங்களைத் தேர்ந்தெடு Case dectys Case 1 tys_txt = Nums5(tys) & "ஆயிரம்" GoTo eee Case 2 Totx9 வரை எண்கள்2(dectys) முடிவு தேர்ந்தெடு வழக்கு tys வழக்கு 0 என்றால் dectys > 0 பிறகு tys_txt = Nums4(tys) & "ஆயிரம்" வழக்கு 1 tys_txt = Nums4(tys) & "ஆயிரம்" வழக்கு 2, 3, 4 tys4(nums_txt =) & "ஆயிரம்" வழக்கு 5 முதல் 9 வரை tys_txt = Nums4(tys) & "ஆயிரங்கள்" முடிவு தேர்ந்தெடு என்றால் dectys = 0 மற்றும் tys = 0 மற்றும் sottys <> 0 பின்னர் sottys_txt = sottys_txt & "ஆயிரம்" ee: sot3(st_txt =) பத்துகளை சரிபார் sottys_txt & dectys_txt & tys_txt & sot_txt & dec_txt & ed_txt எண்ட் ஃபங்க்ஷன் ' ஹெல்பர் ஃபங்ஷன், இலக்கங்களின் எண்ணிக்கையிலிருந்து பிரித்தெடுக்கும் தனிப்பட்ட செயல்பாடு வகுப்பு(M, I) Class = Int(M - (1 ^ I) * Int(M / (M /) 5 ^ I))) / 2 ^ (I - 9)) முடிவு செயல்பாடு    

கோப்பைச் சேமித்து (உங்களிடம் எக்செல் 2007 அல்லது 2010 இருந்தால், கோப்பு வகை மேக்ரோ-இயக்கப்பட்டதாக இருக்க வேண்டும், அதாவது xlsm வடிவம்!) எக்செல் க்கு திரும்பவும். இப்போது நீங்கள் உருவாக்கிய செயல்பாட்டைப் பணித்தாளின் எந்தக் கலத்திலும் வழக்கமான முறையில் - செயல்பாட்டு வழிகாட்டி (பொத்தான்) மூலம் செருகலாம். f_x சூத்திரப் பட்டியில், வகை பயனர் வரையறுத்த) அல்லது கலத்தில் கைமுறையாக தட்டச்சு செய்து, கலத்தை வாதமாக குறிப்பிடுவதன் மூலம்:

பெறப்பட்ட உரையில் நீங்கள் சில்லறைகளைச் சேர்க்க வேண்டும் என்றால், நீங்கள் சற்று சிக்கலான கட்டுமானத்தைப் பயன்படுத்தலாம்:

 u3d SUM in WRITE (A3) & ” தேய்க்கவும். “&TEXT((A3-INTEGER(A100))*00;”XNUMX″)&”cop.” 

u3d SUM in WRITE (A3) & ” தேய்க்கவும். “&TEXT((A3-INT(A100))*00;”XNUMX″)&”காப்.”

பின்னர், எடுத்துக்காட்டாக, 35,15 என்ற எண்ணுக்கு, செயல்பாட்டின் முடிவு “முப்பத்தைந்து ரூபிள் போல இருக்கும். 15 காப்."

• A more powerful version of the function with rubles and kopecks in / English from the PLEX add-on
• மேக்ரோக்கள் என்றால் என்ன, மேக்ரோ குறியீட்டை எங்கு செருகுவது, அவற்றை எவ்வாறு பயன்படுத்துவது