Artikulu honetan Excel 2019, 2016, 2013 eta beste bertsio batzuetan moneta-zenbakiak ingelesezko hitzetan bihurtzeko bi modu azkar eta doakoak erakutsiko dizkizut.

Microsoft Excel bikaina da. hau eta bestea kalkulatzeko programa. Hasieran datu-matrize handiak prozesatzeko garatu zen. Hala ere, fakturak, ebaluazioak edo balantzeak bezalako kontabilitate-erregistroak sortzeko aukera ere ematen du azkar eta eraginkortasunez.

Ordainketa-dokumentu gutxi-asko sendoetan, beharrezkoa da zenbakizko balioak beren hitz-formarekin bikoiztea. Askoz zailagoa da idatzitako zenbakiak eskuz idatzitakoak baino faltsutzea. Iruzurgile batzuk 3000etik 8.000 egiten saia daitezke, eta ia ezinezkoa den bitartean "hiru" ezkutuan "zortzi"rekin ordezkatzea.

Beraz, behar duzuna ez da zenbakiak Excel-en hitz bihurtzea soilik (adibidez, 123,45era. "ehun eta hogeita hiru, berrogeita bost"), baina idatzi dolar eta zentimo (adibidez, 29,95 $ "hogeita bederatzi dolar eta laurogeita hemeretzi zentimo" gisa), libra eta penique GBP, euro eta eurozentimo, etab.

Excel-en azken bertsioek ere ez dute zenbakiak idazteko tresna integraturik, aurreko bertsioak ahaztu gabe. Baina orduan Excel oso ona da. Beti hobetu dezakezu bere funtzionaltasuna bere

konbinazio guztietan, VBA makro edo hirugarrenen gehigarrietan dauden formulak erabiliz.

Behean zenbakiak bihurtzeko bi modu aurkituko dituzu. zifrak hitzetara

Eta, baliteke, behar izateabihurtu Words Zenbakiak Excel-en

Oharra. zenbakia testu bihurtzea bilatzen ari bazara, hau da, Excel-ek zure zenbakia testu gisa ikustea nahi duzula, gauza apur bat ezberdina da. Horretarako, TESTU funtzioa edo Excel-en zenbakiak testura aldatu atalean deskribatutako beste modu batzuk erabil ditzakezu.

SpellNumber VBA makroa zenbakiak hitz bihurtzeko

Dagoeneko aipatu dudan bezala , Microsoft-ek ez zuen zeregin horretarako tresnarik gehitu nahi izan. Hala ere, zenbat erabiltzaile behar zuten ikusi zutenean, VBA makro berezia sortu eta argitaratu zuten euren webgunean. Makroak SpellNumber izenak iradokitzen duena egiten du. Topatu ditudan beste makro guztiak Microsoft kodean oinarritzen dira.

" Spellnumber formula" gisa aipatzen den makroa aurki dezakezu. Hala ere, ez da formula bat, makro funtzio bat baizik, edo zehatzago esateko Excel User defined function (UDF).

Spellnumber aukerak dolar eta zentimoak idazteko gai da. Beste moneta bat behar baduzu, " dolar " eta " zentimo " alda ditzakezu zure izenarekin.

VBA aditua ez bazara. , behean kodearen kopia bat aurkituko duzu. Oraindik ez baduzu nahi edo denborarik ez baduzu hau konpontzeko, erabili irtenbide hau.

