Tabuľkové procesory používa mnoho ľudí pri svojej každodennej práci, čím sa stávajú dôležitým prvkom ich kancelárie. Zatiaľ čo väčšina ľudí používa tabuľkové procesory pomerne jednoduchým spôsobom, niektorí pokročilí používatelia ich považujú za ťažké alebo komplikované previesť číslo na slová v programe Excel. V tejto príručke sme sa zaoberali týmto problémom a poskytli sme štyri rôzne metódy na previesť číslo na slová v programe Excel. Okrem toho existujú tri ďalšie metódy pre prevod čísel do textových formátov .

Stiahnite si pracovný zošit

Pracovný zošit, ktorý sme použili v tomto článku, si môžete stiahnuť nižšie a precvičiť si ho sami.

4 spôsoby prevodu čísla na slová v programe Excel

Táto časť článku vysvetľuje, ako v programe Excel previesť čísla na slová. Okrem toho si ukážeme štyri techniky na vykonanie operácie. Na vykonanie relácie použijeme Verzia Microsoft 365 .

1. Použitie kombinovaných funkcií v programe Excel na prevod čísla na slová

Vzorec programu Excel, ktorý sme tu použili, sa opiera o štyri funkcie. LEVÁ , MID , TEXT , a VYBRAŤ funkcie.

Po prvé, syntax LEVÁ funkcia je nasledovná:

Táto funkcia sa v podstate používa na extrakciu znakov z textu.

Text: Textový reťazec, z ktorého sa majú extrahovať znaky.

num_chars [Voliteľné]: Počet znakov, ktoré sa majú extrahovať. Začína sa zľava, num_chars=1 .

Po druhé, syntax MID funkcia je nasledovná:

Táto funkcia sa v skutočnosti používa na extrakciu textu z vnútra reťazca.

Text: Text, z ktorého sa má extrahovať.

start_num: Umiestnenie prvého extrahovaného znaku.

num_chars: Počet znakov, ktoré sa majú extrahovať.

Po tretie, syntax TEXT funkcia je nasledovná:

Táto funkcia nakoniec prevedie číslo na text vo formáte čísla.

hodnota: Číslo, ktoré sa má previesť.

format_text: Formát čísla, ktorý sa má použiť.

Ďalej syntax VYBRAŤ funkcia je nasledovná:

Táto funkcia získava hodnotu zo zoznamu na základe pozície.

index_num: Hodnota na výber. Číslo medzi 1 a 254 .

value1: Prvá hodnota, z ktorej si môžete vybrať.

value2 [nepovinné]: Druhá hodnota, z ktorej si môžete vybrať.

• Tu prevedieme číslo v Čísla v slovách stĺpec.

• Teraz zapíšte nasledujúci vzorec do C5 bunky.

=CHOOSE(LEFT(TEXT(B5, "000000000.00″))+1,, "One", "Two", "Three", "Four", "Five", "Six", "Seven", "Eight", "Nine")

&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,,, "Dvadsať ", "Tridsať ", "Štyridsať ", "Päťdesiat ", "Šesťdesiat ", "Sedemdesiat ", "Osemdesiat ", "Deväťdesiat ")

&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, "Desať", "Jedenásť", "Dvanásť", "Trinásť", "Štrnásť", "Pätnásť", "Šestnásť", "Sedemnásť", "Osemnásť", "Devätnásť")

&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,, "Jeden", "Dva", "Tri", "Štyri", "Päť", "Šesť", "Sedem", "Osem", "Deväť")

&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,,," dvadsať"," tridsať"," štyridsať"," päťdesiat"," šesťdesiat"," sedemdesiat"," osemdesiat"," deväťdesiat")

