Hur man konverterar tal till ord i Excel (4 lämpliga sätt)

  • Dela Detta
Hugh West

Många människor använder kalkylblad i sitt dagliga arbete, vilket gör dem till en viktig del av kontoret. Medan majoriteten av människor använder kalkylblad på ett ganska grundläggande sätt, finner vissa avancerade användare det svårt eller komplicerat att omvandla nummer till ord i Excel. I den här guiden har vi tagit upp detta problem och gett dig fyra olika metoder för att omvandla nummer till ord i Excel. Dessutom finns det tre fler metoder för att konvertera siffror till textformat .

Ladda ner arbetsboken

Du kan ladda ner arbetsboken som vi använde i den här artikeln nedan och öva med den själv.

Konvertering av tal till ord.xlsm

4 sätt att konvertera tal till ord i Excel

I det här avsnittet av artikeln förklaras hur man konverterar siffror till ord i Excel. fyra tekniker för att utföra operationen. För att genomföra sessionen kommer vi att använda oss av Microsoft 365-version .

1. Användning av kombinerade funktioner i Excel för att omvandla tal till ord

Excel-formeln som vi använder här bygger på fyra funktioner. VÄNSTER , MID , TEXT , och VÄLJ funktioner.

För det första är syntaxen i VÄNSTER funktionen är följande:

Den här funktionen används i princip för att extrahera tecken från text.

=LEFT (text, [num_chars])

Text: Den textsträng som tecknen ska extraheras från.

num_chars [Valfritt]: Antalet tecken som ska extraheras. Det börjar från vänster. Som standard, num_chars=1 .

För det andra är syntaxen i MID funktionen är följande:

Den här funktionen används för att extrahera text från en sträng.

=MID (text, start_num, num_chars)

Text: Den text som ska extraheras från.

start_num: Platsen för det första tecknet som ska extraheras.

num_chars: Antalet tecken som ska extraheras.

För det tredje är syntaxen i TEXT funktionen är följande:

Den här funktionen omvandlar slutligen ett nummer till en text i nummerformat.

=TEXT (värde, format_text)

värde: Det nummer som ska konverteras.

format_text: Det nummerformat som ska användas.

Därefter beskrivs syntaxen för VÄLJ funktionen är följande:

Den här funktionen hämtar ett värde från en lista baserat på position.

=CHOOSE (index_num, value1, [value2], ...)

index_num: Det värde som ska väljas. Ett tal mellan 1 och 254 .

värde1: Det första värdet att välja mellan.

value2 [valfritt]: Det andra värdet som du kan välja mellan.

  • Här omvandlar vi numret i Siffror i ord kolumn.

  • Skriv nu ned följande formel i C5 cell.