1. Ireki zenbakiak idatzi behar dituzun lan-koadernoa.
2. Sakatu Alt. +F11 Visual Basic editorearen leihoa irekitzeko.
3. Hainbat liburu irekita badituzu, egiaztatu behar den lan-liburua aktibo dagoela erabiliz.proiektuen zerrenda editorearen goiko ezkerreko izkinan (lan-liburuko elementuetako bat urdinez nabarmenduta dago).
4. Editorearen menuan joan Txertatu -> Modulura. .
5. YourBook - Module1 izeneko leiho bat ikusi beharko zenuke. Hautatu kode guztia beheko markoan eta itsatsi leiho honetan.

   Aukera esplizitua 'Funtzio nagusia Funtzioa SpellNumber( ByVal MyNumber) Dim Dollars, Cents, Dim Dim DecimalPlace, Count ReDim Place(9) As String Place(2) = " Mila " Place(3) = " Milioi " Place(4) = " Billion " Place(5) = " Bilioi " MyNumber = Trim(Str(MyNumber)) DecimalPlace = InStr(MyNumber, "." ) DecimalPlace > 0 Then Cents = GetTens(Left(Mid(MyNumber, DecimalPlace + 1) & _ "00" , 2)) MyNumber = Moztu (Left(MyNumber, HamarLeku - 1)) Amaitu (NireZenbakia, HamartarLekua - 1)) Amaitu zenbaketa bada = 1 Egin Nire Zenbakia "" Temp = GetHundreds(Right(MyNumber, 3)) If Temp "" Then Dollars = Temp & Lekua (zenbaketa) & Dolar bada Len(NireZenbakia) > 3 Orduan NireZenbakia = Ezkerra(NireZenbakia, Len(NireZenbakia) - 3) Bestela NireZenbakia = "" Amaitu bada Zenbaketa = Zenbaketa + 1 Begizta Hautatu Kasua Dolar kasua "" Dolarak = "Dolarrik ez" Kasua "Bat" Dolar = "Dolar bat" Kasu Bestela Dolar = Dolar & "Dolar" Amaiera Hautatu Aukeratu Kasua Zentimoak "" Zentimoak = " eta Zentimorik ez" Kasua "Bat" Zentimoak = "eta Zentimo bat" Kasua Bestela Zentimoak = " eta " & Zentimoak & " Cents " End Select SpellNumber = Dolar & Cents End Funtzioa GetHundreds(ByVal NireZenbakia) Dim Emaitza String gisa Val(NireZenbakia) = 0 Orduan Irten Funtzio NireZenbakia = Eskuinekoa( "000" & NireZenbakia, 3) ' Bihurtu ehunka lekua. Erdikoa (NireZenbakia, 1, 1) "0" bada, Emaitza = GetDigit (Erdia (NireZenbakia, 1, 1)) & " Ehun " End If ' Bihurtu hamarrak eta batak lekua. Erdikoa (NireZenbakia, 2, 1) "0" bada, Emaitza = Emaitza & GetTens(Mid(MyNumber, 2)) Else Result = Emaitza & GetDigit(Mid(MyNumber, 3)) End If GetHundreds = Emaitza Amaiera Funtzio Funtzioa GetTens(TensText) Dim Result As String Result = "" ' Deuseztatu aldi baterako funtzioaren balioa. Val(Left(TensText, 1)) = 1 Orduan ' Balioa 10-19 bitartekoa bada... Hautatu Case Val(TensText) 10. kasua: Emaitza = "Hamar" 11. Kasua: Emaitza = "Hamaika" 12. Kasua: Emaitza = "Hamabi " 13. kasua: Emaitza = "Hamahiru" Kasua 14. Kasua: Emaitza = "Hamalau" Kasua 15. Kasua: Emaitza = "Hamabost" Kasua 16. Kasua: Emaitza = "Hamasei" Kasua 17. Kasua: Emaitza = "Hamazazpi" Kasua 18. Kasua: Emaitza = "Hamazortzi" Kasua 19: Emaitza = "Hemeretzi" Kasua Bestela Amaiera Hautatu Bestela ' 20-99 arteko balioa bada... Hautatu Case Val(Ezkerra(TensText, 1)) 2. kasua: Emaitza = "Hogei " 3. kasua: Emaitza = "Hogeita hamar " 4. kasua: Emaitza = "Berrogei " 5. kasua: Emaitza = " Berrogeita hamar " Kasua 6: Emaitza = " Hirurogei " Kasua 7: Emaitza = " Hirurogeita hamar " Kasua 8: Emaitza = " Laurogei " Kasua 9. Kasua: Emaitza = " Laurogeita hamar " Kasua Bestela Amaiera Aukeratu emaitza = Emaitza & GetDigit _ (Eskuinean(TensText, 1)) ' Berreskuratu lekua. End If GetTens = Emaitza Amaiera Funtzioa Funtzioa GetDigit(Digit) Hautatu maiuskulakVal(zifra) 1. kasua: GetDigit = "Bat" 2. kasua: GetDigit = "Bi" 3. kasua: GetDigit = "Hiru" 4. kasua: GetDigit = "Lau" 5. kasua: GetDigit = "Bost" 6. kasua: GetDigit = " Sei" 7. kasua: GetDigit = "Zazpi" 8. kasua: GetDigit = "Zortzi" kasua 9. Kasua: GetDigit = "Bederatzi" Kasua Bestela: GetDigit = "" Amaiera Hautatu Amaiera funtzioa

