Macro to change letter cases in Excel

---

Convert Text into Upper Case

---

Sub UpperCase()
For Each XLnCAD In Selection
XLnCAD.Value = UCase(XLnCAD.Value)
Next
End Sub

Convert Text into Lower Case

---

Sub LowerCase()
For Each XLnCAD In Selection
XLnCAD.Value = LCase(XLnCAD.Value)
Next
End Sub

---

Convert Text into Proper Case

---

Sub ProperCase()
For Each XLnCAD In Selection
XLnCAD.Value = Application.Proper(XLnCAD.Value)
Next
End Sub

---

How to use codes shared here?