=CHOOSE(LEFT(TEXT(B5, "000000000.00″))+1,,, "Ett", "Två", "Tre", "Fyra", "Fem", "Sex", "Sju", "Åtta", "Nio")

&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,,,, "Tjugo ", "Trettio ", "Fyrtio ", "Femtio ", "Sextio ", "Sjuttio ", "Åttio ", "Nittio ")

&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, "Tio", "Elva", "Tolv", "Tretton", "Fjorton", "Femton", "Sexton", "Sjutton", "Arton", "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,,, "Ett", "Två", "Tre", "Fyra", "Fem", "Sex", "Sju", "Åtta", "Nio")

&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,,,," Twenty"," Thirty"," Forty"," Fifty"," Sixty"," Seventy"," Eighty"," Ninety")

&IF(-MID(TEXT(B5, "000000000.00″),5,1)1,CHOOSE(MID(TEXT(B5, "000000000.00″),6,1)+1,,," Ett"," Två"," Tre"," Fyra"," Fem"," Sex"," Sju"," Åtta"," Nio"),CHOOSE(MID(TEXT(B5, "000000000.00″),6,1)+1," Tio"," Elva"," Tolv"," Tretton"," Fjorton"," Femton"," Sexton"," Sjutton"," Arton"," Nitton"))

&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,,, "Ett", "Två", "Tre", "Fyra", "Fem", "Sex", "Sju", "Åtta", "Nio")

&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,,,, "Tjugo ", "Trettio ", "Fyrtio ", "Femtio ", "Sextio ", "Sjuttio ", "Åttio ", "Nittio ")

&IF(-MID(TEXT(B5, "000000000.00″),8,1)1,CHOOSE(MID(TEXT(B5, "000000000.00″),9,1)+1,,, "Ett", "Två", "Tre", "Fyra", "Fem", "Sex", "Sju", "Åtta", "Nio"),CHOOSE(MID(TEXT(B5, "000000000.00″),9,1)+1, "Tio", "Elva", "Tolv", "Tretton", "Fjorton", "Femton", "Sexton", "Sjutton", "Arton", "Nitton"))

Hela formeln kan verka komplicerad vid en första anblick, men den är i huvudsak en upprepning av en enda del. Så om du kan förstå första del av formeln, bör du kunna förstå resten.

  • Tryck sedan på ENTER .

Som ett resultat kommer du att se följande utdata.

Uppdelning av formel:

Till en början var TEXT funktionen används här för att omvandla numret till en "000000000.00" textformat.

TEXT(B7,”000000000.00″)

Efter detta kan VÄNSTER funktionen används för att extrahera det vänstra tecknet från talet, vilket gör det möjligt att identifiera om det returnerade talet är noll eller något annat värde.

LEFT(TEXT(B7,”000000000.00″))

Därefter ska VÄLJ funktionen används för att representera det extraherade talet med lämpliga ord.

CHOOSE(LEFT(TEXT(B7, "000000000.00″))+1,,, "Ett", "Två", "Tre", "Fyra", "Fem", "Sex", "Sju", "Åtta", "Nio")

Nu kontrolleras om värdet är noll eller inte. Om det är noll visas ingenting.

CHOOSE(LEFT(TEXT(B7, "000000000.00″))+1,,, "Ett", "Två", "Tre", "Fyra", "Fem", "Sex", "Sju", "Åtta", "Nio")

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

Den visar "Hundra" om nästa två siffrorna är noll Annars visas "Hundra och."

CHOOSE(LEFT(TEXT(B7, "000000000.00″))+1,,, "Ett", "Två", "Tre", "Fyra", "Fem", "Sex", "Sju", "Åtta", "Nio")

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

Denna formel kräver inte VBA Det är en utmärkt metod för att omvandla siffror till ord. Den har dock en två För det första kan den inte perfekt representera decimaltal efter punkter. För det andra är den maximala gränsen för antal siffror 999, 999, 999 . Egentligen, Mr. Pete M. kom fram till denna formel.

  • Nu kan du skriva formeln för resten av raderna eller helt enkelt använda Funktion för automatisk ifyllning i Excel .

Slutligen får du alla de omvandlade siffror till ord .

Läs mer: Hur man konverterar tal till text med 2 decimaler i Excel (5 sätt)

2. Tillämpa VLOOKUP-funktionen för att omvandla tal till ord

Du kan ansöka VLOOKUP funktion till omvandla siffror till ord i Excel. Låt oss göra något annorlunda. Här måste du först infoga alla siffror i ord och sedan använda den här funktionen för att omvandla alla siffror till ord från dem.

Steg:

  • Skriv först ner alla siffror i ord manuellt i C-kolumn .

  • Använd nu följande formel i C12 cell.
=VLOOKUP(B12,B4:C9,2,FALSE)

  • Tryck sedan på ENTER .

Fördelning av formler

I denna formel ska VLOOKUP funktionen returnerar ett värde från en given array.

  • För det första, B12 är det uppslagsvärde som söks i den givna tabellen.
  • För det andra, B4:C9 är den tabellmall där den letar efter den målvärde. .
  • För det tredje, 2 är antalet kolumner i den tabell från vilken ett värde ska returneras.
  • För det fjärde, Falskt betecknar en exakt match.

Läs mer: Hur man konverterar nummer till text för VLOOKUP i Excel (2 sätt)

Liknande läsningar

  • Hur man konverterar nummer till text i Excel med apostrof
  • Konvertera nummer till text med grön triangel i Excel
  • Hur man konverterar tal till text med kommatecken i Excel (3 enkla metoder)
  • Konvertera tal till text utan vetenskaplig notering i Excel
  • Hur man konverterar pesonummer till ord i Excel (med enkla steg)

3. Använda VBA för att konvertera tal till ord i Excel

Det mest intressanta är att du kan bygga din egen egen funktion till omvandla siffrorna till ord i Excel. Dessutom kan du använda VBA-koden för att utveckla en definierad funktion. Stegen anges nedan.

Steg :

  • För det första måste du välja den Utvecklare fliken>> välj sedan Visual Basic.

  • Från och med nu, från Infoga flik>> du måste välja Modul .

  • Vid denna tidpunkt måste du skriva ner följande Kod i den Modul .
 Funktion 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 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" 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 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 = "och " 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 = "och " 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 If End Function Function get_digit(xDgt) Dim x_string As String Dim x_array_1() As Variant x_array_1 = Array("Zero ","Ett ", "Två ", "Tre ", "Fyra ", "Fem ", "Sex ", "Sju ", "Åtta ", "Nio ") x_string = "" On Error Resume Next x_string = x_array_1(Val(xDgt)) get_digit = x_string End Function 

  • Nu måste du spara den kod .
  • Därefter måste du gå till Excel-arbetsblad .

Vid denna tidpunkt kan du använda din definierad För detta bör du följa de angivna stegen.

Steg:

  • Välj nu den cell som du vill visa det konverterade resultatet. (I vårt fall är det cell C5 ).
  • Ange sedan Likhetstecken (=) i cellen. Det borde göra det möjligt att skriva formler.
  • Därefter skriver du in " =number_converting_into_words " eller välj number_converting_into_words funktion från rullgardinsmenyn.
  • Därefter markerar du cellen med det talvärde som du vill konvertera till ord (i vårt fall cell B5 ).
  • Till sist trycker du på ENTER knapp.

Som ett resultat kommer den att omvandla det valda cellnumret till motsvarande ord. Slutligen kan du helt enkelt kopiera formeln till resten av cellerna också.

Läs mer: Hur man konverterar ett numeriskt värde till engelska ord i Excel

4. Använda VBA för att formulera valutor i Excel

Den här metoden liknar den förra, men fungerar också genom att infoga en modul med hjälp av VBA (Visual Basic for Application) och använda den som en funktion. Det som skiljer den från den förra metoden är att den omvandlar siffrorna till lämpliga valutaord. Ett exempel ges nedan.

375,65=Trehundra sjuttiofem dollar och sextiofem cent

Följ de här stegen för att tillämpa den här metoden:

  • För det första, följ metod-3 för att sätta in modulen.
  • För det andra skriver du ned följande kod i 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(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, 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 = " Noll dollar" Case "En" converted_into_dollar = " En dollar" Case Else converted_into_dollar = converted_into_dollar & "Dollars" End Select Select Select Case converted_into_cent Case "" converted_into_cent = " och noll cent" Case "En"converted_into_cent = " och en cent" Case Else converted_into_cent = " och " & converted_into_cent & "Cents" End Select Convert_Number_into_word_with_currency = converted_into_dollar & converted_into_cent End Function Funktion 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= "Tio" Fall 11: my_output = "Elva" Fall 12: my_output = "Tolv" Fall 13: my_output = "Tretton" Fall 14: my_output = "Fjorton" Fall 15: my_output = "Femton" Fall 16: my_output = "Sexton" Fall 17: my_output = "Sjutton" Fall 18: my_output = "Arton" Fall 19: my_output = "Nitton" Fall 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 Slutfunktion Funktion Funktion get_digit(pDigit) Select Case Val(pDigit) Case 1: get_digit = "Ett" Case 2: get_digit = "Två" Case 3: get_digit = "Tre" Case 4: get_digit = "Fyra" Case 5: get_digit = "Fem" Case 6: get_digit = "Sex" Case 7: get_digit = "Sju" Case 8: get_digit = "Åtta" Case 9: get_digit = "Nio" Case Else: get_digit = "" End Select EndFunktion 

Därför kan du använda din definierad funktion som heter Konvertera_Nummer_i_ord_med_valuta För detta bör du följa de angivna stegen.

Steg:

  • Nu måste du välja en cell där du vill behålla resultatet. Vi har valt cellen C5 cell.
  • Därefter måste du använda motsvarande formel i C5 cell.
=Konvertera_nummer_i_ord_med_valuta(B5)

  • Tryck sedan på ENTER .

  • Slutligen kan du använda Excel Funktion för automatisk ifyllning för resten av cellerna C6:C9 .

Slutligen får du alla konverterade belopp.

Läs mer: Hur du konverterar tal till text och behåller efterföljande nollor i Excel (4 sätt)

Hur man konverterar nummer till textformat i Excel

Hittills har vi talat om hur man omvandlar siffror till ord i Excel. I det här avsnittet av artikeln förklaras hur man ändra siffror till textformat Det är den enklaste och snabbaste metoden för att konvertera siffror till text.

Följ de här stegen för att tillämpa den här metoden:

  • Välj först den eller de celler med numeriska värden som du vill konvertera till text (i vårt fall cell C5:C9 )
  • För det andra, gå till Hem och välj fliken Text från rullgardinsmenyn för cellkategori under Antal sektion.

Resultatet blir att de markerade cellernas numeriska värde omvandlas till text. Du kan förstå det genom att observera justeringarna. Som standard är texter vänsterjusterade och siffror högerjusterade i Excel.

Eller så kan du trycka på CTRL+1 för att öppna fönstret som heter Formatera celler och välj den Antal och välj sedan Text kategori därifrån.

Läs mer: Excel VBA för att konvertera nummer till text (4 exempel)

Övningssektionen

För att du ska kunna öva har vi lagt till en övningsdel på varje blad i den högra delen.

Slutsats

Här har vi försökt att göra den här artikeln till en ultimat guide om hur man konverterar nummer till lämpliga ord eller text i MS Excel Dessutom har vi avgränsat sju olika tekniker i den här artikeln så att du kan välja det idealiska alternativet som är bäst lämpat för din specifika situation. Vi hoppas att du hittar den lösning du letade efter. Lämna en kommentar om du har några förslag eller frågor. Tack.

Hugh West är en mycket erfaren Excel-tränare och analytiker med över 10 års erfarenhet i branschen. Han har en kandidatexamen i redovisning och ekonomi och en magisterexamen i företagsekonomi. Hugh har en passion för undervisning och har utvecklat ett unikt undervisningssätt som är lätt att följa och förstå. Hans expertkunskap om Excel har hjälpt tusentals studenter och yrkesverksamma över hela världen att förbättra sina färdigheter och utmärka sig i sina karriärer. Genom sin blogg delar Hugh med sig av sin kunskap med världen, och erbjuder gratis Excel-handledning och onlineutbildning för att hjälpa individer och företag att nå sin fulla potential.