6. Sakatu Ctrl+S eguneratutako lan-koadernoa gordetzeko.

   Zure lan-koadernoa berriro gorde beharko duzu. Lan-liburua makro batekin gordetzen saiatzen zarenean " Ondoko ezaugarriak ezin dira makrorik gabeko lan-liburuan gorde " mezua jasoko duzu

   

   Sakatu Ez. Ikusten duzunean elkarrizketa-koadro berri bat, hautatu Gorde gisa aukera. " Gorde mota gisa " eremuan, hautatu " Excel makro-gaitutako lan-liburua " aukera.

   

Erabili SpellNumber makroa hemen. zure lan-orriak

Orain SpellNumber funtzioa erabil dezakezu Excel dokumentuetan. Sartu =SpellNumber(A2) zenbakia hitzez idatzita jaso behar duzun gelaxkan. Hemen A2 zenbakia edo zenbatekoa duen gelaxkaren helbidea da.

Hemen emaitza ikus dezakezu:

Tira!

Bizkor kopiatu SpellNumber funtzioa beste gelaxka batzuetara.

Badazu taula osoa bihurtu behar duzu, ez gelaxka bat bakarrik, jarri saguaren kurtsorea gelaxkaren beheko eskuineko ertzean formula duen gurutze beltz txiki batean bihurtu arte:

Egin klik ezkerreko botoiarekin eta arrastatu zehar. zutabea formula betetzeko. Askatu botoia emaitzak ikusteko:

Oharra. Mesedezkontuan izan SpellNumber beste gelaxka baterako esteka batekin erabiltzen baduzu, idatzizko batura eguneratuko dela iturburuko gelaxkako zenbakia aldatzen den bakoitzean.

Zenbakia zuzenean ere sar dezakezu funtzioan, adibidez. adibidez, =SpellNumber(29.95) (29,95 - komatxorik gabe eta Dolar ikurra).

Makroa Excel-en zenbakiak idazteko erabiltzearen desabantailak

Hasteko, VBA ezagutu behar duzu kodea zure arabera aldatzeko. beharrak. Beharrezkoa da lan-liburu bakoitzeko kodea itsatsi, non aldatzeko asmoa duzun. Bestela, txantiloi-fitxategi bat sortu beharko duzu makroekin eta Excel konfiguratu fitxategi hau hasiera bakoitzean kargatzeko.

Makro bat erabiltzearen desabantaila nagusia lan-liburua beste norbaiti bidaltzen badiozu, pertsona honek ez du izango. ikusi testua makroa lan-koadernoan sartu ezean. Eta barneratuta badago ere, lan-koadernoan makroak daudela dioen alerta jasoko dute.

Idatzi zenbakiak hitzetan gehigarri berezi bat erabiliz

Batuketak azkar idatzi behar dituzten baina VBA ikasteko edo konponbideak asmatzeko denborarik ez duten Excel erabiltzaileentzat, tresna berezi bat sortu dugu. hori bizkor egin dezake kopuru-hitzen bihurketa moneta ezagun batzuentzat. Mesedez, bete ezazu gure Ultimate Suite Excel-eko azken bertsioan sartutako Spell Number gehigarria.

Erabiltzeko prest egoteaz gain, tresna oso malgua da kantitateak testu bihurtzeko orduan:

