Friday 27 May 2016

How to Add number value in words using Formula in Excel

Problem :- I want to Add number value in words in my invoice using excel formula. 

Mode:- No inbuilt formala in Excel, but we can add the formula by using Visual Basic (VB) options of Excel.

Solutions :- 1) Please copy the below mentioned VB formula... 2) Open Excel file you want add the formula...3) Right click the sheet name  4)Select View Code :- then a VB page will open   5) Go to Insert menu and select module... 6) Then paste the copied formula in that module sheet and then click on save button. 7) Close VB Page.... Now you can use the Formula as 

= SPELLNUMBER( "Click on the cell contain number")

(Refer Screen shot for more clarification)
Note:- If you required to add bracket before and after the text please add " ( " just before Ruppees and add ") " after Only in the formula.

------------------formula------------------------
Function SpellNumber(amt As Variant) As Variant
Dim FIGURE As Variant
Dim LENFIG As Integer
Dim i As Integer
Dim WORDs(19) As String
Dim tens(9) As String
WORDs(1) = "One"
WORDs(2) = "Two"
WORDs(3) = "Three"
WORDs(4) = "Four"
WORDs(5) = "Five"
WORDs(6) = "Six"
WORDs(7) = "Seven"
WORDs(8) = "Eight"
WORDs(9) = "Nine"
WORDs(10) = "Ten"
WORDs(11) = "Eleven"
WORDs(12) = "Twelve"
WORDs(13) = "Thirteen"
WORDs(14) = "Fourteen"
WORDs(15) = "Fifteen"
WORDs(16) = "Sixteen"
WORDs(17) = "Seventeen"
WORDs(18) = "Eighteen"
WORDs(19) = "Nineteen"
tens(2) = "Twenty"
tens(3) = "Thirty"
tens(4) = "Fourty"
tens(5) = "Fifty"
tens(6) = "Sixty"
tens(7) = "Seventy"
tens(8) = "Eighty"
tens(9) = "Ninety"
FIGURE = amt
FIGURE = Format(FIGURE, "FIXED")
FIGLEN = Len(FIGURE)
If FIGLEN < 12 Then
FIGURE = Space(12 - FIGLEN) & FIGURE
End If
If Val(Left(FIGURE, 9)) > 1 Then
SpellNumber = "Rupees "
ElseIf Val(Left(FIGURE, 9)) = 1 Then
SpellNumber = "Rupee "
End If
For i = 1 To 3
If Val(Left(FIGURE, 2)) < 20 And Val(Left(FIGURE, 2)) > 0 Then
SpellNumber = SpellNumber & WORDs(Val(Left(FIGURE, 2)))
ElseIf Val(Left(FIGURE, 2)) > 19 Then
SpellNumber = SpellNumber & tens(Val(Left(FIGURE, 1)))
SpellNumber = SpellNumber & WORDs(Val(Right(Left(FIGURE, 2), 1)))
End If
If i = 1 And Val(Left(FIGURE, 2)) > 0 Then
SpellNumber = SpellNumber & " Crore "
ElseIf i = 2 And Val(Left(FIGURE, 2)) > 0 Then
SpellNumber = SpellNumber & " Lakh "
ElseIf i = 3 And Val(Left(FIGURE, 2)) > 0 Then
SpellNumber = SpellNumber & " Thousand "
End If
FIGURE = Mid(FIGURE, 3)
Next i
If Val(Left(FIGURE, 1)) > 0 Then
SpellNumber = SpellNumber & WORDs(Val(Left(FIGURE, 1))) + " Hundred "
End If
FIGURE = Mid(FIGURE, 2)
If Val(Left(FIGURE, 2)) < 20 And Val(Left(FIGURE, 2)) > 0 Then
SpellNumber = SpellNumber & WORDs(Val(Left(FIGURE, 2)))
ElseIf Val(Left(FIGURE, 2)) > 19 Then
SpellNumber = SpellNumber & tens(Val(Left(FIGURE, 1)))
SpellNumber = SpellNumber & WORDs(Val(Right(Left(FIGURE, 2), 1)))
End If
FIGURE = Mid(FIGURE, 4)
If Val(FIGURE) > 0 Then
SpellNumber = SpellNumber & " Paise "
If Val(Left(FIGURE, 2)) < 20 And Val(Left(FIGURE, 2)) > 0 Then
SpellNumber = SpellNumber & WORDs(Val(Left(FIGURE, 2)))
ElseIf Val(Left(FIGURE, 2)) > 19 Then
SpellNumber = SpellNumber & tens(Val(Left(FIGURE, 1)))
SpellNumber = SpellNumber & WORDs(Val(Right(Left(FIGURE, 2), 1)))
End If
End If
FIGURE = amt
FIGURE = Format(FIGURE, "FIXED")
If Val(FIGURE) > 0 Then
SpellNumber = SpellNumber & " Only "
End If
End Function
-------------------------- formula----------------

Screen shot..









Friday 20 May 2016

How to Add Currency emblem in Excel.

Problem : - How to add currency emblem in Excel while we are typing number.

Options:-It is available within Excel.

Solutions:- Please Right click....- Format Cells - in Categories please select Currency - within the currency please select desired symbols 

Now you will get your desired currency symbol 

For Eg:- 

I have to add Rs. in Excel Cells


Note:- If you required sufficient space between the symbol and number you may again go to the format option and select custom then you can see the symbol formula. In that you can give sufficient space as required by you.

Eg:- 2. Add Inidan Currency Symbol  in Excel

1. Download Indian Rupees font from the link (copy link and paste in your browser address bar)

http://www.finance.kar.nic.in/others/Rupee_Foradian.ttf

 2. Copy file and paste it in Font folder (open control panel and open font folder)

3.  Open Excel - select cells in which you want add rupees symbols - right click - format - custom - type the key ` in the key board (key is mentioned below) and then add 0 (refer below screenshot) 
Then press OK and close it. Now you can type number with the indian rupee Symbol....

Solution for Cannot Select Pager number / Range during Outlook 2007 mail Printing

Problem

Cannot select page number during, printing a mail page in outlook 2007

Reason

Outlook 2007 haven't the option for the same.

Solution

The problem can easily solve by downloading and  installing Service Pack 2 (office2007sp2) up dates by searching in Google.


Note:- before starting installation, should be close all ms office enabled services. After installation please restart you system. Your problem will solve now

Monday 16 May 2016

Delay in Opening Word, Excel Files

Hi everybody!!!

Today i am giving an interesting tip for computer users in an Office/ House/ Shops etc....

Delay in Word, Excel File Opening..

Problem:- If I double-click on a word or excel document on the desktop, or try to open a Word attachment from an email, it takes about a minute.

Reason

The DDE function appears to be corrupt. To work around it I did the following:

Solutions
Go to Control Panel, Folder Options, File Types, scroll down to and select (XLS, XLSx, DOC or DOCx), click Advanced, select Open, click the Edit button. Now uncheck "Use DDE" and then put your cursor on the Application box, arrow all the way to the right and put in "%1" (include the quote marks), If there is a /dde remove it. Then OK your way out. Things should work quickly again.


Now You can easily open your files without waiting......!!!!

COUNTIF FUNCTION FOR FILTERABLE DATA

Summary:- While using COUNTIF function of Excel, the count if function will not work for filterable data as the values will not change as pe...