аЯрЁБс>ўџ ўџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ§џџџ   OўџџџH) !"#$%&'(*+,F.801234567ўџџџ9:;D=>?@ABC-EўџџџGITJKLMNPўџџџQRSUўџџџўџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџRoot Entryџџџџџџџџ РF œkњCР 6ъй йJWorkbookџџџџџџџџC _VBA_PROJECT_CUR" Зj3GŸР Ew4GŸРVBAџџџџџџџџ !ƒ3GŸР€ъD4GŸР  !"#$%&'()ўџџџ+,-./0123456789:;<=>?@ўџџџBCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_`aўџџџcdefghijklmnopqrstuvwxyz{|}~€ ЏЭI@‡сАСт\p rajan gupta BАaР=гК ThisWorkbookœЏМ=h<L,Ž<X@"Зк1ШџArial1ШџArial1ШџArial1ШџArial1ШџArial1Ш Arial "Rs."#,##0_);\("Rs."#,##0\)% "Rs."#,##0_);[Red]\("Rs."#,##0\)&!"Rs."#,##0.00_);\("Rs."#,##0.00\)+&"Rs."#,##0.00_);[Red]\("Rs."#,##0.00\)=*8_("Rs."* #,##0_);_("Rs."* \(#,##0\);_("Rs."* "-"_);_(@_).))_(* #,##0_);_(* \(#,##0\);_(* "-"_);_(@_)E,@_("Rs."* #,##0.00_);_("Rs."* \(#,##0.00\);_("Rs."* "-"??_);_(@_)6+1_(* #,##0.00_);_(* \(#,##0.00\);_(* "-"??_);_(@_) Єm/d/yyyyЅ "Rs."#,##0.00рѕџ Р рѕџ єР рѕџ єР рѕџ єР рѕџ єР рѕџ єР рѕџ єР рѕџ єР рѕџ єР рѕџ єР рѕџ єР рѕџ єР рѕџ єР рѕџ єР рѕџ єР р Р р+ѕџ јР р)ѕџ јР р,ѕџ јР р*ѕџ јР р ѕџ јР рЅ Р р Р р Р р Р “€џ“€џ“€џ“€џ“€џ“€џ`…бSheet1ŒЎŽ fig2wordsСС`iќ9$This addin converts numbers to wordsexampleџ Ž ЏЭI@ бэ  dќЉёвMbP?_*+‚€%џСƒ„M@Epson Stylus 220Pдj­€ы pdhhъђEpson Stylus 220LPT1:Ё"dhhр?р?U} m} m }    џ џ џ  џџ§ § ~ V4o$qџџрќ#$РBџ здPD >Ж@я7К Sheet1 LфzSуЈ6І6џџ#ˆЖџџџџџџџџџџџџщrrБ е‰ ЇФЮ—MРFшrrБ е‰ ЇФЮ—MџџџџџџџџџџџџxџџMEџџџџџџџџџџпџџ џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџThisWorkbookџџџџ*ОSheet1 џџџџANumbertoFigures  џџџџbО NumberToTextџџџџџџџџџџџџРџџџџџџџџџџ(SLџџџџSџџџџS”џџџџ<џџџџџџN0{00020819-0000-0000-C000-000000000046}А€ўџџџџџџџ(џџџџџџџџџџ%џџџџ ƒўџџџџџџџ`џџџџџџџџџџџџџџ %‚ џџџџўџџџџџўџџџџџџџџџџџ %џџџџ` Rџџџџ`џџџџџџџџџџџџ|џџџџџe˜œiƒўџџџџџџџџџџџџџџџџџ џџџџ8џџџџ˜џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ` џџџџџџџџџџџџџџџџ џџџџџџџџџџџџџџџџџџџџh8@œ˜џџџџџџџџџџџџџџџџџџџџџџџџџџпўЪ"€ џџџџ џџџџx– oџџџџџџџџџџбАAttribute VB_Name = "ThisWorkbook" ŒBasŒ0{00020P819-0C$0046} |GlobalаSpac’False dCreatablPredeclaIdБTru BExposeTemplateDeriv’Bustomi6zD2P€€ Sub …‘_Open() End Œф8Я”$Ј6Є6џџ#ˆЖџџџџџџџџџџџџыrrБ е‰ ЇФЮ—M РFъrrБ е‰ ЇФЮ—MџџџџџџџџџџџџxџџMEџџџџџџџџџџпџџџџџџџџџџџџџџџџџџџџџџџџџџ џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџP[LџџџџSџџџџS”џџџџ<џџf<џџ<џџ<џџ<џџџџџџN0{00020820-0000-0000-C000-000000000046}XШ€ўџџџџџџџ(џџџџџџџџџџ% %ƒўџџџџџџџ`џџџџџџџџџџџџџџ%‚ џџџџўџџџџџўџџџџџџџџџџџ% Žџџџџ`џџџџџџџџџџџџxџиeœ!ƒџџџџ џџ џџџџ„џџџџ˜iƒўџџџџџџџџџџџџџџџџџ  % % %iƒўџџџџџџџџџџџџџџџџџ @ии „џџџџxџџџ0€џџџџ „џџџџxџџџ0€H „џџџџxџџџА€0 % „џџџџxџџџа€ %  „џџџџxџџџј€Od % „џџџџxџџџ€ш %и˜џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџРџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџX „џџџџxџџџ(€шџџџџрXџџџџџџџџџаhџџџ џџ џџ@ўџXџџџ џџ џџ@Tџџџ џџ џџ@ўџDџџџ џџ џџ@ўџ4џџџ џџ џџ@ўџ$џџџ џџ џџџџ@ўџџџџ џџ џџџџџџџџџџџ џџ џџџџ@ўџџџџ џџ Pџџџџ8˜џџџџџџџџџџџџџџџџ˜џџџџџџџџџџџџџџџџџџџџh8@ џџџџџџџџџџџџџџџџџџџџџџџџџџпўЪ" € џџџџџџџџ џџџџ8џџџџ8–˜oџџџџџџёАAttribute VB_Name = "She@et1" шBast0{000Р20820- C$0046} |Global!ФSpac’False dCreatablPre declaIdЋTru BExposeTemplateDeriv$’BustomlizD2P€€ Sub Works’_SelectionChange(ByVal Target As R ) End №,диџџџџ4, Ј6‡НџџЖџџџџџџџџџџџџџџџџџџџџџџџџxџџMEџџџџџџџџџџпџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџP<џџ<џџš<џџ<џџ< џџ<џџ<џџ<џџџџџџШHƒшџџџџџџ0џџџџџџџџџџџџџџ%џџџџџџџџh№xџџџџџ%Ђ jџџџџџџ`@џџџџџџџџ+џџџџ`џџџџџџџџџџџџŒў@аџџџџŒIƒ0џџџџ џџ џџџџџџ€џџџџшаџџџџџџџџџџџџџџџџаџџџџџџџџџџџџџџџџџџџџˆџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџHАpџџџџџџџџPКPjџџ џџ8hџџџ џџ џџџџ@ўџXџџџ џџ Xџџџџ№џџџџЈTџџџџџ џџџџ@ўџDџџџ џџ џџџџˆ(4џџџ џџ џџџџˆ$џџџ џџџџџџ@ўџџџџџџ џџџџџџџџ0 џџџ џџџџџџ`pќўџџ џџ`Xьўџџ џџј@Фмўџџ џџ`Ьўџџ џџШ@ШМўџџ џџџџџџ@ўџЌўџџ џџ џџ@ўџœўџџ џџ xџџџџpŒўџџ џџ џџџџџџџџX|ўџџ џџџџџџџџџџ@џџџџŒў@ џџџџ‚ƒ„…†‡ˆ‰Š‹ŒŽўџџџ’“”•–—˜™š›œžŸ ЁЂЃЄЅІЇЈЉЊЋЌ­ЎЏАБВГДЕЖЗИЙКўџџџМНОПРСТУФХЦЧШЩўџџџЫЬЭЮЯабвгдежзийклмнопрстуфхцчшщъыьэюя№ёђѓєѕіїјљњћќ§ўџŒџџџџ џџ џџџџџџ€џџџџџџџџhџџџџџџџџџџџџџџџџhџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ8Лuж;пўЪ€B  5 Pјx€ ˆ`˜ ЈИ а!риРАИ!ј   @64H€ € џџџџ€ џџџџˆ€ џџџџџџџџ8]ђh– Ш'џџџџHџџџџhџџџџџџџџ(џџџџhџџџџPџџџџ жЌœЖ Rupees Nil' ’(zџџ kџџ˜ жЌœzџџhkџџ` жЌd'и иЌ$P'Ш ж'а а j%œ'Ф Ш j%œ'Ц ЦЖœЖRupees ФЖ Only'ШdџџРЖRupees ФЖ And Paise ЦЖ Only'Шkџџ€iџџh 0$РЌ$К'жџџџџpzџџШkЖNumber too large' ФЖNumber too largeœˆЖRupee One Only'8џџџџˆџџџџ№ 0$ќ'0џџџџHџџџџˆБAttribute VB_Name = "NumbertoFigures" Dim ns As New |ToText Public Function Rs@Words(J)…hSШng $ФREVINRD( nq1ou@nd(Val, 2) If #1 Then  i5"Rupee OnlyБExit“ E nd If G0Gй€ril—!ƒb2;I* 100 d@ecpart RPight„`2ƒ`m„anFix(„ €lr\„ ns.Cшonv€Н(}‰„Ю too la№rge"b„Èѓ‡paiseOD2 CЩ"Efinal@:C^s" & 1G)& "РbУalsЈe ^ AРgPС"? Dp} Aw С№ФдАџџџџЬ( Ј6JџџЖџџџџџџџџџџџџџџџџџџџџџџџџxџџMEџџџџџџџџџџпџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ(< џџ<џџь<џџџџ<џџџџPˆ ЄЌœ ЄЌ œH   Є ЄЌ  Ќ Ќ $В ЄЌ $В Ј$А' dИ   Є$В' k˜k  'œ   ($$'œE'Вi–Ш žъЌKTџџџџhЖ ONE'ВЌKTЖ TWO'Вџџџџ(ЌKTЖ THREE'В'ЌKTЖ FOUR'ВЌKTЖ FIVE'ВЌKTЖ SIX'ВЌKTЖ SEVEN'ВЌKTЖ EIGHT'ВЌ KTЖ NINE'ВџџџџXЌ KTЖ TEN'Вџџџџ€Ќ KTЖ ELEVEN'ВЌ KTџџџџРЖ TWELVE'ВЌ KTЖ THIRTEEN'ВЌKTЌKTџџџџXџџџџ`џџџџP џџџџ` џџџџр џџџџ`Ж FOURTEEN'ВRupeesЖ FIFTEEN'ВЌKTЖ SIXTEEN'ВЌKTЌKTџџџџшЖ SEVENTEEN'ВPaiseЖ EIGHTEEN'В' jџџџџ`џџџџШЌKTЖ NINETEEN'ВЌKTЖ TWENTY'ВЌKTЖ THIRTY'ВЌ(KTЖ FORTY'ВЌ2KTЖ FIFTY'ВЌ<KTЖ SIXTY'ВЌFKTЖ SEVENTY'ВЌPKTЖ EIGHTY'ВЌZKTЖ NINETY'ВSџџ№Ж'Вnџџрiџџиџџџџ€ џџџџ(џџџџ‡ДAttribute VB_Name = "NumberToText" ŒBasŒ0{FCFB3D2A-A0FA-1068-A738-08002B3371B5} |GlobalаSpac’False dCreatablPredeclaIdБCExposeTemplate Deriv–Cu@stomiz E Public Function Convert€(ByVal €ue As Do)€e)SГng '…of !Е to Ж On Error  Resu€ЦNС Dim 8str ' loŽc„"9ƒAbs Eƒ Decimal’ LoopIndexAIntegerC Remainƒ5C@Array(0 To ў5Т:ЩСYУ>AEA-ИTxtNХG)@wЈ7 15*2332  Ч" CRORE€ЃЦ‚" LРAKH(S)IТ" THOUSA ND‰B" HUАNDREAY=У}˜ F@o‡Q= BFЃ@(Чi= († -ШMod (10 .^…G) /!˜ IfСŽ Then Beexp ІQѕ@šo Юge@5Exit†X End Ifтg> 99kD хO=&Q&&_)x & F,Ї|ЅQ=і ‰' *y Т„`9'<>+Тъ> 1y€I`_cM(((ч `1‡110))Ѓ€.Р * Ё&!3ї‡Ў•E‚(Šц яЖ(e4F(П)m/Ig=х §сŒ Ц5b@F Ы,ЦП,џЉ,Ц ^Р*z,2_,п@І^…-L6Х )o Щe/ЄIFСi(D, vbProperўC@тР  eТ€Ф Ы ЬЇФJ=SХ Selpect a Šb18 iЁz ONšB€žRTWO€}BРSHREv†4ЏЂFOUR… X " FIVv6rSIXe ]o`SEVEN E8rEIGHšTE9OBNIЌ10OBTЧ1вg2EL9 1ЯcаTWEL'1dрHIRTEhOƒЯAŠŸ„IFzпџsаz/tсš“rЙ ПƒБ2Gџƒ@NTYЅ3oodAf4ocFєORЧ5_T№Жо6_SбV7_T{Вv8s’f9?ocrfГdo3 "oё\#DэH aЄ9IndianRupeeџџџџ/IndianRupeeFormat$џџџџџџџџџџџџ‘g _VBA_PROJECTџџџџџџџџџџџџ<ЧdirџџџџџџџџџџџџЛИ%ƒъџџџџџџ0џџџџџџџџџџџџџџ%џџџџЈџџџџј8шPxџџџџџxџџџџџџŒшhџџџ џџ џџџџш+ќџџџџ`џџџџџџџџџџџџдў@(џџџџ ŒHџџЂ юџџџџџџ@џџџџџџџџџџџџиIƒњџџџџ џџ џџџџџџ€hЈџџџџ@џџџџџџџџџџџџџџџџџџџџџџџџPрџџџџџџџџџџџџ(џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџPАhhџџџџP+д фˆJ л /Ј6ŸНџџ€ЖџџџџџџџџџџџџэrrБ е‰ ЇФЮ—M*=ћќњ hЇ8+3qЕьrrБ е‰ ЇФЮ—MџџџџџџџџџџџџxџџMEџџџџџџџџџџпџџ џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ SџџџџS џџџџS”џџџџ<(џџ<,џџ<џџ<џџ<џџ<џџ< џџ<$џџ<0џџ<4џџ<8џџ<<џџ<џџџџџџN0{FCFB3D2A-A0FA-1068-A738-08002B3371B5}ˆР€ўџџџџџџџ(џџџџџџџџџџ%,œШ`џџџџџџџџџџџџ˜ўDpџџ77Мiƒžџџџџ џџџџ„ iƒўџџџџџџџџџџџџџџџ `„ џџџџtџџџџџ`„Ђplџџџџџ`„Єџџџџdџџџџџ|`„Іџџџџ\џџџџџ`„ЈџџџџZџџџџџ`„ЊџџџџPџџџџџ „ЌP8џџџp’X`„Ўџџџџ0џџџџџ „АјџџџР’Ј Вџџџџ`џџџџџџџџџџџџTџ џџ DD8Мiƒžџџџџ џџџџ(„ф­Eiƒўџџџџџџџџџ џџџџџџ џџџџ0Шџџџџƒўџџџџџџџ€џџџџџџџџџџџџџџ %а8Шџџџџа(џџџџxШ@џџџџрА(џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџPиhаˆџџџџџџрxџџџџџ`xџџx џџџџАџџџџџ (Шџџџиџџџџ џџџџаВ($ршœВ($џџџџџраџџџ џџ џџр(ќўџџџџ џџ@ўџјўџџџџ џџ@ўџшўџџ џџ џџА@иўџџ џџ џџ@ўџШўџџ џџ џџ@ўџИўџџ џџ џџ@ўџЈўџџ џџ џџр˜ўџџ џџ џџџџ0№*џџџџ џџџџА(џџџџџџџџџџџџЈџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџЈџџџџР(xџџ џџи lџџџ џџ џџаџџ џџјdџџџџџ џџџџџџџџџџџџ(Tџџџ џџ џџџџ(шTџџџ џџ џџџџ(аџџџџxp(џџџџрА(џџџџџџџџџџџџџџџџџџџџџџџџаџџџџ№џџџџpџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ џџџџџџџџџџџџџџџџџџџџџџџџџџџџ(0(dџџџџџ џџџџџџџџШџџџџџџџџPTџџџ џџ џџџџџџџџ@џџџџXdџџџџџ џџџџџџ џџИ0Tџџџ џџ ИџџџџTџџџ џџ NџџџџшџџџџА0џџџџџџџџџџџџџџџџШџџџџџџџџџџџџџџџџџџџџџџџџX@$џџџџџџџџџџџџџџџџџџџџџџџџџџпўЪ|€ џџџџB € $0€ џџџџ€8€@€H€P€X€`€h€x€€ АРаш08:+P˜ ИР Ш *и$ј  ( 8PjH˜ 6 Р$Ш№ј   Pj0€%ˆ Ј€ џџџџА&И€ џџџџаB ир ш ј ( 0@ HX `p xˆ   ЈИ Ри рј  0 8P X ЈИ Ра ши ( 0H P` hx € ˜Ј АР Ши р№ ј  € џџџџ€ џџџџ€ џџџџ€ џџџџ€ џџџџ€ џџџџ€ џџџџ€ џџџџџџџџ8–0р Convertion of Number to TextrishЩ]ђА]ђШ]ђр]ђј]ђ]ђ(]ЌЌђ@]ђx]ЌЌђЌЌ+ЌЌЌ+ЌЌЌ+ЌЌЌ+ЌЖ CROREЌ+АЖ LAKH(S)Ќ+АЖ THOUSANDЌ+АЖ HUNDREDЌ+А ž'Єџ ЈўЌЌ’'иЈ Є ЄЌ Ј$Ќ  Ќ Ј$Ќ'ЂЌ ЮœA@иЖNumber too large'œz€kx ЂЌc œ   Ђ$œ Ј$А'  Є ЂЌ Ј$Ќ 'Єd ЂЌœ ЂЌ œH   Ђ ЂЌ  Ќ Ќ $В ЂЌ $В Ј$А' d    Ђ$В Ј$А' kx Є ЂЌ Ј$Ќ 'ЄkHk@џ ЈўШњЈ`џџџџџџџџџџџџdџ@@џџџџŒIƒ0џџџџ џџ џџџџџџ€Fџџџџ˜hшXџџџ џџ џџџџШ(Hџџџ џџ џџџџ@ўџ8џџџ џџ џџџџџџџџРџџџџџџџџџџџџhˆ(џџџ џџ џџџџ@џџџ џџџџџџ@ўџџџџ џџ H@ўџјўџџ џџ @ўџшўџџ џџ hиўџџ џџџџџџјџџџџ@џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџјџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџјшџџџџXxџџџџџџџџџ џџџџ(hџџџ џџ џџџџdџџџџџ џџџџpџџџџXџџџџдўџџџџ џџџџHџџџџјџџџџџџџџџџџџЈџџџџјџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ8Лuж;пўЪ€B ( € џџџџB 8#ј(( x €H4N  `hр@џџџџ8]ђјi( 0 ю%ц'њas Str–џџџџH–Јiџџ( ўЌ›GxjnStr(I 0'њЙџџџџHЌ'ў ўЌ b  њЖ,„'ў њ ўЌ $м њ њ ў $P'0(џџџџx њ$Р'ќџџџџи њЖRs.„œ њ њЌ $P'њHkџџРџџџџИџџџџ5БAttribute VB_Name = "IndianRupeeFormat" Dim RF €As New „ Public Function INR(Nu mber)^SТ0ng ,ИRF.АЌJ End? RREVЗU Rf‰_(, "Rs.") Thenmig„ht(Len €) - 3))sDIf€5osi‚[= 1€so While P > 0I In‡8,"$I"f= 0@ Exit Do cƒ„€|LefE†-- 1)) & R?“S…Wq"ƒ& РLoop ‹ Val‚mЄДГ€0* pH‚dф SureshsA@ddins@T@ = +x Лu ж; J< rstdole>std@olerf%\*\G{00020430-;C 0046}#2.0#0#C:\WINDOWS\SYSTEM\StdOle2.tlb#OLE AutoРmation/AƒDOffic„DODf€ic‚D €…€D2DF8D04C-5BFA-101B-BHDE5€DAA€B4€2ˆDProgram Files\Microso(ft 6\€џ_B_var_numbstr:rnumbstЋ/numbsГ0numbЂ]NumњК€џ_DefaultjТxo €џ_B_var_NumberLЈav\bcd+xsj€џ_B_var_NumStringЭъ€џ_B_var_tnumber„Worksheet_SelectionChangeб4TargetЌFText2Д~ €џ_B_var_Text2ЁB€џSelectionChangeуn Figure2Wordš NumberToTextєConvertѕј„џValueфKstrTextш locNumberфчAbsValue‹ DecimalValue!Є LoopIndexKќRemaineNumArrayЅх TempStringSˆTxtArrayA0 NumValString FormatNumber/§ formatnumbe,A€џ_B_var_formatnumbeŽ2RoundЌDecimalPositionї€џ_B_var_DecimalPosition/бDecPosдП €џ_B_var_DecPos>:instЮ\ €џ_B_var_inst:Тdecpartў`€џ_B_var_decpart‚d _B_var_Right9й _B_var_StrЈ’manpartQ€џ_B_var_manpartTu _B_var_LeftQсnumber1ю2Number2я2strtext2€џ_B_var_number1ё&€џ_B_var_Number2ђ&€џ_B_var_strtext2#ШModule2c„џMacro1еNsunИе €џ_B_var_sunœф8ЃЛ Ј6Jџџ€ЖџџџџџџџџџџџџяrrБ е‰ ЇФЮ—M*=ћќњ hЇ8+3qЕюrrБ е‰ ЇФЮ—MџџџџџџџџџџџџxџџMEџџџџџџџџџџпџџ џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџPSџџџџS џџџџS”џџџџ<џџ<џџ<џџ<џџ<џџџџџџN0{FCFB3D2A-A0FA-1068-A738-08002B3371B5}0и€ўџџџџџџџ(џџџџџџџџџџ%hƒўџџџџџџџ`џџџџџџџџџџџџџџ %@Hџџџџџџ(xџџџџџЈџџџџџџџџ,цџџџџ`џџџџџџџџџџџџ˜§@јџџ##Мiƒžџџџџ џџџџ„iƒўџџџџџџџџџџџџџџџ џџџџРџџџџ€џџџџ(јџџџџџџџџџџџџџџџџ€џџџџџџџџџџџџџџџџаXџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ€р˜џџџџрPЌњџџџџџџШhџџџ џџ ИˆXџџџ џџ ˆ@Hџџџ џџџџџџ8џџџ џџ@и(џџџ џџ@ўџџџџ џџ xаџџџ џџ@ўџјўџџ џџ (шўџџ џџ џџџџиўџџ џџ@ўџШўџџ џџ `@Иўџџ џџ @ўџЈўџџ џџ @ўџ˜ўџџ џџ @ўџˆўџџ џџ Р@xўџџ џџ @ўџhўџџ џџ @ўџXўџџ џџ @ўџHўџџ џџ №8ўџџ џџ @ўџ(ўџџ џџ P@ўџџ џџ @ўџўџџ џџ @ўџј§џџ џџ @ўџш§џџ џџ €и§џџ џџ @ўџШ§џџ џџ џџџџ@И§џџ џџ @ўџЈ§џџ џџ @ўџ˜§џџ џџ џџџџ0џџџџШИџџџџџџџџџџџџџџџџИџџџџџџџџџџџџџџџџџџџџџџџџ8@ џџџџџџџџџџџџџџџџџџџџџџџџџџпўЪ#B € ,Hи  '0x&9ˆАИJvШ Jv0€ˆfЃ˜fЃ€ˆfЃ˜‚а Ј +Р Иа€ џџџџ€ џџџџџџџџ(–Иi( 0'а( 0Ќd'иto и$DЌ$P'Шр& Convert Number to Indian Rupee Format аЌœЖRs. 0Ж ##,##0.00$Ќ'Ш#kџџ8 аЌœ аЌЌ$њЖ, аЌЌ$њЖ, аЌ$P'Шkџџа аЌœ аЌЌ$њЖ, аЌЌ$њЖ, аЌ$P'Шkџџh аЌœ аЌЌ$њЖ, аЌЌ$њЖ, аЌЌ$њЖ, аЌ$P'Шkџџш аЌ œ аЌЌ$њЖ, аЌЌ$њЖ, аЌЌ$њЖ, аЌ$P'Шkџџh аЌ œ аЌЌ$њЖ, аЌЌ$њЖ, аЌЌ$њЖ, аЌ$P'Шkџџш аЌ œ аЌЌ$њЖ, аЌЌ$њЖ, аЌЌ$њЖ, аЌЌ$њЖ, аЌ$P'ШkџџH аЌ œ Ш'цdџџџџџџшkџџ žЌ$К'0џџџџџџџџЖRs. ШЖ. Ш'цџџџџџџџџAВAttribute VB_Name = "IndianRupeeˆ" ˆBasˆ0{FCFB3D2A-A0FA-1068-A738-08002B€3371B5} |@GlobalЮSpac’False dCreatablPredeШclaIdАC@ExposeTemplateDeriv–Cus tomiz EPublic Fun@ction €“Format(ByVal €ue As Do€e)S€Вng ' Convert Number to ƒЖ#ee ƒ$ = Round(‚), 2) manpa = Fix(ƒ 2€†ƒ * `100 ”Right(str 2)(If Len(Ф) <= 5 Then 0 fin4@„Rs0." &D'Ф, "##,##0.00"@ End If Э= 6ŒMid…, 1e€)Р",AŠ2(†У/„), 3šЊ7œ2”3З89kР: @4w#9?@­5гП5@10м3є1+ ­Š#6пж1м1дo R5Ћ#*7?3>7&q†Œ|"ЄqЃs& Ц"bs} EЊ ŸtuЅ— !Щ’ €џ_B_var_SubН’calB} €џ_B_var_calS:funcFigure2WordŽˆfig2wordžі clipboardŒy€џ_B_var_clipboardPs €џApplicationЅ*„џMacro2жN €џSelectionZЎ€џCopyЦП €џActiveSheet%N€џPaste €џCutCopyModeЈsettext—уAX€џ_B_var_AЂgettextі activsheetе€џ_B_var_activsheet?ќ €џ_B_var_callЗйwordЕk €џ_B_var_word!б €џ_B_var_PasteЩЩ €џxlClipboard6•€џXlClipboardFormatН€џxlClipboardFormatTextцp finalstringЭЋ€џ_B_var_finalstringЎStrConvx'_B_var_StrConv{ vbProperCaseшї IndianFormattё _B_var_Formatрforma– €џ_B_var_formaТп €џNumberFormatеR€џ_B_var_NumberFormat1Œcurrencyformatu\€џ_B_var_currencyformatFFormatCurrencyM| formatcurrenc(L€џ_B_var_formatcurrencЦ€џ_B_var_CurrencyШ„џMacro3зNModule3d €џCommandBars €џControlsЬKAddїr€џmsoControlButtonnѕ€џIDІ]Before‰о Workbook_Open›сItemзz UserForm1)ж frmOptionЩцMSFormsCUserFormNFrame1ЙOptPlain„ЯOptCurNкFrame2Й OptInclude…ё OptExcludeрфFrame3Й OptProperащOptUpper'OptLowereH €џџџ_B_var_IfPђ proxyrupeeаT€џџџ_B_var_Proxyrupee:У proxyonlyўя€џџџ_B_var_ProxyonlyТщProxyonl Ќ€џџџ_B_var_Proxyonl–ƒfrmУ €џџџ_B_var_elseifqm vbUpperCasek. vbLowerCaseТр€џShowѕvbModaltcmdOK' cmdCancelЭ cmdOK_ClickИ€џClickŠу€џџџ_B_var_Worksheet…ј recalculateаƒ €џCalculateFull|іcmdCancel_Click\е€џHide9z €џCalculateћ• €џActiveCellНЗ proxypaise8œ€џџџ_B_var_proxypaisec Onlyў§fi<] €џџџ_B_var_fiфёRupees щ OptNoOnly§OptOnlyљ/proxyW €џџџ_B_var_proxyƒеFormulaqY Figures2Words Fig2WordsъЌSuFigureЧ]Command1_ClickV“ValнтText1Г~ rupeeparthЁ paisepartBvfinalŽb ommand1_ClickЬamџ  ф*\G{000204EF-0000-0000-C000-000000000046}#4.0#9#C:\PROGRAM FILES\COMMON FILES\MICROSOFT SHARED\VBA\VBA6\VBE6.DLL#Visual Basic For Applications *\G{00020813-0000-0000-C000-000000000046}#1.3#0#C:\Program Files\Microsoft Office\Office\EXCEL9.OLB#Microsoft Excel 9.0 Object LibraryИ*\G{00020430-0000-0000-C000-000000000046}#2.0#0#C:\WINDOWS\SYSTEM\StdOle2.tlb#OLE Automation *\G{2DF8D04C-5BFA-101B-BDE5-00AA0044DE52}#2.1#0#C:\Program Files\Microsoft Office\Office\MSO9.DLL#Microsoft Office 9.0 Object Libraryк*\G{0D452EE1-E08F-101A-852E-02608C4D0BB4}#2.0#0#C:\WINDOWS\SYSTEM\FM20.DLL#Microsoft Forms 2.0 Object Libraryф*\G{2F91E7AF-049F-11D5-89A0-F644C9B7E402}#2.0#0#C:\WINDOWS\TEMP\VBE\MSForms.exd#Microsoft Forms 2.0 Object Libraryс.E р….`ŒM Д оџџџџџџџџЛuж;џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџЈ6ThisWorkbook0<3bd675bbџџThisWorkbookџџІ6щџџ Sheet10=3bd675bbџџ Sheet1џџЄ6*џџNumbertoFigures0?3bd675bbџџшNumbertoFiguresџџ‡Н02 џџNumberToText113bd675bbџџ›NumberToTextџџŸНH5џџIndianRupee153bd675bbџџэIndianRupeeџџJ`С џџ"IndianRupeeFormat133bd675bbџџъ"IndianRupeeFormatџџJx. џџ Рџџџџџџџџџџџџџџџџџџџџџџџџ0џџџџџџџџџџџџџџџџџџџџxџџџџ`џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџHџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџЉFY№1е‰ €g”в-џџџџЋFY№1е‰ €g”в-џџџџ‹Ц•э е‰ ТпbмOџџџџ“Ц•э е‰ ТпbмOџџџџхrrБ е‰ ЇФЮ—MџџџџчrrБ е‰ ЇФЮ—Mџџџџџџџџhџџџџџџџџ‰ Н“;Xџџџџџџџџ€€ џlM €џAs€џcall*€џCurrency=€џdim@€џDoD€џElseE€џelseifQ€џFR€џFalseZ€џGet_€џIfy€џLoopƒ€џNew•€џPublicЏ€џsubВ€џthenО€џWhileExcel€+VBAїтWin16С~Win32MacГВVBA6­#Project1 stdole“` VBAProjectОПOfficeu ThisWorkbook|у €џ_EvaluateйSheet1шSheet2щSheet3ъ WorksheetСўWorkbookkClass1+ StringClassЌo BinaryDigitsђ_NDigitsХ[NTens BClass_Initializen ReadSingleїWNumberЃ- ReadTenthsіktnumber?џ Number2String­xtenthPIleftover-ђhundredJthousandМД NumStringˆс LowerCapsц=str—еnewWord'newStr*_tempStršQ WDelimiterƒTrim@яRight UCase5 Integer2BinaryсqHexNumФGHexŸ˜i`BinNumŒNClassЛ €џInitializeгNModule1bNum2Str[#„џRangeк  _B_var_StringгŠnsn^b1\dutyІNumstrЗŠnumbstr7~™Ё€џџџ_B_var_FЂErroŠMsgBox—R€џџџ_B_var_rupeepart,›€џџџ_B_var_paisepart‡ €џџџ_B_var_final{&BeepУfinwŽ €џџџ_B_var_finˆK SureshsAddinsЪЪ RsinWordsuљRs_ €џџџ_B_var_RsЊѓ RupFormat4NumbertoFigures, IndianRupeeFormatY% IndianRupeeЈТRFѕ^€џOLE_OPTEXCLUSIVEТWIndRupeeдVri €џџџ_B_var_Text1 B _B_var_MidэpINR?ŸREVINRЊƒ€џPositionн€џџџ_B_var_PositionЄДfoB] €џџџ_B_var_foъё €џџџ_B_var_Do ёNFa^IndRupˆ#le^ €џџџ_B_var_leОђRsWordsЂcmyBarьc €џmsoBarTopПy€џVisibleЖг myControl{Ž€џDescriptionText‘€џCaptionxџџZџџџџ›џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџоџџџџџџџџџџџџџџџџџџџџщыэџџlMS€O9.DLL#  9.0 Object Library€C€MSForms>SF€žrms3 €‚D452EE1-E08FXA-8-02608C4D0B„B4зNFM20Œ&Т [L&/;€!~1Р‚Уe‰lAˆl0а0}#0‚l#Р €б50€ rРA2F91E7AF-04961D5-89A0-F644C9B7E40‰b…@„P\VB„E\DO.exd^U7€с.E р….`Œ(M ДСЮТЩ"ТЈ6ГThisWorkbo okGРT(hi€fWik‚bРokЮ Š2к РHBj1зщРэB,QТ!І6"B+BлSheet1GТS@#eР[t1З AqЃ2Ўя *€Oэ Єь рNumbertoFig‘Ё‡Gu`S*b@rр}o`Vijg`r s@2ХЏ2 р@#‰€Ѓ"‡Н!ЂЅ"’ЃToTexЊt#5NHT 4T@~x€#5щ#5ѕo5SA-'ŸН#5(*  IndianR€upeeGDn ЄiaрRЕ€pe`&Œ2˜MoСРЛmJqлkAea@&AI2х‘цa‚'в2пСяЄ. я;Jщ;р“K*mџџџџrU€€€€~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~  ТW„h е‰ ­@ ёК  фџџџџƒ џџџџџџџџџџџџџџЙƒ џџџџџџџџџџџџџџсџџџџџџџџџџџџџџџџџџџџџџСџџџџџџ__SRP_0џџџџ џџџџЪА__SRP_1џџџџџџџџџџџџoPROJECTwmџџџџџџџџџџџџ яPROJECTџџџџ џџџџџџџџџџџџџџџџџџџџџџщџџџџџџџџџџџџџџџџџџџџџџб!) щ ThisWorkbookSheet1Formula NumberToTextSuFigureяРF@C:\PROGRAM FILES\COMMON FILES\MICROSOFT SHARED\VBA\VBA6\VBE6.DLLVBA Yџџџџ 0РF 3C:\Program Files\Microsoft Office\Office\EXCEL9.OLBExcel yџџџџЁ@0РFC:\WINDOWS\SYSTEM\StdOle2.tlbstdole џџџџЉёPLај-њ[НхЊDоR 1C:\Program Files\Microsoft Office\Office\MSO9.DLLOffice aџџџџ‰љ`с.E р….`ŒM ДC:\WINDOWS\SYSTEM\FM20.DLLMSForms ii‘бpЏч‘/Ÿе‰ іDЩЗфC:\WINDOWS\TEMP\VBE\MSForms.exd Aiiб€ Fig2Words +=ћќњ hЇ8+3qЕкTV'# е‰ О!А8•S*=ћќњ hЇ8+3qЕйTV'# е‰ О!А8•S!=ћќњ hЇ8+3qЕClassP№gv№Э›3+3o VBInternal Iџџџџ џџџџqиConvert NumValString @ Rupee One OnlyText Rupees Nil  Rupees Only  And PaiseVBE6.DLL Љ џџџџE ш Љ џџџџЪ  SEVEN EIGHT Љ џџџџk ( CRORE  LAKH(S)  THOUSAND  HUNDRED *The Number is too big Љ џџџџ­ H Љ џџџџS h Љ џџџџЭ ˆ  ONE  TWO THREE FOUR FIVE  SIX NINE  TEN  ELEVEN  TWELVE  THIRTEEN  FOURTEEN  FIFTEEN  SIXTEEN  SEVENTEEN  EIGHTEEN  NINETEEN  TWENTY  THIRTY FORTY FIFTY SIXTY  SEVENTY  EIGHTY  NINETYIndianRupeeFormat Number too large Љ џџџџ ЈModule1duty кРFT;“) е‰ О!А8•SРFS;“) е‰ О!А8•SDРFWorkbook Workbook_OpenиРFV;“) е‰ О!А8•S РFU;“) е‰ О!А8•SDРF WorksheetWorksheet_SelectionChangeFРF SureshsAddinsClass1NumbertoFigures IndianRupee RsinWordsIndRupeeяrrБ е‰ ЇФЮ—MюrrБ е‰ ЇФЮ—M RupFormatўџџџ  ўџџџ  ўџџџўџџџ ўџџџ"#$%ўџџџ'ўџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ Rs. ##,##0.00 , . Љ џџџџe ш Љ џџџџ”  Љ џџџџx (эrrБ е‰ ЇФЮ—MьrrБ е‰ ЇФЮ—M UserForm1INRREVINR Љ џџџџi x S checkRsWordsrU€€€€~~~~w џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ #Converts Numbers to Rupees in WordsNumber ‘ Value )С )б( )Y8Target 2C:\Program Files\Microsoft Office\Office\Mscal.hlpINRAThisWorkbookThisWorkbookSheet1Sheet1NumbertoFiguresNumbertoFiguresNumberToTextNumberToTextIndianRupeeIndianRupeeIndianRupeeFormatIndianRupeeFormatID="{00000000-0000-0000-0000-000000000000}" Document=ThisWorkbook/&H00000000 Document=Sheet1/&H00000000 Module=NumbertoFigures Class=NumberToText Package={AC9F2F90-E877-11CE-9F68-00AA00574A4F} Class=IndianRupee Module=IndianRupeeFormat HelpFile="" Name="SureshsAddins" HelpContextID="0" VersionCompatible32="393222000" CMG="3C3E90D6F016F416F412F812F8" DPB="787AD43BF13BF1C40F3CF054CAC8D341071AD71D7D3C1E5BF150FC15500845779DD6AFD7" GC="B4B6185E689B699B699B" [Host Extender Info] &H00000001={3832D640-CF90-11CF-8E43-00A0C911005A};VBE;&H00000000 [Workspace] ThisWorkbook=110, 110, 535, 456, Sheet1=66, 66, 491, 412, NumbertoFigures=44, 44, 469, 390, Z NumberToText=66, 66, 491, 412, IndianRupee=44, 44, 469, 390, IndianRupeeFormat=88, 88, 513, 434, ўџ р…ŸђљOhЋ‘+'Гй0є PXpœЌМ д рьфSureshs Addins$Converts Numbers to Rupees in WordsSureshsSureshsMicrosoft ExSummaryInformation(џџџџџџџџ$DocumentSummaryInformation8џџџџџџџџџџџџ!CompObjџџџџџџџџџџџџ&fџџџџџџџџџџџџcel@њЪ™œР@€Ќћ3GŸРўџ еЭеœ.“—+,љЎ0ф X`x„ Œ”œЄ Ќ Пф Excel Add inWoSSe  Sheet1  Worksheetsўџ џџџџ РFMicrosoft Excel WorksheetBiff8Excel.Sheet.8є9Вq