Foile de calcul sunt folosite de multe persoane în activitatea lor zilnică, ceea ce le face un element important al biroului lor. Deși majoritatea oamenilor folosesc foile de calcul într-o manieră destul de elementară, unii utilizatori avansați consideră că este dificil sau complicat să transformare din număr în cuvinte în Excel. În acest ghid, am abordat această problemă și am furnizat patru diferite metode pentru a transformare din număr în cuvinte în Excel. În plus, există trei mai multe metode pentru conversia numerelor în format text .

Descărcați caietul de lucru

Puteți descărca caietul de lucru pe care l-am folosit în acest articol de mai jos și puteți exersa singur.

4 moduri de a converti numărul în cuvinte în Excel

Această secțiune a articolului explică cum să convertim numere în cuvinte în Excel. În plus, vom demonstra cum să convertim numere în cuvinte în Excel. patru pentru a efectua operațiunea. Pentru a efectua sesiunea, vom folosi Versiunea Microsoft 365 .

1. Utilizarea funcțiilor combinate în Excel pentru a converti un număr în cuvinte

Formula Excel pe care am folosit-o aici se bazează pe patru funcții. STÂNGA , MID , TEXT , și ALEGE funcții.

În primul rând, sintaxa din STÂNGA este după cum urmează:

Practic, această funcție este utilizată pentru a extrage caractere din text.

Text: Șirul de text din care se extrag caracterele.

num_chars [Opțional]: Numărul de caractere care trebuie extrase. Începe de la stânga. În mod implicit, num_chars=1 .

În al doilea rând, sintaxa din MID este după cum urmează:

De fapt, această funcție este utilizată pentru a extrage text din interiorul unui șir de caractere.

Text: Textul din care se extrage.

start_num: Locația primului caracter care trebuie extras.

num_chars: Numărul de caractere care trebuie extrase.

În al treilea rând, sintaxa din TEXT este după cum urmează:

În cele din urmă, această funcție convertește un număr într-un text în format numeric.

valoare: Numărul care trebuie convertit.

format_text: Formatul numerelor care trebuie utilizat.

În continuare, sintaxa din ALEGE este după cum urmează:

Această funcție obține o valoare dintr-o listă pe baza poziției.

index_num: Valoarea care trebuie aleasă. Un număr cuprins între 1 și 254 .

valoare1: Prima valoare din care se alege.

value2 [opțional]: A doua valoare din care se poate alege.

• Aici, vom converti numărul din Numere în cuvinte coloană.

• Acum, scrieți următoarea formulă în C5 celulă.

=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,,,, "Douăzeci ", "Treizeci ", "Patruzeci ", "Cincizeci ", "Șaizeci ", "Șaptezeci ", "Optzeci ", "Nouăzeci ")