&IF(-MID(TEXT(B5, "000000000.00″),5,1)1,CHOOSE(MID(TEXT(B5, "000000000.00″),6,1)+1," One"," Two"," Three"," Four"," Five"," Six"," Seven"," Eight"," Nine"),CHOOSE(MID(TEXT(B5, "000000000.00″),6,1)+1," Ten"," Eleven"," Twelve"," Thirteen"," Fourteen"," Fifteen"," Sixteen"," Seventeen"," Eighteen"," Nineteen")

&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,, "Jeden", "Dva", "Tri", "Štyri", "Päť", "Šesť", "Sedem", "Osem", "Deväť")

&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,,, "Dvadsať ", "Tridsať ", "Štyridsať ", "Päťdesiat ", "Šesťdesiat ", "Sedemdesiat ", "Osemdesiat ", "Deväťdesiat ")

&IF(-MID(TEXT(B5, "000000000.00″),8,1)1,CHOOSE(MID(TEXT(B5, "000000000.00″),9,1)+1,, "One", "Two", "Three", "Four", "Five", "Six", "Seven", "Eight", "Nine"),CHOOSE(MID(TEXT(B5, "000000000.00″),9,1)+1, "Ten", "Eleven", "Twelve", "Thirteen", "Fourteen", "Fifteen", "Sixteen", "Seventeen", "Eighteen", "Nineteen")

Celý vzorec sa na prvý pohľad môže zdať zložitý, ale v podstate ide o opakovanie jednej časti. prvý časti vzorca, mali by ste byť schopní pochopiť zvyšok.

• Následne stlačte VSTÚPIŤ .

Výsledkom bude nasledujúci výstup.

Rozdelenie vzorca:

Spočiatku sa TEXT sa tu používa funkcia na premenu čísla na "000000000.00" formát textu.

TEXT(B7,”000000000.00″)

Potom sa LEVÁ sa používa na extrakciu ľavého znaku z čísla. Umožňuje nám identifikovať, či je vrátené číslo nula alebo akúkoľvek inú hodnotu.

LEFT(TEXT(B7,”000000000.00″))

Ďalej VYBRAŤ Funkcia sa používa na reprezentáciu extrahovaného čísla pomocou vhodných slov.

CHOOSE(LEFT(TEXT(B7, "000000000.00″))+1,, "One", "Two", "Three", "Four", "Five", "Six", "Seven", "Eight", "Nine")

Teraz kontroluje, či je hodnota nula alebo nie. Ak je nula potom sa nezobrazí nič.

CHOOSE(LEFT(TEXT(B7, "000000000.00″))+1,, "One", "Two", "Three", "Four", "Five", "Six", "Seven", "Eight", "Nine")

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

Zobrazí sa "Sto" ak je nasledujúci dva čísla sú nula . V opačnom prípade sa zobrazí "Sto a."

CHOOSE(LEFT(TEXT(B7, "000000000.00″))+1,, "One", "Two", "Three", "Four", "Five", "Six", "Seven", "Eight", "Nine")

&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 “))

Tento vzorec nevyžaduje VBA alebo polí. Je to vynikajúca metóda na premenu čísel na slová. Má však dva nedostatky. Po prvé, nedokáže dokonale reprezentovať desatinné čísla po bodoch. Po druhé, maximálny limit počtu je 999, 999, 999 .., Pán Pete M. prišiel s týmto vzorcom.

• Teraz môžete napísať vzorec pre zvyšok riadkov alebo jednoducho použiť Funkcia automatického vypĺňania programu Excel .

Nakoniec získate všetky prevedené čísla na slová .

Prečítajte si viac: Ako previesť číslo na text s 2 desatinnými miestami v programe Excel (5 spôsobov)

2. Použitie funkcie VLOOKUP na prevod čísel na slová

Môžete použiť VLOOKUP funkciu na previesť čísla na slová v programe Excel. Urobíme niečo iné. Tu musíte najprv vložiť všetky čísla slovami a potom môžete použiť túto funkciu na prevod ľubovoľného čísla na slová z nich.

Kroky:

• Najprv si všetky čísla zapíšte ručne do Stĺpec C .

• Teraz použite nasledujúci vzorec v C12 bunky.

• Potom stlačte tlačidlo VSTÚPIŤ .

Rozdelenie vzorca

V tomto vzorci sa VLOOKUP funkcia vráti hodnotu zo zadaného poľa.

• Po prvé, B12 je vyhľadávacia hodnota, ktorú hľadá v danej tabuľke.
• Po druhé, B4:C9 je tabuľkové pole v ktorom hľadá cieľová hodnota .
• Po tretie, 2 je počet stĺpcov v tabuľke, z ktorých sa má vrátiť hodnota.
• Po štvrté, False označuje presný zápas.

Prečítajte si viac: Ako previesť číslo na text pre VLOOKUP v programe Excel (2 spôsoby)

Podobné čítania

• Ako previesť číslo na text v programe Excel pomocou apostrofu
• Prevod čísla na text pomocou zeleného trojuholníka v programe Excel
• Ako previesť číslo na text s čiarkami v programe Excel (3 jednoduché metódy)
• Prevod čísla na text bez vedeckého zápisu v programe Excel
• Ako previesť číslo peso na slová v programe Excel (s jednoduchými krokmi)

3. Použitie VBA na prevod čísla na slová v programe Excel

Najzaujímavejšie je, že si môžete vytvoriť vlastná funkcia na previesť čísla na slová v programe Excel. Okrem toho môžete použiť kód VBA vytvoriť definované Postup je uvedený nižšie.

Kroky :

• Najprv si musíte vybrať Vývojár karta>> potom vyberte Visual Basic.

• Teraz z Vložte karta>> musíte vybrať Modul .

• V tejto chvíli si musíte zapísať tieto údaje Kód v Modul .

 Function 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 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" Potom 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 ", "Fourteen ", "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 = "a " 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 = "a " End If End 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 ","One ", "Two ", "Three ", "Four ", "Five ", "Six ", "Seven ", "Eight ", "Nine ") x_string = "" On Error Resume Next x_string = x_array_1(Val(xDgt)) get_digit = x_string End Function 

• Teraz musíte uložiť kód .
• Potom musíte prejsť do Pracovný hárok programu Excel .

V tomto čase môžete používať definované Na tento účel by ste mali postupovať podľa uvedených krokov.

Kroky:

• Teraz vyberte bunku, v ktorej chcete zobraziť prevedený výstup. (V našom prípade je to bunka C5 ).
• Potom zadajte Znak rovnosti (=) v bunke. To by vám malo umožniť zadávať vzorce.
• Potom zadajte " =number_converting_into_words " alebo vyberte number_converting_into_words z rozbaľovacej ponuky.
• Následne vyberte bunku s číselnou hodnotou, ktorú chcete previesť na slová (v našom prípade bunku B5 ).
• Nakoniec stlačte tlačidlo VSTÚPIŤ tlačidlo.

Výsledkom bude prevod vybraného čísla bunky na príslušné slová. Nakoniec môžete tento vzorec jednoducho skopírovať aj do ostatných buniek.

Prečítajte si viac: Ako previesť číselnú hodnotu na anglické slová v programe Excel

4. Použitie VBA na vytváranie slovných spojení v programe Excel

Táto metóda je podobná predchádzajúcej. Funguje tiež tak, že vložíte modul pomocou VBA (Visual Basic for Application) a použiť ju ako funkciu. Od poslednej metódy sa líši tým, že prevedie čísla na príslušné menové slová. Ďalej je uvedený príklad.

Pri použití tejto metódy postupujte podľa nasledujúcich krokov:

• Po prvé, postupujte podľa metóda-3 na vloženie modulu.
• Po druhé, zapíšte nasledujúci kód do Modul 2 .

 Function 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(celé_číslo, x_decimal - 1)) End If xIndex = 1 Do While celé_číslo "" xHundred = "" xValue = Right(celé_číslo, 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)) Else xHundred = xHundred & get_digit(Mid(xValue, 3)) End If End If If xHundred "" Then 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) Else 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 = " and Zero Cent" Case "One"Convert_into_cent = " a jeden cent" Case Else converted_into_cent = " a " & converted_into_cent & "Centy" End Select Convert_Number_into_word_with_currency = converted_into_dollar & converted_into_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= "Ten" Prípad 11: my_output = "Eleven" Prípad 12: my_output = "Twelve" Prípad 13: my_output = "Thirteen" Prípad 14: my_output = "Fourteen" Prípad 15: my_output = "Fifteen" Prípad 16: my_output = "Sixteen" Prípad 17: my_output = "Seventeen" Prípad 18: my_output = "Eighteen" Prípad 19: my_output = "Nineteen" Prípad Else End Select ElseSelect Case Val(Left(pTens, 1)) Case 2: my_output = "dvadsať " Case 3: my_output = "tridsať " Case 4: my_output = "štyridsať " Case 5: my_output = "päťdesiat " Case 6: my_output = "šesťdesiat " Case 7: my_output = "sedemdesiat " Case 8: my_output = "osemdesiat " Case 9: my_output = "deväťdesiat " 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 = "One" Case 2: get_digit = "Two" Case 3: get_digit = "Three" Case 4: get_digit = "Four" Case 5: get_digit = "Five" Case 6: get_digit = "Six" Case 7: get_digit = "Seven" Case 8: get_digit = "Eight" Case 9: get_digit = "Nine" Case Else: get_digit = "" End Select EndFunkcia 

Vďaka tomu môžete používať definované funkcia s názvom Previesť_číslo_na_slovo_s_menou Na tento účel by ste mali postupovať podľa uvedených krokov.

Kroky:

• Teraz musíte vybrať bunku, v ktorej chcete uchovať výsledok. My sme vybrali C5 bunky.
• Potom je potrebné použiť príslušný vzorec v C5 bunky.

• Následne stlačte VSTÚPIŤ .

• Nakoniec použite aplikáciu Excel Funkcia automatického vypĺňania pre ostatné bunky C6:C9 .

Nakoniec dostanete celú prevedenú sumu.

Prečítajte si viac: Ako previesť číslo na text a zachovať koncové nuly v programe Excel (4 spôsoby)

Ako previesť číslo do textového formátu v programe Excel

Doteraz sme hovorili o ako previesť čísla na slová v programe Excel. V tejto časti článku sa vysvetľuje, ako zmeniť čísla na textový formát Je to najjednoduchšia a najrýchlejšia metóda na prevod čísel na text.

Pri použití tejto metódy postupujte podľa nasledujúcich krokov:

• Najprv vyberte bunku alebo bunky s číselnými hodnotami, ktoré chcete previesť na text (v našom prípade bunku C5:C9 )
• Po druhé, prejdite na Domov a vyberte kartu Text možnosť z rozbaľovacej ponuky kategórie buniek v časti Číslo sekcia.

Výsledkom bude prevod číselnej hodnoty vybraných buniek na text. Pochopíte to tak, že budete sledovať zarovnanie. V predvolenom nastavení sú texty v programe Excel zarovnané doľava a čísla doprava.

Alebo môžete stlačiť CTRL+1 otvoriť okno s názvom Formátovanie buniek a vyberte Číslo a potom vyberte možnosť Text kategóriu odtiaľ.

Prečítajte si viac: Excel VBA na prevod čísla na text (4 príklady)

Praktická časť

Na precvičovanie sme pridali časť Practice na každom liste v pravej časti.

Záver

Tu sme sa snažili, aby tento článok konečný sprievodca o tom, ako previesť číslo na príslušné slová alebo text v MS Excel Okrem toho sme zúžili sedem rôzne techniky v tomto článku, aby ste si mohli vybrať ideálnu možnosť, ktorá je najvhodnejšia pre vašu konkrétnu situáciu. Dúfame teda, že ste našli riešenie, ktoré ste hľadali. Ak máte nejaké návrhy alebo otázky, zanechajte nám prosím komentár. Ďakujeme.