Condition Cell

I would like to use the change event, but I don't know how write it.

I have this change event I have been using but don't know how to edit it to fit my needs.

Would you know how to change it?

Private Sub Worksheet_Change(ByVal Target As Range)

If Target.Cells.Count > 1 Or Target.HasFormula Then Exit Sub

    On Error Resume Next
    If Not Intersect(Target, Range("G11:G50")) Is Nothing Then
        Application.EnableEvents = False
        Target = UCase(Target)
        Application.EnableEvents = True
    End If
    On Error GoTo 0
    End Sub