Skip to main content

Posts

Showing posts with the label Excel

Excel Macro code for Converting Indian Currency Digit In Words Without Paise Remarks

Microsoft Excel macro code for converting digit into words in Indian currency format without paise remarks: For using the code enable macro in Excel sheet copy past below codes: Option Explicit 'Main Function  Function SpellNumber_Indian(ByVal MyNumber)     Dim Dollars, Cents, Temp     Dim DecimalPlace, Count, x     ReDim Place(9) As String     Place(2) = " Thousand "     Place(3) = " Lacs "     Place(4) = " Crores "     Place(5) = " Hundred Crores " ' String representation of amount.     MyNumber = Trim(Str(MyNumber)) ' Position of decimal place 0 if none.     DecimalPlace = InStr(MyNumber, ".") ' Convert cents and set MyNumber to dollar amount.     If DecimalPlace > 0 Then         Cents = GetTens(Left(Mid(MyNumber, DecimalPlace + 1) & _         "00", 2))         MyNumber ...