Preglednice uporablja veliko ljudi pri svojem vsakdanjem delu, zato so pomemben element njihove pisarne. Čeprav večina ljudi uporablja preglednice na dokaj osnoven način, je nekaterim naprednim uporabnikom težko ali zapleteno pretvorba števila v besede v Excelu. V tem priročniku smo obravnavali to vprašanje in zagotovili štiri različne metode za pretvorba števila v besede v Excelu. Poleg tega obstajajo tri več metod za pretvarjanje številk v besedilne oblike .

Prenos delovnega zvezka

Delovni zvezek, ki smo ga uporabili v tem članku, si lahko prenesete s spodnje strani in ga vadite sami.

4 načini za pretvorbo števila v besede v Excelu

V tem poglavju članka je razloženo, kako v programu Excel pretvoriti številke v besede. Poleg tega bomo prikazali štiri za izvedbo operacije. Za izvedbo seje bomo uporabili Različica Microsoft 365 .

1. Uporaba kombiniranih funkcij v Excelu za pretvorbo števila v besede

Excelova formula, ki smo jo uporabili tukaj, temelji na štiri funkcije. LEVA , MID , PODNAPIS , in . IZBERI funkcije.

Prvič, sintaksa LEVA funkcija je naslednja:

Ta funkcija se v osnovi uporablja za pridobivanje znakov iz besedila.

Besedilo: Besedilni niz, iz katerega se izločijo znaki.

num_chars [Izbirno]: Število znakov za izpis. Začne se z leve strani. Privzeto, num_chars=1 .

Drugič, sintaksa MID funkcija je naslednja:

Ta funkcija se dejansko uporablja za pridobivanje besedila iz notranjosti niza.

Besedilo: Besedilo, iz katerega želite izpisati.

start_num: Lokacija prvega znaka, ki ga je treba izpisati.

num_chars: Število znakov za izpis.

Tretjič, sintaksa PODNAPIS funkcija je naslednja:

Ta funkcija pretvori število v besedilo v obliki števila.

vrednost: Število za pretvorbo.

format_text: Oblika števila, ki se uporabi.

Nato je treba navesti sintakso IZBERI funkcija je naslednja:

Ta funkcija pridobi vrednost s seznama na podlagi položaja.

index_num: Vrednost, ki jo izberete. Število med 1 in . 254 .

value1: Prva vrednost, med katerimi lahko izbirate.

value2 [neobvezno]: Druga vrednost, med katerimi lahko izbirate.

• Tu bomo pretvorili število v polju Številke v besedah stolpec.

• Zdaj zapišite naslednjo formulo v C5 celica.