• Hautatu dezakezu hauetako bat.honako moneta hauek: USD, EUR, GBP, BIT, AUD.
• Idatzi zatikiaren zatia zentimotan, zentimotan edo bitzentimotan.
• Aukeratu edozein testuko maiuskulak emaitzarako: letra xehea, maiuskulaz. , Izenburuaren maiuskulak edo esaldiaren maiuskulak.
• Idatzi zati hamartarra modu ezberdinetan.
• Sartu edo kendu zero zentimo.

Gehigarriak moderno guztiak onartzen ditu. bertsioak, besteak beste, Excel 365, Excel 2029, Excel 2016, Excel 2013 eta Excel 2010. Mesedez, arakatu lasai produktuaren hasierako orrialdean goian estekatuta dagoen beste gaitasun batzuk.

Eta orain, ikus dezagun zenbaki ortografia-erabilgarri hau martxan. :

1. Hautatu emaitzarako gelaxka huts bat.
2. Ablebits fitxan, Utilitateak taldean, sakatu . Spell Number .
3. Agertzen den Isuri zenbakia elkarrizketa-leihoan, konfiguratu gauza hauek:
   • Hautatu zure zenbakia koadrorako , hautatu testu gisa idatzi nahi duzun zenbatekoa duen gelaxka.
   • Zehaztu nahi duzun une , letra maiuskulaz eta dezimarra nolakoa den. zenbakiaren zatia idatzi behar da.
   • Definitu zero zentimo sartu ala ez.
   • Aukeratu emaitza balio edo formula gisa txertatu nahi duzun.
4. Elkarrizketa-leihoaren behealdean, aurrebista emaitza. Zure zenbakia idazteko moduarekin pozik bazaude, sakatu Ortografia . Bestela, saiatu ezarpen desberdinak.

Beheko pantaila-argazkiak lehenetsitakoa erakusten du.aukerak eta idatzitako zenbakia B2n. Mesedez, ohartu formula bat (zehatzago, erabiltzaileak definitutako funtzio bat) formula-barran:

Eta hau beste moneta batzuk nola idatzi daitezkeen erakusten duen erakusgarri azkar bat da:

Aholkuak eta oharrak:

• Spell Number gehigarria bizitza errealeko erabilera kasuak kudeatzeko diseinatu zenez, hala nola fakturak eta beste finantza-dokumentu batzuk, zenbaki bat <6 soilik bihur dezake>aldi berean.
• Zenbakien zutabea idazteko, sartu formula bat lehenengo gelaxkan, eta, ondoren, kopiatu formula behera.
• Aukera badago. Baliteke zure iturriko datuak etorkizunean aldatzea, hobe da emaitza formula gisa txertatzea , beraz, automatikoki eguneratzen da jatorrizko zenbakia aldatzen den heinean.
• emaitza formula gisa <12 aukeratzerakoan. 2>aukera, erabiltzaileak definitutako funtzioa (UDF) pertsonalizatua txertatzen da. Lan-koadernoa Ultimate Suite instalatuta ez duen norbaitekin partekatzeko asmoa baduzu, gogoratu formulak balioekin ordezkatu behar dituzula partekatu aurretik.

Alderantzizko bihurketa - ingelesezko hitzak zenbakietara

Egia esan. , Ezin dut imajinatu zergatik behar duzun. Badaezpada... :)

Badirudi Excel MVP, Jerry Latham-ek, Excel Erabiltzaileak definitutako funtzioa (UDF) sortu zuela WordsToDigits gisa. Ingelesezko hitzak zenbaki bihurtzen ditu.

Jerry's WordsToDigits lan-koadernoa deskarga dezakezu UDF kodea ikusteko. Hemen ere bere adibideak aurkituko dituzu nola erabilifuntzioa.

Funtzioak nola funtzionatzen duen ikus dezakezu " Sample Entries " fitxan, non zure adibideak ere sartu ahal izango dituzu. Zure dokumentuetan WordsToDigits erabiltzeko asmoa baduzu, jakin ezazu funtzio honek murrizketak dituela. Adibidez, ez ditu hitzetan sartutako zatikiak ezagutzen. Xehetasun guztiak " Informazioa " fitxan aurkituko dituzu.