{"id":15002,"date":"2018-09-25T06:34:28","date_gmt":"2018-09-25T06:34:28","guid":{"rendered":"http:\/\/learnexcelmacro.com\/wp\/?p=15002"},"modified":"2022-08-17T19:14:42","modified_gmt":"2022-08-17T19:14:42","slug":"vba-to-spell-numbers-to-letters","status":"publish","type":"post","link":"https:\/\/vmlogger.com\/excel\/2018\/09\/vba-to-spell-numbers-to-letters\/","title":{"rendered":"UDF to Convert Numbers to Letters"},"content":{"rendered":"

[et_pb_section fb_built=”1″ admin_label=”section” _builder_version=”4.16″ da_disable_devices=”off|off|off” global_colors_info=”{}” da_is_popup=”off” da_exit_intent=”off” da_has_close=”on” da_alt_close=”off” da_dark_close=”off” da_not_modal=”on” da_is_singular=”off” da_with_loader=”off” da_has_shadow=”on”][et_pb_row admin_label=”row” _builder_version=”4.16″ background_size=”initial” background_position=”top_left” background_repeat=”repeat” global_colors_info=”{}”][et_pb_column type=”4_4″ _builder_version=”4.16″ custom_padding=”|||” global_colors_info=”{}” custom_padding__hover=”|||”][et_pb_text _builder_version=”4.17.6″ _module_preset=”default” global_colors_info=”{}”]First of all, wouldn’t it be great if we have a built-in function in Microsoft Excel to Convert Numbers to Letters? <\/strong> It means, simply, by using a formula in excel, I could Spell Numbers in Words.
\nIn banking or accountancy, this is used to write grand total amounts. Amounts are mentioned in Numbers as well as words. You probably have seen it on invoices or on Bank Cheques.<\/p>\n

For Example: Number : 6734862<\/strong>
\nWe can write the above number in words in many ways in different languages, countries Number scales, etc. Here are the two, for which, I have adjusted the function.
\nIn American English: <\/strong> Six Million Seven Hundred Thirty-Four Thousand Eight Hundred and Sixty Two.
\nIn Indian continent Number Scale : <\/strong> Sixty Seven Lakhs Thirty Four Thousand Eight Hundred and Sixty Two.<\/div>\n

As we do not have any built in function as such in Microsoft Excel yet – therefore, I have created this User Defined function (UDF<\/a>) to convert Numbers to Letters. You can also download a FREE Excel Workbook with this UDF <\/a>in it. <\/em>
\n\"Numbers<\/a><\/p>\n

Though there was a VBA code available Microsoft office wiki <\/a> about spelling currency in words. I, too had written an article previously about converting Indian currency in words. <\/a><\/p>\n

Limitations in Previous UDF<\/h2>\n

For example: if you want the maximum scale unit to be used to spell your amount is Billion<\/em> (like Thousand, Million, and Billion) and you provide an amount which is (more than 999 Billion) 1000 Billion or more. Then, in this case, these functions were not capable of dealing with that and returns the strange result.<\/p>\n

To overcome above limitation,<\/strong> I have created a function in VBA using recursive method<\/strong> to convert Numbers to letters<\/strong>. That means in the above example, this function will be able to give you correct spelling for 1000 Billion or even more.
\nFor Example <\/strong>One Thousand Billion or Ten Thousand Billion or Hundred Thousand Billion or One Million Billion etc.<\/em><\/p>\n

This is possible because of usingrecursive function <\/strong>. In simple language – if a function calls itself from its own body the function is called recursive function and this method is called recursion.<\/em><\/p>\n

Since this is User Defined Function to convert numbers to words <\/strong> or in other words<\/a>, spell numbers in Words. <\/strong> – You can use it as a formula in any cell in your excel workbook. <\/em><\/p>\n

If you do not know what is UDF – User Defined Function – Refer this article.<\/a><\/em><\/p>\n

To make it re-usable and simplify my previous code to convert numbers to letters<\/a>, I have made a logical split <\/a>of the whole code. I have made it in a more modular way which will be a lot easier to understand and change according to your need.<\/p>\n

1# VBA function to Spell Numbers to Letters<\/h1>\n

1. Below is the VBA function [recursive function] to spell numbers to letters. It does not care about the currency Unit or sub-Unit etc. This is simply used to convert your number in words<\/strong>. The benefit of creating this as a separate function is that you can use this function to convert any type of Numbers to Letters. It is not necessary that you should use this for converting a currency amount to words only.
\nMost importantly, <\/strong> this function accepts whole number as an input. It does not accept decimal numbers. Therefore, if you want to convert a decimal number into words, you can split whole and decimal numbers and call this function separately. This is what I have done in SpellCurrency<\/em> functions below. You can refer to them below.<\/p>\n

\nFunction NumToLettersX(ByVal num As String, _\n    Optional NumLetters As String = \"\", _\n    Optional UnitCounter As Integer = 0) As String\n    \n' Add the unit until where you want to use\n' in Number Scale - Like\n' Arab, Kharab, etc. [in Indian Continent Number Scale System]\n    Dim Unit As Variant\n    Unit = Array( _\n    \"\", _\n    \" Thousand \", _\n    \" Lakhs \", _\n    \" Crore \")\n    \n    Dim iCount As Integer: iCount = 1\n    \n    Do While num <> \"\"\n        \n' Check if you have reached at the last Unit\n' defined in the array - Unit\n' if yes, call this same function by providing\n' the remaining digits\n        \n        If (iCount = UBound(Unit) + 1 And Len(num) > 2) Then\n            NumLetters = Unit(UnitCounter) & NumLetters\n            NumToLettersX num, NumLetters\n            Exit Do\n        End If\n        \n        If (iCount = 1) Then\n            Temp = GetHundreds(Right(num, 3))\n        Else\n            Temp = GetHundreds(Right(num, 2))\n        End If\n        If (Temp <> \"Zero\") Then NumLetters = Temp & Unit(UnitCounter) & NumLetters\n        \n        If Len(num) > 2 And iCount = 1 Then\n            num = Left(num, Len(num) - 3)\n        ElseIf Len(num) >= 2 And iCount > 1 Then\n            num = Left(num, Len(num) - 2)\n        Else\n            num = \"\"\n        End If\n        \n        iCount = iCount + 1\n        UnitCounter = UnitCounter + 1\n    Loop\n    NumToLettersX = Application.WorksheetFunction.Trim(NumLetters)\n    \nEnd Function\n\n<\/code><\/pre>\n
Important to note that the above code is for the Indian continent Number Scale System Only. You can customize it according to your need.<\/p>\n
Example: In Indian Continent Number Scale System: 6734862: <\/strong> Sixty Seven Lakhs Thirty-Four Thousand Eight Hundred and Sixty Two.<\/p>\n
I have customized the above function for American Number Scale system <\/strong>. Following is the code for the American Number Scale System:<\/p>\n
\nFunction NumToLettersY(ByVal num As String, _\n    Optional NumLetters As String = \"\", _\n    Optional UnitCounter As Integer = 0) As String\n    \n' Add the unit until where you want to use\n' in Number Scale - Like\n' Million, Billion etc. [in American Number Scale System]\n    Dim Unit As Variant\n    Unit = Array( _\n    \"\", _\n    \" Thousand \", _\n    \" Million \", _\n    \" Billion \", _\n    \" Trillion \")\n    \n    Dim iCount As Integer: iCount = 1\n    \n    Do While num <> \"\"\n    \n    ' Check if you have reached at the last Unit\n    ' defined in the array - Unit\n    ' if yes, call this same function by providing\n    ' the remaining digits\n        \n        If (iCount = UBound(Unit) + 1 And Len(num) > 3) Then\n            NumLetters = Unit(UnitCounter) & NumLetters\n            NumToLettersY num, NumLetters\n            Exit Do\n        End If\n        \n        Temp = GetHundreds(Right(num, 3))\n\n        If (Temp <> \"Zero\") Then NumLetters = Temp & Unit(UnitCounter) & NumLetters\n        \n        If Len(num) > 3 Then\n            num = Left(num, Len(num) - 3)\n        Else\n            num = \"\"\n        End If\n        \n        iCount = iCount + 1\n        UnitCounter = UnitCounter + 1\n    Loop\n    NumToLettersY = Application.WorksheetFunction.Trim(NumLetters)\nEnd Function\n\n<\/code><\/pre>\n
Example: In American Number Scale System: 6734862: <\/strong> Six Million Seven Hundred Thirty-Four Thousand Eight Hundred and Sixty Two.<\/p>\n
\n
Most Important:<\/h2>\n
For above function to work correctly, DO NOT FORGET to copy the generic functions below.<\/a> Spell Numbers to Letters functions uses these generic functions.<\/p>\n<\/div>\n
2# VBA function to Spell Currency to Words – American Number Scale System<\/h1>\n
Basically, this function does the following:<\/p>\n
1.<\/strong> Round-Up the input number provided to Spell the currency up to two-digit.
\n2.<\/strong> Separate the whole number part and decimal part from the input [Note:<\/strong> This is because above function accepts only whole number as input]
\n3.<\/strong> Call the Spell Number function for American Number Scale System to spell the numbers separately – 1 for the Whole number and one for the Decimal part(rounded to two digits)
\n4.<\/strong> In both converted parts, append the currency Unit and Sub-Unit, etc. in the returned Number spellings for Whole Number and Decimal part respectively.<\/p>\n
Note:<\/strong> Likewise you can use this method for any other types of Numbers like Weight, Height, or any kind of Units and Sub-Units.<\/p>\n<\/div>\n
\nFunction spellCurrencyY(ByVal MyNumber) As String\n\n    Dim wholeNumber As String\n    Dim decimalNumber As String\n    Dim wholeCurrencyText As String\n    Dim decimalCurrencyText As String\n    Dim unitSingular As String\n    Dim subUnitSingular As String\n    Dim unitPlural As String\n    Dim subUnitPlural As String\n    \n    unitSingular = \" Dollar\"\n    unitPlural = \" Dollars\"\n    subUnitSingular = \" Cent\"\n    subUnitPlural = \" Cents\"\n   \n    ' separate whole number part and decimal part\n    ' Note: for decimal points, first round up to 2 digits\n    \n    MyNumber = VBA.Format(Round(MyNumber, 2), \"#0.00\")\n    \n    If (VBA.InStr(1, MyNumber, \".\", vbTextCompare) > 0) Then\n        wholeNumber = VBA.Left(MyNumber, VBA.InStr(1, MyNumber, \".\", vbTextCompare) - 1)\n        decimalNumber = VBA.Mid(MyNumber, VBA.InStr(1, MyNumber, \".\", vbTextCompare) + 1, 2)\n    Else\n        wholeNumber = MyNumber\n        decimalNumber = \"0\"\n    End If\n    \n    ' get the number spelling separately\n    wholeCurrencyText = NumToLettersY(wholeNumber)\n    decimalCurrencyText = NumToLettersY(decimalNumber)\n    \n\n    Select Case wholeCurrencyText\n        Case \"One\"\n            wholeCurrencyText = wholeCurrencyText & unitSingular\n        Case \"\"\n            wholeCurrencyText = \"Zero\" & unitSingular\n        Case Else\n            wholeCurrencyText = wholeCurrencyText & unitPlural\n    End Select\n    \n    Select Case decimalCurrencyText\n        Case \"One\"\n            decimalCurrencyText = decimalCurrencyText & subUnitSingular\n        Case \"\"\n            decimalCurrencyText = \"Zero\" & subUnitSingular\n        Case Else\n            decimalCurrencyText = decimalCurrencyText & subUnitPlural\n    End Select\n        spellCurrencyY = wholeCurrencyText & \" and \" & decimalCurrencyText\n    End Function\n\n\n<\/code><\/pre>\n
In American Number Scale System : 6734862.456 : <\/strong> Six Million Seven Hundred Thirty Four Thousand Eight Hundred and Sixty Two Dollars<\/strong> and Fourty Six Cents.<\/strong><\/p>\n
3# VBA function to Spell Currency to Words – Indian Continent Number Scale System<\/h1>\n
Basically, this function works on same principal as above. The only change from above function is that – you should call corresponding function for Indian Number Scale system.<\/p>\n
\nFunction spellCurrencyX(ByVal MyNumber) As String\n\n    Dim wholeNumber As String\n    Dim decimalNumber As String\n    Dim wholeCurrencyText As String\n    Dim decimalCurrencyText As String\n    Dim unitSingular As String\n    Dim subUnitSingular As String\n    Dim unitPlural As String\n    Dim subUnitPlural As String\n    \n    unitSingular = \" Rupee\"\n    unitPlural = \" Rupees\"\n    subUnitSingular = \" Paisa\"\n    subUnitPlural = \" Paise\"\n   \n    ' separate whole number part and decimal part\n    ' Note: for decimal points, first round up to 2 digits\n    \n    MyNumber = VBA.Format(Round(MyNumber, 2), \"#0.00\")\n    \n    If (VBA.InStr(1, MyNumber, \".\", vbTextCompare) > 0) Then\n        wholeNumber = VBA.Left(MyNumber, VBA.InStr(1, MyNumber, \".\", vbTextCompare) - 1)\n        decimalNumber = VBA.Mid(MyNumber, VBA.InStr(1, MyNumber, \".\", vbTextCompare) + 1, 2)\n    Else\n        wholeNumber = MyNumber\n        decimalNumber = \"0\"\n    End If\n    \n    ' get the number spelling separately\n    wholeCurrencyText = NumToLettersX(wholeNumber)\n    decimalCurrencyText = NumToLettersX(decimalNumber)\n    \n    ' get the\n    Select Case wholeCurrencyText\n        Case \"One\"\n            wholeCurrencyText = wholeCurrencyText & unitSingular\n        Case \"\"\n            wholeCurrencyText = \"Zero\" & unitSingular\n        Case Else\n            wholeCurrencyText = wholeCurrencyText & unitPlural\n    End Select\n    \n    Select Case decimalCurrencyText\n        Case \"One\"\n            decimalCurrencyText = decimalCurrencyText & subUnitSingular\n        Case \"\"\n            decimalCurrencyText = \"Zero\" & subUnitSingular\n        Case Else\n            decimalCurrencyText = decimalCurrencyText & subUnitPlural\n    End Select\n        spellCurrencyX = wholeCurrencyText & \" and \" & decimalCurrencyText\n    End Function\n\n<\/code><\/pre>\n
In Indian Continent Number Scale System : 6734862.456 : <\/strong> Sixty Seven Lakhs Thirty Four Thousand Eight Hundred Sixty Two Rupees<\/strong> and Fourty Six Paise.<\/strong><\/p>\n
4# Generic Functions [Common for all the above functions]<\/h1>\n
Following are the generic functions. We use these functions to translate single digits, tens and hundreds in corresponding numbers system.
\nIn below example, I have used English translation for that.
\nSimilarly, if you want to change them in any other language, you can easily change the corresponding Text part for each Numbers.<\/p>\n
\n'*******************************************\n' Converts a number from 100-999 into text *\n'*******************************************\n\nFunction GetHundreds(ByVal MyNumber)\n    Dim Result As String\n    If Val(MyNumber) = 0 Then GetHundreds = \"Zero\": Exit Function\n    MyNumber = Right(\"000\" & MyNumber, 3)\n' Convert the hundreds place.\n    If Mid(MyNumber, 1, 1) <> \"0\" Then\n        Result = GetDigit(Mid(MyNumber, 1, 1)) & \" Hundred \"\n    End If\n    \n' Convert the tens and ones place.\n    If Mid(MyNumber, 2, 1) <> \"0\" Then\n        Result = Result & GetTens(Mid(MyNumber, 2))\n    Else\n        Result = Result & GetDigit(Mid(MyNumber, 3))\n    End If\n    GetHundreds = Result\nEnd Function\n\n'*********************************************\n' Converts a number from 10 to 99 into text. *\n'*********************************************\nFunction GetTens(TensText)\n    \n    Dim Result As String\n    Result = \"\"           ' Null out the temporary function value.\n    If Val(Left(TensText, 1)) = 1 Then   ' If value between 10-19...\n        Select Case Val(TensText)\n        Case 10: Result = \"Ten\"\n        Case 11: Result = \"Eleven\"\n        Case 12: Result = \"Twelve\"\n        Case 13: Result = \"Thirteen\"\n        Case 14: Result = \"Fourteen\"\n        Case 15: Result = \"Fifteen\"\n        Case 16: Result = \"Sixteen\"\n        Case 17: Result = \"Seventeen\"\n        Case 18: Result = \"Eighteen\"\n        Case 19: Result = \"Nineteen\"\n        Case Else\n        End Select\n    Else                                 ' If value between 20-99...\n        Select Case Val(Left(TensText, 1))\n        Case 2: Result = \"Twenty\"\n        Case 3: Result = \"Thirty\"\n        Case 4: Result = \"Forty\"\n        Case 5: Result = \"Fifty\"\n        Case 6: Result = \"Sixty\"\n        Case 7: Result = \"Seventy\"\n        Case 8: Result = \"Eighty\"\n        Case 9: Result = \"Ninety\"\n        Case Else\n        End Select\n        \n        Result = Result & \" \" & GetDigit _\n        (Right(TensText, 1))  ' Retrieve ones place.\n    End If\n    GetTens = Result\nEnd Function\n\n'*******************************************\n' Converts a number from 1 to 9 into text. *\n'*******************************************\n\nFunction GetDigit(Digit)\n    Select Case Val(Digit)\n    Case 1: GetDigit = \"One\"\n    Case 2: GetDigit = \"Two\"\n    Case 3: GetDigit = \"Three\"\n    Case 4: GetDigit = \"Four\"\n    Case 5: GetDigit = \"Five\"\n    Case 6: GetDigit = \"Six\"\n    Case 7: GetDigit = \"Seven\"\n    Case 8: GetDigit = \"Eight\"\n    Case 9: GetDigit = \"Nine\"\n    Case Else: GetDigit = \"\"\n    End Select\nEnd Function\n\n\n<\/code><\/pre>\n
How to use these above Functions in Excel<\/h1>\n
<\/a>Follow the following 5 simple steps to use this UDF<\/a>.
\n<\/a>
\nStep 1. <\/strong> Open <\/a>your Excel Workbook
\nStep 2. <\/strong> Press Alt + F11
\nStep 3. <\/strong> Add a Regular Module in Excel
\nStep 4. <\/strong> Copy and Paste the Below Code in the Module or in separate modules [your wish]
\nStep 5. <\/strong> Once you have copied and Pasted the above Code in a Module, you can use the Below Formula in your Workbook in any WorkSheet as shown in Below Picture:
\n\"Numbers<\/a>[\/et_pb_text][et_pb_cta title=”FREE DOWNLOAD – Numbers to Words Convertor” button_url=”\/excel\/wp-content\/downloads\/SpellCurrency-v-0.2.xls” button_text=”Download FREE Workbook” _builder_version=”4.17.6″ _module_preset=”a50a16dd-d05f-4ea2-acab-1468d2e4010e” global_colors_info=”{}”]<\/p>\n
Finally, you can download your FREE Excel workbook with UDF to convert numbers to word. Moreover, You can also look into the code and customize it to fit your need.
Of course, you can share your customized version here for other visitors who may get benefited \u2013 after all sharing is caring !!
Currently, this excel file has two user-defined functions \u2013 One for the Indian Number Scale System and the other for the American English Scale system.<\/p>\n
[\/et_pb_cta][et_pb_blurb title=”Suggested Artcles:” use_icon=”on” font_icon=”||fa||900″ _builder_version=”4.17.6″ _module_preset=”0249c68e-4de8-4f44-84ff-a9b1850785b6″ hover_enabled=”0″ global_colors_info=”{}” sticky_enabled=”0″]<\/p>\n
    \n
  1. \nUser Defined Function in Excel to Convert Currency to Words<\/a>\n<\/li>\n
  2. \nCreate UDF in Excel in 4 Steps – Your Own Excel Formula<\/a>\n<\/li>\n
  3. \nHow to Copy content from Word using VBA<\/a>\n<\/li>\n
  4. \nHow to get Word Count and Letter Count in Excel Formula<\/a>\n<\/li>\n
  5. \nCalculate MOD of Large Numbers in Excel<\/a>\n<\/li>\n<\/ol>\n
    [\/et_pb_blurb][\/et_pb_column][\/et_pb_row][\/et_pb_section]<\/p>\n<\/span>","protected":false},"excerpt":{"rendered":"
    First of all, wouldn’t it be great if we have a built-in function in Microsoft Excel to Convert Numbers to Letters? It means, simply, by using a formula in excel, I could Spell Numbers in Words. In banking or accountancy, this is used to write grand total amounts. Amounts are mentioned in Numbers as well […]<\/p>\n","protected":false},"author":45,"featured_media":242467,"comment_status":"open","ping_status":"open","sticky":false,"template":"","format":"standard","meta":{"_et_pb_use_builder":"on","_et_pb_old_content":"","_et_gb_content_width":"","footnotes":""},"categories":[1673,1246,1682,2056],"tags":[],"yoast_head":"\nUDF to Convert Numbers to Letters - Spell Currency in Words<\/title>\n<meta name=\"description\" content=\"UDF to convert numbers to letters. VBA to spell number in words. Spell currency in words. Spell Indian currency to words. Formula to convert Number in Words\" \/>\n<meta name=\"robots\" content=\"index, follow, max-snippet:-1, max-image-preview:large, max-video-preview:-1\" \/>\n<link rel=\"canonical\" href=\"https:\/\/vmlogger.com\/excel\/2018\/09\/vba-to-spell-numbers-to-letters\/\" \/>\n<meta property=\"og:locale\" content=\"en_US\" \/>\n<meta property=\"og:type\" content=\"article\" \/>\n<meta property=\"og:title\" content=\"UDF to Convert Numbers to Letters\" \/>\n<meta property=\"og:description\" content=\"UDF to convert numbers to letters. VBA to spell number in words. Spell currency in words. Spell Indian currency to words. Formula to convert Number in Words\" \/>\n<meta property=\"og:url\" content=\"https:\/\/vmlogger.com\/excel\/2018\/09\/vba-to-spell-numbers-to-letters\/\" \/>\n<meta property=\"og:site_name\" content=\"Let's excel in Excel\" \/>\n<meta property=\"article:publisher\" content=\"http:\/\/www.facebook.com\/vmlogger\" \/>\n<meta property=\"article:author\" content=\"http:\/\/www.facebook.com\/vmlogger\" \/>\n<meta property=\"article:published_time\" content=\"2018-09-25T06:34:28+00:00\" \/>\n<meta property=\"article:modified_time\" content=\"2022-08-17T19:14:42+00:00\" \/>\n<meta property=\"og:image\" content=\"https:\/\/vmlogger.com\/excel\/wp-content\/uploads\/sites\/11\/2022\/08\/Spell_Numbers_To_Letters.png\" \/>\n\t<meta property=\"og:image:width\" content=\"1051\" \/>\n\t<meta property=\"og:image:height\" content=\"545\" \/>\n\t<meta property=\"og:image:type\" content=\"image\/png\" \/>\n<meta name=\"author\" content=\"Vishwamitra Mishra\" \/>\n<meta name=\"twitter:card\" content=\"summary_large_image\" \/>\n<meta name=\"twitter:creator\" content=\"@https:\/\/www.twitter.com\/learnexcelmacro\" \/>\n<meta name=\"twitter:site\" content=\"@learnexcelmacro\" \/>\n<meta name=\"twitter:label1\" content=\"Written by\" \/>\n\t<meta name=\"twitter:data1\" content=\"Vishwamitra Mishra\" \/>\n\t<meta name=\"twitter:label2\" content=\"Est. reading time\" \/>\n\t<meta name=\"twitter:data2\" content=\"11 minutes\" \/>\n<script type=\"application\/ld+json\" class=\"yoast-schema-graph\">{\"@context\":\"https:\/\/schema.org\",\"@graph\":[{\"@type\":\"Article\",\"@id\":\"https:\/\/vmlogger.com\/excel\/2018\/09\/vba-to-spell-numbers-to-letters\/#article\",\"isPartOf\":{\"@id\":\"https:\/\/vmlogger.com\/excel\/2018\/09\/vba-to-spell-numbers-to-letters\/\"},\"author\":{\"name\":\"Vishwamitra Mishra\",\"@id\":\"https:\/\/vmlogger.com\/excel\/#\/schema\/person\/7500a107b0b2d35a8492acf0d11fc8e5\"},\"headline\":\"UDF to Convert Numbers to Letters\",\"datePublished\":\"2018-09-25T06:34:28+00:00\",\"dateModified\":\"2022-08-17T19:14:42+00:00\",\"mainEntityOfPage\":{\"@id\":\"https:\/\/vmlogger.com\/excel\/2018\/09\/vba-to-spell-numbers-to-letters\/\"},\"wordCount\":1360,\"commentCount\":1,\"publisher\":{\"@id\":\"https:\/\/vmlogger.com\/excel\/#\/schema\/person\/7500a107b0b2d35a8492acf0d11fc8e5\"},\"articleSection\":[\"Excel Functions\",\"Excel Macro\",\"Popular Articles\",\"User Defined Function\"],\"inLanguage\":\"en-US\",\"potentialAction\":[{\"@type\":\"CommentAction\",\"name\":\"Comment\",\"target\":[\"https:\/\/vmlogger.com\/excel\/2018\/09\/vba-to-spell-numbers-to-letters\/#respond\"]}]},{\"@type\":\"WebPage\",\"@id\":\"https:\/\/vmlogger.com\/excel\/2018\/09\/vba-to-spell-numbers-to-letters\/\",\"url\":\"https:\/\/vmlogger.com\/excel\/2018\/09\/vba-to-spell-numbers-to-letters\/\",\"name\":\"UDF to Convert Numbers to Letters - Spell Currency in Words\",\"isPartOf\":{\"@id\":\"https:\/\/vmlogger.com\/excel\/#website\"},\"datePublished\":\"2018-09-25T06:34:28+00:00\",\"dateModified\":\"2022-08-17T19:14:42+00:00\",\"description\":\"UDF to convert numbers to letters. VBA to spell number in words. Spell currency in words. Spell Indian currency to words. Formula to convert Number in Words\",\"breadcrumb\":{\"@id\":\"https:\/\/vmlogger.com\/excel\/2018\/09\/vba-to-spell-numbers-to-letters\/#breadcrumb\"},\"inLanguage\":\"en-US\",\"potentialAction\":[{\"@type\":\"ReadAction\",\"target\":[\"https:\/\/vmlogger.com\/excel\/2018\/09\/vba-to-spell-numbers-to-letters\/\"]}]},{\"@type\":\"BreadcrumbList\",\"@id\":\"https:\/\/vmlogger.com\/excel\/2018\/09\/vba-to-spell-numbers-to-letters\/#breadcrumb\",\"itemListElement\":[{\"@type\":\"ListItem\",\"position\":1,\"name\":\"Home\",\"item\":\"https:\/\/vmlogger.com\/excel\/\"},{\"@type\":\"ListItem\",\"position\":2,\"name\":\"Excel Macro\",\"item\":\"https:\/\/vmlogger.com\/excel\/macro\/\"},{\"@type\":\"ListItem\",\"position\":3,\"name\":\"UDF to Convert Numbers to Letters\"}]},{\"@type\":\"WebSite\",\"@id\":\"https:\/\/vmlogger.com\/excel\/#website\",\"url\":\"https:\/\/vmlogger.com\/excel\/\",\"name\":\"Let's excel in Excel\",\"description\":\"Let's share knowledge\",\"publisher\":{\"@id\":\"https:\/\/vmlogger.com\/excel\/#\/schema\/person\/7500a107b0b2d35a8492acf0d11fc8e5\"},\"potentialAction\":[{\"@type\":\"SearchAction\",\"target\":{\"@type\":\"EntryPoint\",\"urlTemplate\":\"https:\/\/vmlogger.com\/excel\/?s={search_term_string}\"},\"query-input\":\"required name=search_term_string\"}],\"inLanguage\":\"en-US\"},{\"@type\":[\"Person\",\"Organization\"],\"@id\":\"https:\/\/vmlogger.com\/excel\/#\/schema\/person\/7500a107b0b2d35a8492acf0d11fc8e5\",\"name\":\"Vishwamitra Mishra\",\"image\":{\"@type\":\"ImageObject\",\"inLanguage\":\"en-US\",\"@id\":\"https:\/\/vmlogger.com\/excel\/#\/schema\/person\/image\/\",\"url\":\"https:\/\/vmlogger.com\/excel\/wp-content\/uploads\/sites\/11\/2022\/07\/avataaars-1.png\",\"contentUrl\":\"https:\/\/vmlogger.com\/excel\/wp-content\/uploads\/sites\/11\/2022\/07\/avataaars-1.png\",\"width\":528,\"height\":560,\"caption\":\"Vishwamitra Mishra\"},\"logo\":{\"@id\":\"https:\/\/vmlogger.com\/excel\/#\/schema\/person\/image\/\"},\"description\":\"My name is Vishwamitra Mishra. Friends Call me Vishwa. I hold a Bachelor\u2019s Degree in Computer Science from D.A.V.V. Indore & currently working as a Technical Lead having over 7 years of experience.\",\"sameAs\":[\"http:\/\/www.learnexcelmacro.com\",\"http:\/\/www.facebook.com\/vmlogger\",\"https:\/\/twitter.com\/https:\/\/www.twitter.com\/learnexcelmacro\",\"https:\/\/www.youtube.com\/c\/VMLogger\"],\"url\":\"https:\/\/vmlogger.com\/excel\/author\/vishwamitra\/\"}]}<\/script>\n<!-- \/ Yoast SEO Premium plugin. -->","yoast_head_json":{"title":"UDF to Convert Numbers to Letters - Spell Currency in Words","description":"UDF to convert numbers to letters. VBA to spell number in words. Spell currency in words. Spell Indian currency to words. Formula to convert Number in Words","robots":{"index":"index","follow":"follow","max-snippet":"max-snippet:-1","max-image-preview":"max-image-preview:large","max-video-preview":"max-video-preview:-1"},"canonical":"https:\/\/vmlogger.com\/excel\/2018\/09\/vba-to-spell-numbers-to-letters\/","og_locale":"en_US","og_type":"article","og_title":"UDF to Convert Numbers to Letters","og_description":"UDF to convert numbers to letters. VBA to spell number in words. Spell currency in words. Spell Indian currency to words. Formula to convert Number in Words","og_url":"https:\/\/vmlogger.com\/excel\/2018\/09\/vba-to-spell-numbers-to-letters\/","og_site_name":"Let's excel in Excel","article_publisher":"http:\/\/www.facebook.com\/vmlogger","article_author":"http:\/\/www.facebook.com\/vmlogger","article_published_time":"2018-09-25T06:34:28+00:00","article_modified_time":"2022-08-17T19:14:42+00:00","og_image":[{"width":1051,"height":545,"url":"https:\/\/vmlogger.com\/excel\/wp-content\/uploads\/sites\/11\/2022\/08\/Spell_Numbers_To_Letters.png","type":"image\/png"}],"author":"Vishwamitra Mishra","twitter_card":"summary_large_image","twitter_creator":"@https:\/\/www.twitter.com\/learnexcelmacro","twitter_site":"@learnexcelmacro","twitter_misc":{"Written by":"Vishwamitra Mishra","Est. reading time":"11 minutes"},"schema":{"@context":"https:\/\/schema.org","@graph":[{"@type":"Article","@id":"https:\/\/vmlogger.com\/excel\/2018\/09\/vba-to-spell-numbers-to-letters\/#article","isPartOf":{"@id":"https:\/\/vmlogger.com\/excel\/2018\/09\/vba-to-spell-numbers-to-letters\/"},"author":{"name":"Vishwamitra Mishra","@id":"https:\/\/vmlogger.com\/excel\/#\/schema\/person\/7500a107b0b2d35a8492acf0d11fc8e5"},"headline":"UDF to Convert Numbers to Letters","datePublished":"2018-09-25T06:34:28+00:00","dateModified":"2022-08-17T19:14:42+00:00","mainEntityOfPage":{"@id":"https:\/\/vmlogger.com\/excel\/2018\/09\/vba-to-spell-numbers-to-letters\/"},"wordCount":1360,"commentCount":1,"publisher":{"@id":"https:\/\/vmlogger.com\/excel\/#\/schema\/person\/7500a107b0b2d35a8492acf0d11fc8e5"},"articleSection":["Excel Functions","Excel Macro","Popular Articles","User Defined Function"],"inLanguage":"en-US","potentialAction":[{"@type":"CommentAction","name":"Comment","target":["https:\/\/vmlogger.com\/excel\/2018\/09\/vba-to-spell-numbers-to-letters\/#respond"]}]},{"@type":"WebPage","@id":"https:\/\/vmlogger.com\/excel\/2018\/09\/vba-to-spell-numbers-to-letters\/","url":"https:\/\/vmlogger.com\/excel\/2018\/09\/vba-to-spell-numbers-to-letters\/","name":"UDF to Convert Numbers to Letters - Spell Currency in Words","isPartOf":{"@id":"https:\/\/vmlogger.com\/excel\/#website"},"datePublished":"2018-09-25T06:34:28+00:00","dateModified":"2022-08-17T19:14:42+00:00","description":"UDF to convert numbers to letters. VBA to spell number in words. Spell currency in words. Spell Indian currency to words. Formula to convert Number in Words","breadcrumb":{"@id":"https:\/\/vmlogger.com\/excel\/2018\/09\/vba-to-spell-numbers-to-letters\/#breadcrumb"},"inLanguage":"en-US","potentialAction":[{"@type":"ReadAction","target":["https:\/\/vmlogger.com\/excel\/2018\/09\/vba-to-spell-numbers-to-letters\/"]}]},{"@type":"BreadcrumbList","@id":"https:\/\/vmlogger.com\/excel\/2018\/09\/vba-to-spell-numbers-to-letters\/#breadcrumb","itemListElement":[{"@type":"ListItem","position":1,"name":"Home","item":"https:\/\/vmlogger.com\/excel\/"},{"@type":"ListItem","position":2,"name":"Excel Macro","item":"https:\/\/vmlogger.com\/excel\/macro\/"},{"@type":"ListItem","position":3,"name":"UDF to Convert Numbers to Letters"}]},{"@type":"WebSite","@id":"https:\/\/vmlogger.com\/excel\/#website","url":"https:\/\/vmlogger.com\/excel\/","name":"Let's excel in Excel","description":"Let's share knowledge","publisher":{"@id":"https:\/\/vmlogger.com\/excel\/#\/schema\/person\/7500a107b0b2d35a8492acf0d11fc8e5"},"potentialAction":[{"@type":"SearchAction","target":{"@type":"EntryPoint","urlTemplate":"https:\/\/vmlogger.com\/excel\/?s={search_term_string}"},"query-input":"required name=search_term_string"}],"inLanguage":"en-US"},{"@type":["Person","Organization"],"@id":"https:\/\/vmlogger.com\/excel\/#\/schema\/person\/7500a107b0b2d35a8492acf0d11fc8e5","name":"Vishwamitra Mishra","image":{"@type":"ImageObject","inLanguage":"en-US","@id":"https:\/\/vmlogger.com\/excel\/#\/schema\/person\/image\/","url":"https:\/\/vmlogger.com\/excel\/wp-content\/uploads\/sites\/11\/2022\/07\/avataaars-1.png","contentUrl":"https:\/\/vmlogger.com\/excel\/wp-content\/uploads\/sites\/11\/2022\/07\/avataaars-1.png","width":528,"height":560,"caption":"Vishwamitra Mishra"},"logo":{"@id":"https:\/\/vmlogger.com\/excel\/#\/schema\/person\/image\/"},"description":"My name is Vishwamitra Mishra. Friends Call me Vishwa. I hold a Bachelor\u2019s Degree in Computer Science from D.A.V.V. Indore & currently working as a Technical Lead having over 7 years of experience.","sameAs":["http:\/\/www.learnexcelmacro.com","http:\/\/www.facebook.com\/vmlogger","https:\/\/twitter.com\/https:\/\/www.twitter.com\/learnexcelmacro","https:\/\/www.youtube.com\/c\/VMLogger"],"url":"https:\/\/vmlogger.com\/excel\/author\/vishwamitra\/"}]}},"_links":{"self":[{"href":"https:\/\/vmlogger.com\/excel\/wp-json\/wp\/v2\/posts\/15002"}],"collection":[{"href":"https:\/\/vmlogger.com\/excel\/wp-json\/wp\/v2\/posts"}],"about":[{"href":"https:\/\/vmlogger.com\/excel\/wp-json\/wp\/v2\/types\/post"}],"author":[{"embeddable":true,"href":"https:\/\/vmlogger.com\/excel\/wp-json\/wp\/v2\/users\/45"}],"replies":[{"embeddable":true,"href":"https:\/\/vmlogger.com\/excel\/wp-json\/wp\/v2\/comments?post=15002"}],"version-history":[{"count":0,"href":"https:\/\/vmlogger.com\/excel\/wp-json\/wp\/v2\/posts\/15002\/revisions"}],"wp:featuredmedia":[{"embeddable":true,"href":"https:\/\/vmlogger.com\/excel\/wp-json\/wp\/v2\/media\/242467"}],"wp:attachment":[{"href":"https:\/\/vmlogger.com\/excel\/wp-json\/wp\/v2\/media?parent=15002"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"https:\/\/vmlogger.com\/excel\/wp-json\/wp\/v2\/categories?post=15002"},{"taxonomy":"post_tag","embeddable":true,"href":"https:\/\/vmlogger.com\/excel\/wp-json\/wp\/v2\/tags?post=15002"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}