=CHOOSE(LEFT(TEXT(B5, "000000000.00″))+1,, "Ena", "Dva", "Tri", "Štiri", "Pet", "Šest", "Sedem", "Osem", "Devet")

&IF(–LEFT(TEXT(B5,”000000000.00″))=0,,IF(AND(–MID(TEXT(B5,”000000000.00″),2,1)=0,–MID(TEXT(B5,”000000000.00″),3,1)=0),” Hundred”,” Hundred and “))

&CHOOSE(MID(TEXT(B5, "000000000.00″),2,1)+1,,, "Dvajset ", "Trideset ", "Štirideset ", "Petdeset ", "Šestdeset ", "Sedemdeset ", "Osemdeset ", "Devetdeset ")

&IF(-MID(TEXT(B5, "000000000.00″),2,1)1,CHOOSE(MID(TEXT(B5, "000000000.00″),3,1)+1,, "One", "Two", "Three", "Four", "Five", "Six", "Seven", "Eight", "Nine"),

CHOOSE(MID(TEXT(B5, "000000000.00″),3,1)+1, "Deset", "Enajst", "Dvanajst", "Trinajst", "Štirinajst", "Petnajst", "Šestnajst", "Sedemnajst", "Osemnajst", "Devetnajst"))

&IF((–LEFT(TEXT(B5,”000000000.00″))+MID(TEXT(B5,”000000000.00″),2,1)+MID(TEXT(B5,”000000000.00″),3,1))=0,,IF(AND((–MID(TEXT(B5,”000000000.00″),4,1)+MID(TEXT(B5,”000000000.00″),5,1)+MID(TEXT(B5,”000000000.00″),6,1)+MID(TEXT(B5,”000000000.00″),7,1))=0,(–MID(TEXT(B5,”000000000.00″),8,1)+RIGHT(TEXT(B5,”000000000.00″)))>0),” Million and “,” Million “))

&CHOOSE(MID(TEXT(B5, "000000000.00″),4,1)+1,, "Ena", "Dva", "Tri", "Štiri", "Pet", "Šest", "Sedem", "Osem", "Devet")

&IF(–MID(TEXT(B5,”000000000.00″),4,1)=0,,IF(AND(–MID(TEXT(B5,”000000000.00″),5,1)=0,–MID(TEXT(B5,”000000000.00″),6,1)=0),” Hundred”,” Hundred and”))

&CHOOSE(MID(TEXT(B5, "000000000.00″),5,1)+1,,," dvajset"," trideset"," štirideset"," petdeset"," šestdeset"," sedemdeset"," osemdeset"," devetdeset")

&IF(-MID(TEXT(B5, "000000000.00″),5,1)1,CHOOSE(MID(TEXT(B5, "000000000.00″),6,1)+1," Ena"," Dva"," Tri"," Štiri"," Pet"," Šest"," Sedem"," Osem"," Devet"),CHOOSE(MID(TEXT(B5, "000000000.00″),6,1)+1," Deset"," Enajst"," Dvanajst"," Trinajst"," Čtirinajst"," Petnajst"," Šestnajst"," Sedemnajst"," Osemnajst"," Devetnajst")

&IF((–MID(TEXT(B5,”000000000.00″),4,1)+MID(TEXT(B5,”000000000.00″),5,1)+MID(TEXT(B5,”000000000.00″),6,1))=0,,IF(OR((–MID(TEXT(B5,”000000000.00″),7,1)+MID(TEXT(B5,”000000000.00″),8,1)+MID(TEXT(B5,”000000000.00″),9,1))=0,–MID(TEXT(B5,”000000000.00″),7,1)0),” Thousand “,” Thousand and “))

&CHOOSE(MID(TEXT(B5, "000000000.00″),7,1)+1,, "Ena", "Dva", "Tri", "Štiri", "Pet", "Šest", "Sedem", "Osem", "Devet")

&IF(–MID(TEXT(B5,”000000000.00″),7,1)=0,,IF(AND(–MID(TEXT(B5,”000000000.00″),8,1)=0,–MID(TEXT(B5,”000000000.00″),9,1)=0),” Hundred “,” Hundred and “))&

CHOOSE(MID(TEXT(B5, "000000000.00″),8,1)+1,,, "Dvajset ", "Trideset ", "Štirideset ", "Petdeset ", "Šestdeset ", "Sedemdeset ", "Osemdeset ", "Devetdeset ")

&IF(-MID(TEXT(B5, "000000000.00″),8,1)1,CHOOSE(MID(TEXT(B5, "000000000.00″),9,1)+1,, "Ena", "Dva", "Tri", "Štiri", "Pet", "Šest", "Sedem", "Osem", "Devet"),CHOOSE(MID(TEXT(B5, "000000000.00″),9,1)+1, "Deset", "Enajst", "Dvanajst", "Trinajst", "Čtirinajst", "Petnajst", "Šestnajst", "Sedemnajst", "Osemnajst", "Devetnajst"))

Celotna formula je na prvi pogled morda videti zapletena, vendar je v bistvu ponovitev enega samega dela. prvi del formule, boste lahko razumeli preostalo.

• Nato pritisnite VSTOP .

Rezultat je naslednji rezultat.

Razčlenitev formule:

Najprej je PODNAPIS se tukaj uporablja funkcija za pretvorbo števila v "000000000.00" oblika besedila.

TEXT(B7,”000000000.00″)

Po tem je LEVA se uporablja za izločanje najbolj levega znaka iz števila. Z njo lahko ugotovimo, ali je vrnjeno število nič ali katero koli drugo vrednost.

LEFT(TEXT(B7,”000000000.00″))

Nato IZBERI funkcija se uporablja za predstavitev izpisanega števila z ustreznimi besedami.

CHOOSE(LEFT(TEXT(B7, "000000000.00″))+1,,, "Ena", "Dva", "Tri", "Štiri", "Pet", "Šest", "Sedem", "Osem", "Devet")

Zdaj preveri, ali je vrednost nič ali ne. Če je nič potem ne prikaže ničesar.

CHOOSE(LEFT(TEXT(B7, "000000000.00″))+1,, "Ena", "Dva", "Tri", "Štiri", "Pet", "Šest", "Sedem", "Osem", "Devet")

&IF(–LEFT(TEXT(B7,”000000000.00″))=0,,

Prikaže se "Sto" če je naslednji dva številke so nič . V nasprotnem primeru se prikaže "Sto in."

CHOOSE(LEFT(TEXT(B7, "000000000.00″))+1,, "Ena", "Dva", "Tri", "Štiri", "Pet", "Šest", "Sedem", "Osem", "Devet")

&IF(–LEFT(TEXT(B7,”000000000.00″))=0,,IF(AND(–MID(TEXT(B7,”000000000.00″),2,1)=0,–MID(TEXT(B7,”000000000.00″),3,1)=0),” Hundred”,” Hundred and “))

Ta formula ne zahteva VBA je odlična metoda za pretvorbo številk v besede. dva pomanjkljivosti. Prvič, ne more popolnoma predstaviti decimalnih števil po točkah. Drugič, največja omejitev števila je 999, 999, 999 . dejansko, Gospod Pete M. so prišli do te formule.

• Zdaj lahko formulo napišete za preostale vrstice ali preprosto uporabite Funkcija samodejnega izpolnjevanja programa Excel .

Nazadnje boste dobili vse pretvorjene številke v besede .

Preberite več: Kako pretvoriti število v besedilo z dvema decimalnima mestoma v Excelu (5 načinov)

2. Uporaba funkcije VLOOKUP za pretvorbo številk v besede

Uporabite lahko VLOOKUP v funkcijo pretvorba številk v besede v Excelu. Naredimo nekaj drugačnega. Tu morate najprej vstaviti vse številke v besede, nato pa lahko uporabite to funkcijo, da iz njih pretvorite katero koli število v besede.

Koraki:

• Najprej ročno zapišite vse številke z besedami v Stolpec C .

• Zdaj uporabite naslednjo formulo v C12 celica.

• Nato pritisnite VSTOP .

Razčlenitev formule

V tej formuli je VLOOKUP funkcija vrne vrednost iz danega polja.

• Prvič, B12 je vrednost iskanja, ki jo išče v dani tabeli.
• Drugič, B4:C9 je polje tabel v katerem išče ciljna vrednost .
• Tretjič, 2 je število stolpcev v tabeli, iz katerih se vrne vrednost.
• Četrtič, Lažno označuje točno tekma.

Preberite več: Kako pretvoriti številko v besedilo za VLOOKUP v Excelu (2 načina)

Podobna branja

• Kako pretvoriti številko v besedilo v Excelu z apostrofom
• Pretvarjanje števila v besedilo z zelenim trikotnikom v Excelu
• Kako pretvoriti številko v besedilo z vejicami v Excelu (3 preproste metode)
• Pretvarjanje števila v besedilo brez znanstvenega zapisa v Excelu
• Kako pretvoriti število pesov v besede v Excelu (z enostavnimi koraki)

3. Uporaba VBA za pretvorbo števila v besede v Excelu

Najzanimivejše je, da lahko zgradite svoj lastna funkcija na . pretvorite številke v besede. v Excelu. Poleg tega lahko uporabite koda VBA razviti opredeljeno Funkcija. Koraki so navedeni spodaj.

Koraki :

• Najprej morate izbrati Razvijalec zavihek>> nato izberite Visual Basic.

• Zdaj, od Vstavite zavihek>> morate izbrati Modul .

• V tem času morate zapisati naslednje. Koda v Modul .

 Funkcija number_converting_into_words(ByVal MyNumber) Dim x_string As String Dim whole_num As Integer Dim x_string_pnt Dim x_string_Num Dim x_pnt As String Dim x_numb As String Dim x_P() As Variant Dim x_DP Dim x_cnt As Integer Dim x_output, x_T As String Dim x_my_len As Integer On Error Resume Next x_P = Array("", "Thousand ", "Million ", "Billion ", "Trillion ", " ", " ", " ", " ", " ", " ") x_numb =Trim(Str(MyNumber)) x_DP = InStr(x_numb, ".") x_pnt = "" x_string_Num = "" If x_DP> 0 Then x_pnt = " point " x_string = Mid(x_numb, x_DP + 1) x_string_pnt = Left(x_string, Len(x_numb) - x_DP) For whole_num = 1 To Len(x_string_pnt) x_string = Mid(x_string_pnt, whole_num, 1) x_pnt = x_pnt & get_digit(x_string) & " " Next whole_num x_numb = Trim(Left(x_numb, x_DP - 1)) End If x_cnt = 0x_output = "" x_T = "" x_my_len = 0 x_my_len = Int(Len(Str(x_numb)) / 3) If (Len(Str(x_numb)) Mod 3) = 0 Then x_my_len = x_my_len - 1 Do While x_numb "" If x_my_len = x_cnt Then x_T = get_hundred_digit(Right(x_numb, 3), False) Else If x_cnt = 0 Then x_T = get_hundred_digit(Right(x_numb, 3), True) Else x_T = get_hundred_digit(Right(x_numb, 3), False) End If End If If x_T "" Then x_output = x_T& x_P(x_cnt) & x_output End If If Len(x_numb)> 3 Then x_numb = Left(x_numb, Len(x_numb) - 3) Else x_numb = "" End If x_cnt = x_cnt + 1 Loop x_output = x_output & x_pnt number_converting_into_words = x_output End Function Function get_hundred_digit(xHDgt, y_b As Boolean) Dim x_R_str As String Dim x_string_Num As String Dim x_string As String Dim y_I As Integer Dim y_bb As Booleanx_string_Num = xHDgt x_R_str = "" On Error Resume Next y_bb = True If Val(x_string_Num) = 0 Then Exit Function x_string_Num = Right("000" & x_string_Num, 3) x_string = Mid(x_string_Num, 1, 1) If x_string "0" Then x_R_str = get_digit(Mid(x_string_Num, 1, 1)) & "Hundred " Else If y_b Then x_R_str = "and " y_bb = False Else x_R_str = " " y_bb = False End If End If If Mid(x_string_Num, 2, 2)"00" Potem x_R_str = x_R_str & get_ten_digit(Mid(x_string_Num, 2, 2), y_bb) End If get_hundred_digit = x_R_str End Function Function get_ten_digit(x_TDgt, y_b As Boolean) Dim x_string As String Dim y_I As Integer Dim x_array_1() As Variant Dim x_array_2() As Variant Dim x_T As Boolean x_array_1 = Array("Ten ", "Eleven ", "Twelve ", "Thirteen ", "14 ", "Fifteen ", "Sixteen ", "Seventeen ","Eighteen ", "Nineteen ") x_array_2 = Array("", "", "Twenty ", "Thirty ", "Forty ", "Fifty ", "Sixty ", "Seventy ", "Eighty ", "Ninety ") x_string = "" x_T = True On Error Resume Next If Val(Left(x_TDgt, 1)) = 1 Then y_I = Val(Right(x_TDgt, 1)) If y_b Then x_string = "and " x_string = x_string & x_array_1(y_I) Else y_I = Val(Left(x_TDgt, 1)) If Val(Left(x_TDgt, 1))> 1 Then If y_b Thenx_string = "in " x_string = x_string & x_array_2(Val(Left(x_TDgt, 1))) x_T = False End If If x_string = "" Then If y_b Then x_string = "in " End If End If If If Right(x_TDgt, 1) "0" Then x_string = x_string & get_digit(Right(x_TDgt, 1)) End If End If get_ten_digit = x_string End Function Function get_digit(xDgt) Dim x_string As String Dim x_array_1() As Variant x_array_1 = Array("Zero ","Ena ", "Dva ", "Tri ", "Štiri ", "Pet ", "Šest ", "Sedem ", "Osem ", "Devet ") x_string = "" On Error Resume Next x_string = x_array_1(Val(xDgt)) get_digit = x_string End Function 

• Zdaj morate shraniti koda .
• Nato morate obiskati Excelov delovni list .

V tem času lahko uporabite opredeljeno Za to upoštevajte navedene korake.

Koraki:

• Zdaj izberite celico, v kateri želite prikazati pretvorjeni rezultat (v našem primeru je to celica C5 ).
• Nato vnesite Znak enakosti (=) v celico. To vam bo omogočilo vnos formul.
• Nato vnesite " =število_prevrednotenje_v_glasila " ali izberite število_prevajanje_v_besedila s spustnega menija.
• Nato izberite celico s številčno vrednostjo, ki jo želite pretvoriti v besede (v našem primeru je to celica B5 ).
• Nazadnje pritisnite gumb VSTOP gumb.

Izbrana številka celice se bo pretvorila v ustrezne besede. To formulo lahko preprosto kopirate tudi v preostale celice.

Preberite več: Kako pretvoriti številčno vrednost v angleške besede v Excelu

4. Uporaba VBA za oblikovanje besedilnih valut v programu Excel

Ta metoda je podobna prejšnji. Deluje tudi tako, da vstavite modul z uporabo VBA (Visual Basic for Application) in jo uporabite kot funkcijo. Od zadnje metode se razlikuje po tem, da pretvori številke v ustrezne valutne besede. Poleg tega je v nadaljevanju naveden primer.

Za uporabo te metode sledite naslednjim korakom:

• Najprej sledite metoda-3 za vstavitev modula.
• Drugič, zapišite naslednjo kodo v Modul 2 .

 Funkcija Convert_Number_into_word_with_currency(ByVal whole_number) Dim converted_into_dollar, converted_into_cent my_ary = Array("", "", " Thousand ", " Million ", " Billion ", " Trillion ") whole_number = Trim(Str(whole_number)) x_decimal = InStr(whole_number, ".") If x_decimal> 0 Then converted_into_cent = get_ten(Left(Mid(whole_number, x_decimal + 1) & "00", 2)) whole_number =Trim(Left(celo_število, x_decimal - 1)) End If xIndex = 1 Do While celo_število "" xHundred = "" xValue = Right(celo_število, 3) If Val(xValue) 0 Then xValue = Right("000" & xValue, 3) If Mid(xValue, 1, 1) "0" Then xHundred = get_digit(Mid(xValue, 1, 1)) & " Hundred " End If If Mid(xValue, 2, 1) "0" Then xHundred =xHundred & get_ten(Mid(xValue, 2)) Drugače xHundred = xHundred & get_digit(Mid(xValue, 3)) End If End If If xHundred "" Potem converted_into_dollar = xHundred & my_ary(xIndex) & Dollar End If If Len(whole_number)> 3 Then whole_number = Left(whole_number, Len(whole_number) - 3) Drugače whole_number = "" End IfxIndex = xIndex + 1 Loop Select Case converted_into_dollar Case "" converted_into_dollar = " Zero Dollar" Case "One" converted_into_dollar = " One Dollar" Case Else converted_into_dollar = converted_into_dollar & "Dollars" End Select Select Case converted_into_cent Case "" converted_into_cent = " in Zero Cent Case "One"pretvorjeno_v_cent = " in en cent" Primer Else pretvorjeno_v_cent = " in " & pretvorjeno_v_cent & "Cent" End Select Convert_Number_into_word_with_currency = pretvorjeno_v_dolar & pretvorjeno_v_cent End Function Function get_ten(pTens) Dim my_output As String my_output = "" If Val(Left(pTens, 1)) = 1 Then Select Case Val(pTens) Case 10: my_output= "Deset" Primer 11: my_output = "Enajst" Primer 12: my_output = "Dvanajst" Primer 13: my_output = "Trinajst" Primer 14: my_output = "Štirinajst" Primer 15: my_output = "Petnajst" Primer 16: my_output = "Šestnajst" Primer 17: my_output = "Sedemnajst" Primer 18: my_output = "Osemnajst" Primer 19: my_output = "Devetnajst" Primer Else End Select ElseSelect Case Val(Left(pTens, 1)) Case 2: my_output = "Dvajset " Case 3: my_output = "Trideset " Case 4: my_output = "Štirideset " Case 5: my_output = "Petdeset " Case 6: my_output = "Šestdeset " Case 7: my_output = "Sedemdeset " Case 8: my_output = "Osemdeset " Case 9: my_output = "Devetdeset " Case Else End Select my_output = my_output & get_digit(Right(pTens, 1)) End If get_ten =my_output End Function Function get_digit(pDigit) Select Case Val(pDigit) Case 1: get_digit = "Ena" Case 2: get_digit = "Dva" Case 3: get_digit = "Tri" Case 4: get_digit = "Štiri" Case 5: get_digit = "Pet" Case 6: get_digit = "Šest" Case 7: get_digit = "Sedem" Case 8: get_digit = "Osem" Case 9: get_digit = "Devet" Case Else: get_digit = "" End Select EndFunkcija 

Tako lahko uporabite svoj opredeljeno funkcijo z imenom Pretvori_število_v_slovnico_z_valuto . Pri tem upoštevajte navedene korake.

Koraki:

• Zdaj morate izbrati celico, v kateri želite shraniti rezultat. C5 celica.
• Nato morate uporabiti ustrezno formulo v C5 celica.

• Nato pritisnite VSTOP .

• Na koncu uporabite Excel Funkcija samodejnega izpolnjevanja za preostale celice C6:C9 .

Na koncu boste prejeli ves pretvorjeni znesek.

Preberite več: Kako pretvoriti številko v besedilo in ohraniti zadnje ničle v Excelu (4 načini)

Kako pretvoriti številko v besedilno obliko v Excelu

Do zdaj smo govorili o kako pretvoriti številke v besede v Excelu. V tem delu članka je razloženo, kako spremenite številke v besedilno obliko je najpreprostejša in najhitrejša metoda za pretvorbo številk v besedilo.

Za uporabo te metode sledite naslednjim korakom:

• Najprej izberite celico ali celice s številčnimi vrednostmi, ki jih želite pretvoriti v besedilo (v našem primeru celico C5:C9 )
• Drugič, pojdite v Domov in izberite zavihek Besedilo iz spustnega menija kategorije celic v razdelku Številka oddelek.

Posledično bo pretvoril številčno vrednost izbranih celic v besedilo. To lahko razumete z opazovanjem poravnav. Privzeto so besedila v Excelu poravnana levo, številke pa desno.

Lahko pa pritisnete CTRL+1 da odprete okno z imenom Oblikovanje celic in izberite Številka in nato izberite možnost Besedilo kategorijo od tam.

Preberite več: Excel VBA za pretvorbo števila v besedilo (4 primeri)

Oddelek za prakso

Za vadbo smo na desni strani vsakega lista dodali del za vadbo.

Zaključek

Tukaj smo poskušali narediti ta članek končni vodnik o tem, kako pretvoriti številko v ustrezne besede ali besedilo v MS Excel Poleg tega smo zožili sedem različnih tehnik v tem članku, da boste lahko izbrali idealno možnost, ki je najprimernejša za vašo konkretno situacijo. Tako upamo, da boste našli rešitev, ki ste jo iskali. Če imate kakršne koli predloge ali vprašanja, pustite komentar. hvala.