It is surely not. You can do it with VBA though. Put this in the worksheet
module:
Private Sub Worksheet_Change(ByVal Target As Range)
Dim cel As Range
For Each cel In Target
If cel.Column = 2 Then
If cel.Formula <> UCase$(cel.Formula) Then _
cel.Formula = UCase$(cel.Formula)
End If
Next
End Sub