U svom prethodnom članku objasnio sam kako pretvoriti broj u riječi u Excelu pomoću VBA. Za to sam napisao niz linija koda. Ali nisam ni sanjao da možemo pretvoriti brojeve u riječi samo pomoću Excelovih formula. No, jedan od naših korisnika Excelforuma je to učinio. Nisam ni sanjao da možemo pretvoriti brojeve u riječi.
Ova se formula koristi za pretvaranje broja u američku valutu. Ova formula može pretvoriti brojeve iz raspona centi u milijarde. Broj može imati i dvije decimale.
Ovaj korisnik s Id HaroonSidom napisao je ludu formulu. Formula je dugačka i ako ću je sada spomenuti, pokriti će cijeli post. Dakle, spomenuo sam to na kraju posta. Datoteku Excel možete preuzeti u nastavku kako biste provjerili formulu.
Broj do riječi
Formula je preduga za objašnjenje, ali mogu objasniti logiku. Ova formula određuje koliko je dug broj. Zatim koristi funkciju CHOOSE za zamjenu brojeva riječima. No to nije tako jednostavno. Ova formula identificira jednom, desetke, stotine, tisuće, milijune i milijarde. Određuje koji broj dolazi u koji odjeljak. Druga je složenost ova. Broj 12 može biti jedan ili dva u velikom broju ili dvanaest. To dodaje mnogo složenosti. Ali ovaj je čovjek uspio riješiti ovu složenost i učiniti da formula djeluje učinkovito.
Pa sad spominjem formulu. Ova formula vrijedi za B2. Bilo koji broj napisan u B2 bit će pretvoren u riječi. Ova formula pretvara brojeve u američke valute, ali možete ih prilagoditi za pretvaranje u bilo koju valutu ili jedinicu samo pronalaženjem i zamjenom "dolara" i "centa". Na primjer, ako želite pretvoriti brojeve u indijske rupije i paise, samo ih pronađite i zamijenite.
Zato držite stolicu. Evo formule.
Formula za pretvaranje broja u riječi:
= IF (ILI (LEN (POD (B2,1)) = 13, POD (B2,1) 1, ODABERITE (SREDNJI (TEKST (INT (B2), REPT (0,12))), 3,1) +1 , "", "-jedan", "-dva", "-tri", "-četiri", "-pet", "-šest", "-sedam", "-osam", "-devet"), AKO (VRIJEDNOST (SREDNJA (TEKST (INT (B2), REPT (0,12)), 2,1))) = 0, ODABERITE (MID (TEKST (INT (B2), REPT (0,12)), 3, 1) +1, "", "jedan", "dva", "tri", "četiri", "pet", "šest", "sedam", "osam", "devet"), ""))), AKO (B2> = 10^9, "milijarda", ""), ODABERITE (SREDNJI (TEKST (INT (B2), REPT (0,12)), 4,1) +1, "", "sto" , "dvjesto", "tristo", "četiristo", "petsto", "šest stotina", "sedamsto", "osamsto", "devetsto"), ODABERITE (SREDNJI (TEKST (INT (INT ( B2), REPT (0,12)), 5,1) +1, "", IZABERITE (SREDNJI (TEKST (INT (B2), REPT (0,12)), 6,1) +1, "deset" , "jedanaest", "dvanaest", "trinaest", "četrnaest", "petnaest", "šesnaest", "sedamnaest", "osamnaest", "devetnaest"), "dvadeset", "trideset", "četrdeset", "pedeset", "šezdeset", "sedamdeset", "osamdeset", "devedeset"), IF (VRIJEDNOST (SREDNJA (TEKST (INT (B2), REPT (0,12)), 5,1))> 1, ODABERITE (SREDNJI (TEKST (INT (B2), REPT (0,12)), 6,1) +1, "", "-jedan", "-dva", "-tri", "-četiri", " -pet ","-šest ","-sedam ","-osam ","-devet "), IF (VRIJEDNOST (SREDNJA (TEKST (INT (B2)), REPT (0,12 )), 5,1)) = 0, ODABERITE (SREDNJI (TEKST (INT (B2), REPT (0,12)), 6,1) +1, "", "jedan", "dva", "tri "," četiri "," pet "," šest "," sedam "," osam "," devet ")," ")), IF (VRIJEDNOST (SREDNJA (TEKST (INT (B2)), REPT (0,12 )), 4,3))> 0, "milijun", ""), ODABERITE (SREDNJI (TEKST (INT (B2), REPT (0,12)), 7,1) +1, "", "jedan sto "," dvjesto "," trista "," četiri stotine "," petsto "," šest stotina "," sedamsto "," osamsto "," devetsto "), ODABERITE (SREDNJI (TEKST ( INT (B2), REPT (0,12)), 8,1) +1, "", ODABERITE (SREDNJI (TEKST (INT (B2), REPT (0,12)), 9,1) +1, " deset "," jedanaest "," dvanaest "," trinaest "," četrnaest "," petnaest "," šesnaest "," sedamnaest "," osamnaest "," devetnaest ")," dvadeset "," trideset "," četrdeset "," pedeset "," šezdeset "," sedamdeset "," osamdeset "," devedeset "), IF (VALUE (MID (TEXT (INT (B2), REPT (0,12)), 8,1))>" 1, ODABERITE (SREDNJI (TEKST (INT (B2), REPT (0,12)), 9,1) +1, "", "-jedan", "-dva", "-tri", "-četiri" , "-pet", "-šest", "-sedam", "-osam", "-devet"), IF (VRIJEDNOST (SREDNJA (TEKST (INT (B2), REPT (0,12)), 8, 1)) = 0, ODABERITE (SREDNJI (TEKST (INT (B2), REPT (0,12)), 9,1) +1, "", "jedan", "dva", "tri", "četiri" , "pet", "šest", "sedam", "osam", "devet"), "")), IF (VRIJEDNOST (SREDNJA (TEKST (INT (B2), REPT (0,1) 2)), 7,3)), "tisuću", ""), ODABERITE (SREDNJI (TEKST (INT (B2), REPT (0,12)), 10,1) +1, "", "sto "," dvjesto "," tristo "," četiri stotine "," petsto "," šeststo "," sedamsto "," osamsto "," devetsto "), ODABERITE (SREDNJI (TEKST (INT (B2), REPT (0,12)), 11,1) +1, "", IZABERITE (SREDNJI (TEKST (INT (B2), REPT (0,12)), 12,1) +1, "deset "," jedanaest "," dvanaest "," trinaest "," četrnaest "," petnaest "," šesnaest "," sedamnaest "," osamnaest "," devetnaest ")," dvadeset "," trideset "," četrdeset " , "pedeset", "šezdeset", "sedamdeset", "osamdeset", "devedeset"), IF (VRIJEDNOST (SREDNJA (TEKST (INT (B2), REPT (0,12)), 11,1))> 1 , ODABERITE (SREDNJI (TEKST (INT (B2), REPT (0,12)), 12,1) +1, "", "-jedan", "-dva", "-tri", "-četiri", "-peto", "-šest", "-sedam", "-osam", "-devet"), IF (VRIJEDNOST (SREDNJA (TEKST (INT (B2), REPT (0,12)), 11,1 )) = 0, ODABERITE (SREDNJI (TEKST (INT (B2), REPT (0,12)), 12,1) +1, "", "jedan", "dva", "tri", "četiri", "pet", "šest", "sedam", "osam", "devet"), ""))), "", "") & IF (FLOOR (B2,1)> 1, "dolari", "dolar" ")) & IF (ISERROR (FIND (". ", B2,1))," "," and "& PRAVILNO (IF (LEN (LIJEVO (TRIM (MID (ZAMJENA (List1! B2,". " ", 255)), 255,200)), 2)) = 1, ODABERITE (1*LIJEVO (T RIM (SREDNJA (ZAMJENA (List1! B2, ".", REPT ("", 255)), 255.200)), 2), "deset", "dvadeset", "trideset", "četrdeset", "pedeset", "šezdeset", "sedamdeset", "osamdeset", "devedeset") & "centi", "") & CONCATENATE (IZABERITE (MID (TEXT (INT (LIJEVO (TRENUTNO (ZAMJENA (ZAMJENA (List1! B2, "." REPT ("", 255)), 255,200)), 2)), REPT (0,12)), 11,1) +1, "", CHOOSE (MID (TEXT (INT (LIJEVO (TRIM (MID (ZAMJENA) (List1! B2, ".", REPT ("", 255)), 255.200)), 2)), REPT (0,12)), 12,1) +1, "deset", "jedanaest", " dvanaest "," trinaest "," četrnaest "," petnaest "," šesnaest "," sedamnaest "," osamnaest "," devetnaest ") &" centi "," dvadeset "," trideset "," četrdeset "," pedeset "," šezdeset "," sedamdeset "," osamdeset "," devedeset "), IF (VALUE (MID (TEXT (INT (LIJEVO (TRIM (MID (ZAMJENA (ZAMJENA 1! B2,". " 255)), 255,200)), 2)), REPT (0,12)), 11,1))> 1, ODABERITE (MID (TEXT (INT (LIJEVO (TRIM (MID (ZAMJENA (LIST1! B2, "ZAMJENA) ", REPT (" ", 255)), 255,200)), 2)), REPT (0,12)), 12,1) +1," ","-jedan ","-dva ","-tri ","-četiri ","-pet ","-šest ","-sedam ","-osam ","-devet ") &" centi ", IF (LIJEVO (TRIM (SREDNJA (ZAMJENA (List1! B2) , ".", REPT ("", 255)), 255,200)), 2) = "01", "jedan cent", IF (LIJEVO (TRIM (SREDNJA (ZAMJENA (List1! B2, "." "", 255)), 255,200)), 1) = "0", ODABERITE (SREDNJA (TEKST (INT (LIJEVO (TRIM (MID (ZAMJENA (ZAMJENA 1! B2, "." , 255,200)), 2)), REPT (0,12)), 12,1) +1, "", "jedan", "dva", "tri", "četiri", "pet", "šest" , "sedam", "osam", "devet") & "centi", "")))))))) |
Pa da, ovo je formula. Kako Vam se sviđa? Nadam se da će vam biti od koristi. Ako ovo ne želite koristiti, upotrijebite metodu VBA za pretvaranje brojeva u riječi. Ako imate bilo kakvih nedoumica u vezi s ovim člankom ili ako imate drugih pitanja vezanih uz Excel, pitajte to i vi u odjeljku komentara u nastavku.
Kako pretvoriti broj u riječi u Excelu u rupijama : Možemo stvoriti prilagođenu Excel formulu za pretvaranje brojeva u riječi u indijskim rupijama. Ja sam stvorio ovu prilagođenu funkciju za pretvaranje brojeva u riječi u smislu indijskih rupija. Možete preuzeti makro datoteku
13 metoda kako ubrzati Excel | Excel je dovoljno brz da izračuna 6,6 milijuna formula u 1 sekundi u idealnim uvjetima s računalom s normalnom konfiguracijom. No ponekad promatramo excel datoteke koje rade izračun sporije od puževa. Mnogo je razloga iza ove sporije izvedbe. Ako ih možemo identificirati, možemo natjerati naše formule da se brže izračunaju.
Centrirajte Excel list vodoravno i okomito na stranici Excel : Microsoft Excel omogućuje vam poravnavanje radnog lista na stranici, možete promijeniti margine, odrediti prilagođene margine ili centrirati radni list vodoravno ili okomito na stranici. Margine stranice su prazna mjesta između podataka radnog lista i rubova ispisane stranice
Dijelite ćeliju dijagonalno u programu Microsoft Excel 2016 : Za dijagonalno dijeljenje ćelija koristimo oblikovanje ćelije i umetamo dijagonalno razdjelnu liniju u ćeliju. Time se vizualno dijagonalno odvajaju ćelije.
Kako umetnuti kvačicu u Excel 2016 : Za umetanje kvačice u Excel ćeliju koristimo simbole u Excelu. Postavite fontove na krila i upotrijebite formulu Char (252) da biste dobili simbol kvačice.
Kako onemogućiti Scroll Lock u Excelu : Tipke sa strelicama u Excelu pomiču ćeliju gore, dolje, lijevo i desno. No ova je značajka primjenjiva samo ako je onemogućeno Scroll Lock u Excelu. Zaključavanje pomicanja u Excelu koristi se za pomicanje gore, dolje, lijevo i desno na vašem radnom listu, a ne u ćeliji. Dakle, ovaj će vam članak pomoći kako provjeriti status zaključavanja pomicanja i kako ga onemogućiti?
Što učiniti ako Excel prekida veze ne rade : Kad radimo s nekoliko excel datoteka i koristimo formule za obavljanje posla, namjerno ili nenamjerno stvaramo veze između različitih datoteka. Uobičajene veze prema formuli mogu se lako prekinuti upotrebom opcije prekida veze.
Popularni članci:
50 Excel prečaca za povećanje vaše produktivnosti | Budite brži u izvršavanju svojih zadataka. Ovih 50 prečaca učinit će da radite još brže na Excelu.
Kako koristiti Excel VLOOKUP funkciju| Ovo je jedna od najčešće korištenih i popularnih funkcija programa Excel koja se koristi za traženje vrijednosti iz različitih raspona i listova.
Kako koristiti Excel COUNTIF funkcija| Brojte vrijednosti s uvjetima pomoću ove nevjerojatne funkcije. Ne morate filtrirati svoje podatke da biste računali određenu vrijednost. Funkcija Countif bitna je za pripremu vaše nadzorne ploče.
Kako koristiti funkciju SUMIF u Excelu | Ovo je još jedna bitna funkcija nadzorne ploče. To vam pomaže pri zbrajanju vrijednosti u posebnim uvjetima.