I looked on this forum yesterday to find a solution to change upper to
lowercase in a spreadsheet. I found this code in a thread which needs to be
changed in order to produce lowercase results at the moment it produces
UPPERCASE.

Option Explicit

Sub ConvertCase()
Dim Rng As Range
For Each Rng In Selection.Cells
If Rng.HasFormula = False Then
'Use this line for UpperCase text; change UCase to LCase for
LowerCase text.
Rng.Value = UCase(Rng.Value)
End If
Next Rng
End Sub

Could someone please explain what part of the code needs changing to produce
lowercase results. Thank you in advance

Paul