I wrote the following code to change all words to Upper Case. Apparently I have a typo, but can not figure out how to change it. I tried to edit, delete and re-record, oompletely deleted the Personal.XLS. file. When I go in to re-record the macro, I type it in, hit enter, and it is changed to the typo version. UGH!!!!!!

Sub UpperCase ()
'
' Change to Upper Case
'
' Keyboard Shortcut: Ctrl+c
'
For Each Cell In Selection
If not Cell.HasFormula Then
Cell.Value -UCase(cell.value)
End If
Next Cell
End Sub

It should be Value - UCase(cell.value)

At this point I have spent enough time to just retype the entire 56 page Excel workbook.

Any help would be appreciated.
Chelle