Change From:
Range("A2:Y201").Value = Application.proper(Range("A2:Y201").Value)

To:
Range("A2:Y201").Value = Lower(Range("A2:Y201").Value)


"Solutions Manager" wrote:

I have the following bit of code that works great for Proper case, but
doesn't work for Lowercase. I have tried LCase, vbLowerCase, Lower.... and it
doesn't work. Can this be adjusted?

Sub case_TEST()
Application.ScreenUpdating = False
ActiveWorkbook.Sheets("manifest").Select
Range("A2:Y201").Value = Application.proper(Range("A2:Y201").Value)
Application.ScreenUpdating = True
End Sub