&IF(-MID(-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(MID(TEXT(B5, "000000000.00″),3,1)+1, "Ten", "Eleven", "Twelve", "Thirteen", "Fourteen", "Fifteen", "Sixteen", "Seventeen", "Eighteen", "Nineteen")))

&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,, "One", "Two", "Three", "Four", "Five", "Six", "Seven", "Eight", "Nine")

&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,,,," Douăzeci"," Treizeci"," Patruzeci"," Cincizeci"," Șaizeci"," Șaptezeci"," Optzeci"," Nouăzeci")

&IF(-MID(-MID(TEXT(B5, "000000000.00″),5,1)1,CHOOSE(MID(TEXT(B5, "000000000.00″),6,1)+1," Unu"," Doi"," Doi"," Trei"," Patru"," Cinci"," Șase"," Șapte"," Șapte"," Opt"," Nouă"),CHOOSE(MID(TEXT(B5, "000000000.00″),6,1)+1," Zece"," Unsprezece"," Doisprezece"," Treisprezece"," Paisprezece"," Cincisprezece"," Șaisprezece"," Șaptesprezece"," Optsprezece"," Nouăsprezece"))))

&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,, "One", "Two", "Three", "Four", "Five", "Six", "Seven", "Eight", "Nine")

&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,,,, "Douăzeci ", "Treizeci ", "Patruzeci ", "Cincizeci ", "Șaizeci ", "Șaptezeci ", "Optzeci ", "Nouăzeci ")

&IF(-MID(-MID(TEXT(B5, "000000000.00″),8,1)1,CHOOSE(MID(TEXT(B5, "000000000.00″),9,1)+1,, "One", "Two", "Three", "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")))

Întreaga formulă poate părea complicată la prima vedere, însă este, în esență, o repetare a unei singure porțiuni. Așadar, dacă puteți înțelege formula de prima din formulă, ar trebui să puteți înțelege restul.

• Ulterior, apăsați ENTER .

Ca rezultat, veți vedea următorul rezultat.

Repartizarea formulei:

La început, a TEXT este utilizată aici pentru a transforma numărul într-un număr "000000000.00" format text.

TEXT(B7,”000000000.00″)

După aceea, se va trece la STÂNGA este utilizată pentru a extrage caracterul cel mai din stânga din număr. Aceasta ne permite să identificăm dacă numărul de returnare este zero sau orice altă valoare.

LEFT(TEXT(B7,”000000000.00″))

În continuare, se va trece la ALEGE este utilizată pentru a reprezenta numărul extras cu ajutorul cuvintelor corespunzătoare.

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

Acum, se verifică dacă valoarea este zero sau nu. Dacă este zero atunci nu se afișează nimic.

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

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

Se va afișa "O sută" în cazul în care următorul două numerele sunt zero În caz contrar, se va afișa "O sută și."

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

Această formulă nu necesită VBA Este o metodă excelentă de transformare a numerelor în cuvinte, dar are și o serie de probleme. două defecte. 1. Unu, nu poate reprezenta perfect numerele zecimale după puncte. 2. Doi, limita maximă de numere este 999, 999, 999 . De fapt, Domnul Pete M. a venit cu această formulă.

• Acum, puteți scrie formula pentru restul rândurilor sau puteți folosi pur și simplu formula Funcția Excel AutoFill .

În cele din urmă, veți obține toate a convertit numere în cuvinte .

Citește mai mult: Cum să convertiți numărul în text cu 2 zecimale în Excel (5 moduri)

2. Aplicarea funcției VLOOKUP pentru a converti numere în cuvinte

Puteți aplica VLOOKUP funcția de convertiți numere în cuvinte în Excel. Haideți să facem ceva diferit. Aici trebuie să introduceți mai întâi toate numerele în cuvinte, apoi puteți utiliza această funcție pentru a converti orice număr în cuvinte din ele.

Pași:

• În primul rând, scrieți manual toate numerele în cuvinte în Coloana C .

• Acum, utilizați următoarea formulă în C12 celulă.

• Apoi, apăsați ENTER .

Repartizarea formulei

În această formulă, se utilizează VLOOKUP va returna o valoare dintr-o matrice dată.

• În primul rând, B12 este valoarea de căutare pe care o caută în tabelul dat.
• În al doilea rând, B4:C9 este tablou array în care se caută valoarea țintă .
• În al treilea rând, 2 este numărul de coloane din tabel din care trebuie returnată o valoare.
• În al patrulea rând, Fals denotă un exact meci.

Citește mai mult: Cum să convertiți numărul în text pentru VLOOKUP în Excel (2 moduri)

Lecturi similare

• Cum se convertește numărul în text în Excel cu Apostrophe
• Conversia numărului în text cu triunghi verde în Excel
• Cum să convertiți numărul în text cu virgule în Excel (3 metode simple)
• Conversia numărului în text fără notație științifică în Excel
• Cum se convertește numărul Peso în cuvinte în Excel (cu pași simpli)

3. Utilizarea unui VBA pentru a converti un număr în cuvinte în Excel

Partea cea mai interesantă este că vă puteți construi propriul funcție proprie la convertiți numerele în cuvinte în Excel. În plus, puteți utiliza codul VBA pentru a dezvolta un definit Etapele sunt prezentate mai jos.

Pași :

• În primul rând, trebuie să alegeți Dezvoltator tab>> apoi selectați Visual Basic.

• Acum, de la Introduceți tab>> trebuie să selectați Modul .

• În acest moment, trebuie să scrieți următoarele Cod în 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_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 End If If x_T "" Then x_output = x_T& x_P(x_cnt) & x_output End If 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 If Mid(x_string_Num, 2, 2)"00" Then 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 ","Optsprezece ", "Nouăsprezece ") x_array_2 = Array("", "", "Douăzeci ", "Treizeci ", "Patruzeci ", "Cincizeci ", "Șaizeci ", "Șaptezeci ", "Optzeci ", "Nouăzeci ") 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 = "and " 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 = "and " 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 ","Unu ", "Doi ", "Trei ", "Patru ", "Cinci ", "Șase ", "Șapte ", "Opt ", "Nouă ") x_string = "" On Error Resume Next x_string = x_array_1(Val(xDgt)) get_digit = x_string End Function 

• Acum, trebuie să salvați fișierul cod .
• Apoi, trebuie să mergeți la Foaie de calcul Excel .

În acest moment, puteți utiliza definit Pentru aceasta, trebuie să urmați pașii indicați.

Pași:

• Acum, selectați celula în care doriți să afișați rezultatul convertit. (În cazul nostru, celula C5 ).
• Apoi, introduceți Semnul egal (=) în celulă. Aceasta ar trebui să vă permită să introduceți formule.
• După aceea, introduceți " =number_converting_converting_into_words " sau selectați butonul număr_conversie_în_cuvinte din meniul derulant.
• Ulterior, selectați celula cu valoarea numerică pe care doriți să o convertiți în cuvinte (în cazul nostru, celula B5 ).
• În cele din urmă, apăsați butonul ENTER buton.

Ca rezultat, va converti numărul celulei selectate în cuvintele corespunzătoare. În cele din urmă, puteți copia pur și simplu această formulă și în restul celulelor.

Citește mai mult: Cum să convertiți o valoare numerică în cuvinte în engleză în Excel

4. Angajarea VBA pentru formularea valutei în Excel

Această metodă este similară cu cea precedentă. De asemenea, funcționează prin inserarea unui modul utilizând VBA (Visual Basic pentru aplicații) și utilizarea acesteia ca funcție. În ceea ce privește diferența față de ultima metodă, aceasta diferă de aceasta prin faptul că convertește numerele în cuvinte monetare corespunzătoare. În plus, mai jos este prezentat un exemplu.

Acum, urmați acești pași pentru a aplica această metodă:

• În primul rând, urmați metoda-3 pentru a introduce modulul.
• În al doilea rând, scrieți următorul cod în Modulul 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(Mid(whole_number, x_decimal + 1) & "00", 2))) whole_number =Trim(Left(Left(whole_number, x_decimal - 1)) End If xIndex = 1 Do While whole_number "" xHundred = "" xValue = Right(whole_number, 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 If Len(whole_number)> 3 Then whole_number = Left(whole_number, Len(whole_number) - 3) Else whole_number = "" End IfxIndex = xIndex + 1 Bucla 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 Case converted_into_cent Case "" converted_into_cent = " și Zero Cent" Case "One"converted_into_cent = " și un cent" Case Else converted_into_cent = " și " & converted_into_cent & "Cents" 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= "Zece" Cazul 11: my_output = "Unsprezece" Cazul 12: my_output = "Doisprezece" Cazul 13: my_output = "Treisprezece" Cazul 14: my_output = "Paisprezece" Cazul 15: my_output = "Cincisprezece" Cazul 16: my_output = "Șaisprezece" Cazul 17: my_output = "Șaptesprezece" Cazul 18: my_output = "Optsprezece" Cazul 19: my_output = "Nouăsprezece" Cazul Else End Select ElseSelect Case Val(Left(pTens, 1)) Case 2: my_output = "Twenty " Case 3: my_output = "Thirty " Case 4: my_output = "Forty " Case 5: my_output = "Fifty " Case 6: my_output = "Sixty " Case 7: my_output = "Seventy " Case 8: my_output = "Eighty " Case 9: my_output = "Ninety " Case Else End Select my_output = my_output & get_digit(Right(pTens, 1)) End If get_ten =my_output End Function 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 EndFuncția 

Ca urmare, puteți utiliza definit funcția numită Conversie_număr_în_cu_cuvânt_cu_valută Pentru aceasta, trebuie să urmați pașii indicați.

Pași:

• Acum, trebuie să selectați o celulă în care doriți să păstrați rezultatul. Noi am selectat celula C5 celulă.
• Apoi, trebuie să folosiți formula corespunzătoare din C5 celulă.

• Ulterior, apăsați ENTER .

• În cele din urmă, utilizați Excel Funcția AutoFill pentru restul celulelor C6:C9 .

În cele din urmă, veți primi toată suma convertită.

Citește mai mult: Cum să convertiți un număr în text și să păstrați zerourile din urmă în Excel (4 moduri)

Cum să convertiți numărul în format text în Excel

Până acum, am vorbit despre cum să convertiți numere în cuvinte în Excel. Această secțiune a articolului explică cum să schimbarea numerelor în format text în Excel. Este cea mai simplă și mai rapidă metodă de a converti numere în text.

Urmați pașii de mai jos pentru a aplica această metodă:

• În primul rând, selectați celula sau celulele cu valori numerice pe care doriți să le transformați în text (în cazul nostru, celula C5:C9 )
• În al doilea rând, mergeți la Acasă și selectați fila Text din meniul derulant Categoria de celule din meniul derulant de la rubrica Număr secțiune.

Ca urmare, va converti valoarea numerică a celulelor selectate în text. Puteți înțelege acest lucru observând alinierile. În mod implicit, textele sunt aliniate la stânga, iar numerele sunt aliniate la dreapta în Excel.

Sau puteți apăsa CTRL+1 pentru a deschide fereastra numită Formatarea celulelor și selectați Număr și apoi selectați opțiunea Text categorie de acolo.

Citește mai mult: Excel VBA pentru a converti un număr în text (4 exemple)

Secțiunea practică

Pentru a exersa, am adăugat o porțiune de practică pe fiecare foaie, în partea dreaptă.

Concluzie

Aici, am încercat să facem din acest articol un ghid suprem despre cum să convertim numărul în cuvinte sau text corespunzător în MS Excel În plus, am restrâns șapte diferite tehnici în acest articol, astfel încât să puteți alege opțiunea ideală care se potrivește cel mai bine pentru situația dvs. specifică. Așadar, sperăm că ați găsit soluția pe care o căutați. Vă rugăm să lăsați un comentariu dacă aveți sugestii sau întrebări. Vă mulțumim.