lower case to Upper case with VBA macro

[delta]

in sheet 1 cell range where anything write in lower case to convert upper case but
in cell range is A5, B7,C3,G8,E3 only this range will be convert lower case to upper case.

 

[YasserKhalil]

May be

Sub Delta()
    Dim r As Range
   
    For Each r In Range("A5, B7,C3,G8,E3")
        r.Value = UCase(r.Value)
    Next r
End Sub