Here is some event code for the worksheet.

Works on columns 1 through 8.............edit to suit.

Private Sub Worksheet_Change(ByVal Target As Excel.Range)
If Target.Column 8 Then Exit Sub
On Error GoTo ErrHandler
Application.EnableEvents = False
Target.Formula = UCase(Target.Formula)
ErrHandler:
Application.EnableEvents = True
End Sub

This is event code. Right-click on the sheet tab and "View Code".

Copy/paste into that sheet module.

As you enter text in any cell it will change to CAPS.

Will not change existing text unless you F2ENTER on those but will change all
new text entries.


Gord Dibben MS Excel MVP

On Wed, 26 Dec 2007 20:45:00 -0800, Srikanth
wrote:

Hi All,

I've a query regarding attendance sheet in excel. If we key in lower case
letter it shud take it as upper case. ANY IDEAS????

Thanks in Advance...