Count of Words in a Cell by UDF

Function for counting words in a cell excluding space (ready vba code just copy , paste and run)

Function COUNTWORDS(Text_String As String) As Integer
'User define function counts the number of words in a cell exclude space
'www.anilnahar.com
String_Length = Len(Text_String)
For Current_Character = 1 To String_Length
COUNTWORDS = 0
Dim String_Length As Integer
Dim Current_Character As Integer
If (Mid(Text_String, Current_Character, 1)) = " " Then
COUNTWORDS = COUNTWORDS + 1
End If
Next Current_Character
End Function

Importance of Excel

EXCEL IMPORTANCE in chartered accountacy career told by CA PARVEEN SHARMA

So a place where CA Student as a professional lacking behind is MS Office or particularly Excel, Many of the CA Student that are under going article-ship, don’t even know how to use some of the basic functions in excel.

So we tried to help you out with article on some of the basic excel function that you must know with our blog tutorials.

Windows 7 logo key Keyboard Shortcuts

Windows 7 logo key Keyboard Shortcuts
Windows logo key Open or close the Start menu.
Windows logo key +Pause Display the System Properties dialog box.
Windows logo key +D Display the desktop.
Windows logo key +M Minimize all windows.
Windows logo key +Shift+M Restore minimized windows to the desktop.
Windows logo key +E Open Computer.
Windows logo key +F Search for a file or folder.
Ctrl+Windows logo key +F Search for computers (if you’re on a network).
Windows logo key +L Lock your computer or switch users.
Windows logo key +R Open the Run dialog box.
Windows logo key +T Cycle through programs on the taskbar.
Windows logo key +number Start the program pinned to the taskbar in the position indicated by the number. If the program is already running, switch to that program.
Shift+Windows logo key +number Start a new instance of the program pinned to the taskbar in the position indicated by the number.
Ctrl+Windows logo key +number Switch to the last active window of the program pinned to the taskbar in the position indicated by the number.
Alt+Windows logo key +number Open the Jump List for the program pinned to the taskbar in the position indicated by the number.
Windows logo key +Tab Cycle through programs on the taskbar by using Aero Flip 3-D.
Ctrl+Windows logo key +Tab Use the arrow keys to cycle through programs on the taskbar by using Aero Flip 3-D.
Ctrl+Windows logo key +B Switch to the program that displayed a message in the notification area.
Windows logo key +Spacebar Preview the desktop.
Windows logo key +Up Arrow Maximize the window.
Windows logo key +Left Arrow Maximize the window to the left side of the screen.
Windows logo key +Right Arrow Maximize the window to the right side of the screen.
Windows logo key +Down Arrow Minimize the window.
Windows logo key +Home Minimize all but the active window.
Windows logo key +Shift+Up Arrow Stretch the window to the top and bottom of the screen.
Windows logo key +Shift+Left Arrow or Right Arrow Move a window from one monitor to another.
Windows logo key +P Choose a presentation display mode.
Windows logo key +G Cycle through gadgets.
Windows logo key +U Open Ease of Access Center.
Windows logo key +X Open Windows Mobility Center.

Alphabets Serial Capital And Small Letter

Sub Alphabets_capital()
‘ Smart code for Serial Alphabets in Capital Letters from select cell
‘ Smart Excel (www.anilnahar.com)
Dim i As Integer
For i = 65 To 90
ActiveCell.Value = Chr(i)
ActiveCell.Offset(1, 0).Select
Next i
End Sub
—————
Sub Alphabets_small()
‘ Smart code for Serial Alphabates in Small Letters from select cell
‘ Smart Excel(anilnahar.com)
Dim i As Integer
For i = 97 To 122
ActiveCell.Value = Chr(i)
ActiveCell.Offset(1, 0).Select
Next i
End Sub