'%3e%3cpath%20d='M8%200C12.4183%200%2016%203.58172%2016%208C16%2012.4183%2012.4183%2016%208%2016C3.58172%2016%200%2012.4183%200%208C0%203.58172%203.58172%200%208%200ZM11.6162%204.38379C11.2257%203.99337%2010.5927%203.99338%2010.2021%204.38379L8%206.58594L5.79785%204.38379C5.40732%203.99334%204.77429%203.99329%204.38379%204.38379C3.99331%204.77429%203.99335%205.40733%204.38379%205.79785L6.58594%208L4.38379%2010.2021C3.99348%2010.5927%203.99341%2011.2257%204.38379%2011.6162C4.77426%2012.0066%205.40734%2012.0065%205.79785%2011.6162L8%209.41406L10.2021%2011.6162C10.5927%2012.0066%2011.2257%2012.0067%2011.6162%2011.6162C12.0067%2011.2257%2012.0066%2010.5927%2011.6162%2010.2021L9.41406%208L11.6162%205.79785C12.0066%205.40735%2012.0066%204.77429%2011.6162%204.38379Z'%20fill='%23080E17'%20fill-opacity='0.46'/%3e%3c/g%3e%3cdefs%3e%3cclipPath%20id='clip0_3761_713'%3e%3crect%20width='16'%20height='16'%20fill='white'/%3e%3c/clipPath%3e%3c/defs%3e%3c/svg%3e)
'%3e%3cpath%20fill-rule='evenodd'%20clip-rule='evenodd'%20d='M21.4999%2010.9993C21.4999%205.20009%2016.7986%200.498901%2010.9993%200.498901C5.19994%200.498901%200.498657%205.20009%200.498657%2010.9993C0.498657%2016.2404%204.33858%2020.5844%209.35855%2021.3722V14.0346H6.69238V10.9993H9.35855V8.68594C9.35855%206.05427%2010.9262%204.60062%2013.3248%204.60062C14.4736%204.60062%2015.6753%204.80571%2015.6753%204.80571V7.38979H14.3512C13.0468%207.38979%2012.64%208.19921%2012.64%209.0296V10.9993H15.5523L15.0867%2014.0346H12.64V21.3722C17.66%2020.5844%2021.4999%2016.2404%2021.4999%2010.9993Z'%20fill='%231568EA'/%3e%3c/g%3e%3c/svg%3e)
'%3e%3cpath%20d='M2.42045%2022.1876H6.31818V12.7217L0.75%208.54553V20.5171C0.75%2021.4414%201.49892%2022.1876%202.42045%2022.1876Z'%20fill='%234285F4'/%3e%3cpath%20d='M19.682%2022.1876H23.5797C24.5041%2022.1876%2025.2502%2021.4387%2025.2502%2020.5171V8.54553L19.682%2012.7217'%20fill='%2334A853'/%3e%3cpath%20d='M19.682%205.48293V12.7216L25.2502%208.54543V6.31816C25.2502%204.25236%2022.8921%203.07469%2021.2411%204.31361'%20fill='%23FBBC04'/%3e%3cpath%20d='M6.31824%2012.7217V5.48303L13.0001%2010.4944L19.6819%205.48303V12.7217L13.0001%2017.733'%20fill='%23EA4335'/%3e%3cpath%20d='M0.75%206.31816V8.54543L6.31818%2012.7216V5.48293L4.75909%204.31361C3.10534%203.07469%200.75%204.25236%200.75%206.31816Z'%20fill='%23C5221F'/%3e%3c/g%3e%3cdefs%3e%3cclipPath%20id='clip0_2954_7305'%3e%3crect%20width='24.5'%20height='18.375'%20fill='white'%20transform='translate(0.75%203.8125)'/%3e%3c/clipPath%3e%3c/defs%3e%3c/svg%3e){kind=icon}
När du arbetar med siffror i Excel behöver du ibland visa dem både med siffror och bokstäver för officiella dokument eller tydlighet. Men Excel har inget inbyggt sätt att göra detta, särskilt inte för indiska rupier. Därför kan det sluta med att du använder komplicerade formler, externa verktyg eller gör det manuellt.
I den här guiden lär vi dig en enkel steg-för-steg-metod för att konvertera siffror till text för indiska rupier i Excel.
2 enkla sätt att konvertera siffror till text i indiska rupier i Excel:
Först och främst behöver du förstås skaffa en lämplig Microsoft Excel-nedladdning!
Metod 1: Konvertera siffror till text i indiska rupier med VBA-kod
Innan du konverterar siffror till text i indiska rupier med VBA-kod kan du behöva lägga till fliken Utvecklare i menyfliksområdet för att öppna VBA-funktionen.
Här är stegen för att aktivera fliken Utvecklare i Excel:
Steg 1: Öppna Excel-kalkylbladet som innehåller siffrorna du vill konvertera.
Steg 2: Klicka på Arkiv och välj Alternativ i listan
Steg 3: I Excel-alternativ, välj Anpassa menyfliksområdet
Steg 4: Välj Alla flikar i alternativet Välj kommandon från
Steg 5: Hitta Utvecklare i listan och klicka på Lägg till
Steg 6: Klicka på OK
Här är stegen för att konvertera siffror till text i indiska rupier med VBA-kod:
Steg 1: Öppna Excel-kalkylbladet som innehåller siffrorna du vill konvertera.
Steg 2: Klicka på fliken Utvecklare. Om du inte ser den här fliken följer du stegen ovan för att aktivera den
Steg 3: Klicka på Visual Basic eller använd kortkommandot Alt + F11
Steg 4: Klicka på Infoga och välj Modul.
Steg 5: Klistra in VBA-koden som tillhandahålls i referensen.
Public Function RupeeFormat(SNum As String) 'Updateby Extendoffice Dim xDPInt As Integer Dim xArrPlace As Variant Dim xRStr_Paisas As String Dim xNumStr As String Dim xF As Integer Dim xTemp As String Dim xStrTemp As String Dim xRStr As String Dim xLp As Integer xArrPlace = Array("", "", " Thousand ", " Lacs ", " Crores ", " Trillion ", "", "", "", "") On Error Resume Next If SNum = "" Then RupeeFormat = "" Exit Function End If xNumStr = Trim(str(SNum)) If xNumStr = "" Then RupeeFormat = "" Exit Function End If xRStr = "" xLp = 0 If (xNumStr > 999999999.99) Then RupeeFormat = "Digit excced Maximum limit" Exit Function End If xDPInt = InStr(xNumStr, ".") If xDPInt > 0 Then If (Len(xNumStr) - xDPInt) = 1 Then xRStr_Paisas = RupeeFormat_GetT(Left(Mid(xNumStr, xDPInt + 1) & "0", 2)) ElseIf (Len(xNumStr) - xDPInt) > 1 Then xRStr_Paisas = RupeeFormat_GetT(Left(Mid(xNumStr, xDPInt + 1), 2)) End If xNumStr = Trim(Left(xNumStr, xDPInt - 1)) End If xF = 1 Do While xNumStr <> "" If (xF >= 2) Then xTemp = Right(xNumStr, 2) Else If (Len(xNumStr) = 2) Then xTemp = Right(xNumStr, 2) ElseIf (Len(xNumStr) = 1) Then xTemp = Right(xNumStr, 1) Else xTemp = Right(xNumStr, 3) End If End If xStrTemp = "" If Val(xTemp) > 99 Then xStrTemp = RupeeFormat_GetH(Right(xTemp, 3), xLp) If Right(Trim(xStrTemp), 3) <> "Lac" Then xLp = xLp + 1 End If ElseIf Val(xTemp) <= 99="" and="" val=""> 9 Then xStrTemp = RupeeFormat_GetT(Right(xTemp, 2)) ElseIf Val(xTemp) < 10 Then xStrTemp = RupeeFormat_GetD(Right(xTemp, 2)) End If If xStrTemp <> "" Then xRStr = xStrTemp & xArrPlace(xF) & xRStr End If If xF = 2 Then If Len(xNumStr) = 1 Then xNumStr = "" Else xNumStr = Left(xNumStr, Len(xNumStr) - 2) End If ElseIf xF = 3 Then If Len(xNumStr) >= 3 Then xNumStr = Left(xNumStr, Len(xNumStr) - 2) Else xNumStr = "" End If ElseIf xF = 4 Then xNumStr = "" Else If Len(xNumStr) <= 2="" then=""> xNumStr = "" Else xNumStr = Left(xNumStr, Len(xNumStr) - 3) End If End If xF = xF + 1 Loop If xRStr = "" Then xRStr = "No Rupees" Else xRStr = " Rupees " & xRStr End If If xRStr_Paisas <> "" Then xRStr_Paisas = " and " & xRStr_Paisas & " Paisas" End If RupeeFormat = xRStr & xRStr_Paisas & " Only" End Function Function RupeeFormat_GetH(xStrH As String, xLp As Integer) Dim xRStr As String If Val(xStrH) < 1 Then RupeeFormat_GetH = "" Exit Function Else xStrH = Right("000" & xStrH, 3) If Mid(xStrH, 1, 1) <> "0" Then If (xLp > 0) Then xRStr = RupeeFormat_GetD(Mid(xStrH, 1, 1)) & " Lac " Else xRStr = RupeeFormat_GetD(Mid(xStrH, 1, 1)) & " Hundred " End If End If If Mid(xStrH, 2, 1) <> "0" Then xRStr = xRStr & RupeeFormat_GetT(Mid(xStrH, 2)) Else xRStr = xRStr & RupeeFormat_GetD(Mid(xStrH, 3)) End If End If RupeeFormat_GetH = xRStr End Function Function RupeeFormat_GetT(xTStr As String) Dim xTArr1 As Variant Dim xTArr2 As Variant Dim xRStr As String xTArr1 = Array("Ten", "Eleven", "Twelve", "Thirteen", "Fourteen", "Fifteen", "Sixteen", "Seventeen", "Eighteen", "Nineteen") xTArr2 = Array("", "Twenty", "Thirty", "Forty", "Fifty", "Sixty", "Seventy", "Eighty", "Ninety") Result = "" If Val(Left(xTStr, 1)) = 1 Then xRStr = xTArr1(Val(Mid(xTStr, 2, 1))) Else If Val(Left(xTStr, 1)) > 0 Then xRStr = xTArr2(Val(Left(xTStr, 1)) - 1) End If xRStr = xRStr & RupeeFormat_GetD(Right(xTStr, 1)) End If RupeeFormat_GetT = xRStr End Function Function RupeeFormat_GetD(xDStr As String) Dim xArr_1() As Variant xArr_1 = Array(" One", " Two", " Three", " Four", " Five", " Six", " Seven", " Eight", " Nine", "") If Val(xDStr) > 0 Then RupeeFormat_GetD = xArr_1(Val(xDStr) - 1) Else RupeeFormat_GetD = "" End If End Function |
|---|
Steg 5: Spara (Ctrl + S) och stäng VBA-redigeraren. Välj Excel-arbetsbok aktiverad för makron när du sparar
Steg 6: Ange formeln =RupeeFormat(display cell) i den cell där du vill visa ordet och tryck på Enter
Steg 7: Resultatet kommer att visas. Dra ner för att tillämpa formeln på andra celler
Siffrorna i det markerade området kommer att konverteras till text i indiska rupier.
Metod 2: Konvertera siffror till text i indiska rupier i Excel (vanlig metod)
Lär dig den vanliga metoden för att konvertera siffror till text i indiska rupier i Excel, ett praktiskt steg när du förbereder fakturor för bokföring.
Steg 1: Öppna Excel-kalkylbladet som innehåller siffrorna du vill konvertera.
Steg 2: Högerklicka på fliknamnet och välj Visa kod för att öppna VBA-applikationen. Det är också användbart för dataanalys i Excel.
Steg 3: Klicka på Infoga och välj Modul.
Steg 4: Klistra in VBA-koden som tillhandahålls i referensen.
Public Function RupeeFormat(SNum As String) 'Update By Nirmal Dim xDPInt As Integer Dim xArrPlace As Variant Dim xRStr_Paisas As String Dim xNumStr As String Dim xF As Integer Dim xTemp As String Dim xStrTemp As String Dim xRStr As String Dim xLp As Integer xArrPlace = Array("", "", " Thousand ", " Lacs ", " Crores ", " Trillion ", "", "", "", "") On Error Resume Next If SNum = "" Then RupeeFormat = "" Exit Function End If xNumStr = Trim(Str(SNum)) If xNumStr = "" Then RupeeFormat = "" Exit Function End If xRStr = "" xLp = 0 If (xNumStr > 999999999.99) Then RupeeFormat = "Digit excced Maximum limit" Exit Function End If xDPInt = InStr(xNumStr, ".") If xDPInt > 0 Then If (Len(xNumStr) - xDPInt) = 1 Then xRStr_Paisas = RupeeFormat_GetT(Left(Mid(xNumStr, xDPInt + 1) & "0", 2)) ElseIf (Len(xNumStr) - xDPInt) > 1 Then xRStr_Paisas = RupeeFormat_GetT(Left(Mid(xNumStr, xDPInt + 1), 2)) End If xNumStr = Trim(Left(xNumStr, xDPInt - 1)) End If xF = 1 Do While xNumStr <> "" If (xF >= 2) Then xTemp = Right(xNumStr, 2) Else If (Len(xNumStr) = 2) Then xTemp = Right(xNumStr, 2) ElseIf (Len(xNumStr) = 1) Then xTemp = Right(xNumStr, 1) Else xTemp = Right(xNumStr, 3) End If End If xStrTemp = "" If Val(xTemp) > 99 Then xStrTemp = RupeeFormat_GetH(Right(xTemp, 3), xLp) If Right(Trim(xStrTemp), 3) <> "Lac" Then xLp = xLp + 1 End If ElseIf Val(xTemp) <= 99="" and="" val=""> 9 Then xStrTemp = RupeeFormat_GetT(Right(xTemp, 2)) ElseIf Val(xTemp) < 10 Then xStrTemp = RupeeFormat_GetD(Right(xTemp, 2)) End If If xStrTemp <> "" Then xRStr = xStrTemp & xArrPlace(xF) & xRStr End If If xF = 2 Then If Len(xNumStr) = 1 Then xNumStr = "" Else xNumStr = Left(xNumStr, Len(xNumStr) - 2) End If ElseIf xF = 3 Then If Len(xNumStr) >= 3 Then xNumStr = Left(xNumStr, Len(xNumStr) - 2) Else xNumStr = "" End If ElseIf xF = 4 Then xNumStr = "" Else If Len(xNumStr) <= 2="" then=""> xNumStr = "" Else xNumStr = Left(xNumStr, Len(xNumStr) - 3) End If End If xF = xF + 1 Loop If xRStr = "" Then xRStr = "No Rupees" Else xRStr = " Rupees " & xRStr End If If xRStr_Paisas <> "" Then xRStr_Paisas = " and " & xRStr_Paisas & " Paisas" End If RupeeFormat = xRStr & xRStr_Paisas & " Only" End Function Function RupeeFormat_GetH(xStrH As String, xLp As Integer) Dim xRStr As String If Val(xStrH) < 1 Then RupeeFormat_GetH = "" Exit Function Else xStrH = Right("000" & xStrH, 3) If Mid(xStrH, 1, 1) <> "0" Then If (xLp > 0) Then xRStr = RupeeFormat_GetD(Mid(xStrH, 1, 1)) & " Lac " Else xRStr = RupeeFormat_GetD(Mid(xStrH, 1, 1)) & " Hundred " End If End If If Mid(xStrH, 2, 1) <> "0" Then xRStr = xRStr & RupeeFormat_GetT(Mid(xStrH, 2)) Else xRStr = xRStr & RupeeFormat_GetD(Mid(xStrH, 3)) End If End If RupeeFormat_GetH = xRStr End Function Function RupeeFormat_GetT(xTStr As String) Dim xTArr1 As Variant Dim xTArr2 As Variant Dim xRStr As String xTArr1 = Array("Ten", "Eleven", "Twelve", "Thirteen", "Fourteen", "Fifteen", "Sixteen", "Seventeen", "Eighteen", "Nineteen") xTArr2 = Array("", "Twenty", "Thirty", "Forty", "Fifty", "Sixty", "Seventy", "Eighty", "Ninety") Result = "" If Val(Left(xTStr, 1)) = 1 Then xRStr = xTArr1(Val(Mid(xTStr, 2, 1))) Else If Val(Left(xTStr, 1)) > 0 Then xRStr = xTArr2(Val(Left(xTStr, 1)) - 1) End If xRStr = xRStr & RupeeFormat_GetD(Right(xTStr, 1)) End If RupeeFormat_GetT = xRStr End Function Function RupeeFormat_GetD(xDStr As String) Dim xArr_1() As Variant xArr_1 = Array(" One", " Two", " Three", " Four", " Five", " Six", " Seven", " Eight", " Nine", "") If Val(xDStr) > 0 Then RupeeFormat_GetD = xArr_1(Val(xDStr) - 1) Else RupeeFormat_GetD = "" End If End Function |
|---|
Steg 5: Välj Excel-arbetsbok aktiverad för makron i Spara som typ. Stäng VBA-redigerarens fönster
Steg 6: Infoga formeln =RupeeFormat(display cell) i den valda cellen för att visa resultatet.
Steg 7: Dra ner för att tillämpa formeln på andra celler när resultatet visas i den valda cellen
Siffrorna i det markerade området kommer att konverteras till text i indiska rupier.
Bästa gratisalternativet till Microsoft Office - WPS Office
Förutom Microsoft Office vill jag presentera en annan app för dig. Det är WPS Office. Så, vad är WPS?
WPS Office är en gratis kontorssvit som är kompatibel med Microsoft Office. Den inkluderar en ordbehandlare, ett kalkylprogram, presentationsprogramvara och en PDF-läsare, så att du enkelt kan öppna, redigera och spara filer. Den är också enkel att använda, även för personer utan tidigare erfarenhet av kontorssviter.
Inte nog med det, WPS Office är en kraftfull kontorssvit som erbjuder ett brett utbud av funktioner. Den är ett bra alternativ till NeoOffice, särskilt för studenter och företag med en budget.
Ta en snabb titt på några av funktionerna i WPS:
● Använd Word, Excel och PPT gratis. Kraftfull PDF-verktygslåda.
● Omfattande mallbutik
● Många funktioner, såsom inbyggda CV-assistenter, smarta formulär, skärminspelning, filreparation och andra små verktyg integrerade i produkten
● Produkten är lättviktig, tar bara upp 200 MB och använder en liten mängd datorminne.
● Mac-versionen av WPS Office är mycket kraftfull. Microsoft Office ignorerar upplevelsen för Mac-användare, vilket kompenseras av WPS Office
● Stödjer onlinedokument (WPS AirPage) och gemensam redigering i realtid av flera personer
● WPS Office stödjer även Linux-, Android- och iOS-system. För att använda WPS Office-produkter på olika system behöver du bara logga in på samma konto, så kan alla filer synkroniseras
Känner du att WPS Office är det bästa valet för dig och vill ladda ner det? Besök den officiella webbplatsen: https://www.wps.com och ladda ner nu.
Hur man laddar ner WPS Office
Steg 1: Besök WPS Office webbplats: wps.com.
Steg 2: Klicka på knappen "Gratis nedladdning"
Steg 3: Välj platsen där du vill spara WPS Office -> Spara
Steg 4: Dubbelklicka på WPS Office-filen i din nedladdningsmapp, klicka på "Kör" och följ instruktionerna på skärmen för att installera
Steg 5: När det är klart kan du dra nytta av hela kraften i WPS Office
Vanliga frågor:
F1: Hur konverterar jag valuta till text i Excel VBA?
Du kan använda VBA (Visual Basic for Applications) för att konvertera valuta till text i Excel. Du måste skriva ett anpassat VBA-makro för att utföra den här konverteringen. Du kan hitta exempel och kodsnuttar online eller läsa Excels VBA-dokumentation för vägledning.
F2: Hur konverterar man valuta till ord eller text i Excel?
För att konvertera valuta till ord i Excel använder du vanligtvis en kombination av funktioner och anpassad formatering. Du kan hitta olika guider och handledningar online som förklarar hur du uppnår detta.
F3: Hur formaterar man siffror i Excel för indiska rupier?
För att formatera siffror i Excel för indiska rupier kan du använda de inbyggda formateringsalternativen för valuta. Markera den cell eller det område du vill formatera, gå till fliken "Nummer" i dialogrutan Formatera celler och välj kategorin "Valuta". Därifrån kan du välja "₹ Engelska (Indien)" som valutasymbol.
F4: Hur konverterar jag automatiskt siffror till text i Excel?
Det finns flera sätt att automatiskt konvertera siffror till text i Excel. Du kan använda Excel-funktioner som TEXT, SAMMANFOGA (CONCATENATE) eller anpassad formatering. Du kan också använda VBA-makron för mer avancerad automatisering.
F5: Hur konverterar man amerikanska dollar till indiska rupier i Excel?
För att konvertera amerikanska dollar till indiska rupier i Excel kan du använda en kombination av Excel-funktioner och webbtjänster eller externa datakällor som tillhandahåller valutakurser. Excels "Valuta"-format kan också användas för att visa belopp i indiska rupier när du har hämtat växelkurserna.
F5. Vill du använda Excel Online för att förenkla arbetet?
Om du föredrar att arbeta i molnet erbjuder Excel Online samma kraftfulla funktioner för att hjälpa dig hantera och rensa din data oavsett var du är. Med Excel Online kan du använda samma funktioner för att ta bort tecken från vänster eller höger sida av din data, vilket gör det till ett utmärkt alternativ för dig som behöver flexibilitet eller inte har tillgång till en skrivbordsversion av Excel.
Sammanfattning:
Lär dig hur du enkelt konverterar numeriska belopp till ord i indiska rupier i Excel med antingen VBA-kod eller en vanlig metod. Aktivera först fliken Utvecklare i Excel, lägg till den tillhandahållna VBA-koden och använd formeln =RupeeFormat(display cell).
Alternativt kan du högerklicka på bladets namn för att komma åt VBA, infoga en modul, klistra in koden och använda samma formel. Dessa användarvänliga metoder är också kompatibla med WPS Office, ett gratis alternativ till Microsoft Office, vilket gör exakt och professionell dokumentformatering till en lek.
'%3e%3cpath%20d='M19.9911%204.11386V6.471H18.5894C18.0775%206.471%2017.7322%206.57814%2017.5536%206.79243C17.3751%207.00671%2017.2858%207.32814%2017.2858%207.75671V9.44421H19.9019L19.5536%2012.0871H17.2858V18.8639H14.5536V12.0871H12.2769V9.44421H14.5536V7.49779C14.5536%206.39064%2014.8632%205.53201%2015.4822%204.92189C16.1013%204.31177%2016.9257%204.00671%2017.9554%204.00671C18.8304%204.00671%2019.509%204.04243%2019.9911%204.11386Z'%20fill='%23333333'/%3e%3c/g%3e%3cdefs%3e%3cclipPath%20id='clip0_2938_8199'%3e%3crect%20width='16'%20height='16'%20fill='white'%20transform='translate(8%204.00671)'/%3e%3c/clipPath%3e%3c/defs%3e%3c/svg%3e)
'%3e%3cpath%20d='M17.5237%2010.7813L23.4811%204H22.0699L16.8949%209.88693L12.7648%204H8L14.2469%2012.9029L8%2020.0133H9.4112L14.8725%2013.7952L19.2352%2020.0133H24M9.92053%205.04213H12.0885L22.0688%2019.0224H19.9003'%20fill='%23333333'/%3e%3c/g%3e%3cdefs%3e%3cclipPath%20id='clip0_2938_8200'%3e%3crect%20width='16'%20height='16.0134'%20fill='white'%20transform='translate(8%204)'/%3e%3c/clipPath%3e%3c/defs%3e%3c/svg%3e)
