Hi John

Open up the visual basic editor, look in the Project Window and double
click the worksheet this behavior is to apply to. Paste the code below
into the blank code module

Private Sub Worksheet_Change(ByVal Target As Range)
Target.Value = UCase(Target.Value)
End Sub

and save the file. Everything entered on this sheet will then appear
in upper case.

regards
Paul

"John McGing" wrote in message ...
IS THERE A WAY THAT A WORKSHEET CAN BE SETUP THAT WOULD
EITHER NOT ACCEPT LOWERCASE OR AUTOMATICALLY CHANGE IT TO
UPPERCASE