Lcase

[Trevor3007]

Private Sub Worksheet_Change(ByVal Target As Range)

''''''''''''''''''''''''''''''''''''''''''''

'Forces text to UPPER case for a range XYX
'Forces text to Proper case for a range TUV

''''''''''''''''''''''''''''''''''''''''''''

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



    On Error Resume Next

    If Not Intersect(Target, Range("a1:a100")) Is Nothing Then

        Application.EnableEvents = False

        Target = UCase(Target)

        Application.EnableEvents = True

    End If
      

    On Error GoTo 0


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



    On Error Resume Next

    If Not Intersect(Target, Range("B1:B100")) Is Nothing Then

        Application.EnableEvents = False

        Target = StrConv(Target, vbProperCase)

        Application.EnableEvents = True

    End If

    On Error GoTo 0

    

End Sub

I need to include 'lcase'(lowercase) into the range E2:F100.

Having thought all I needed to do was alter ; Target = StrConv(Target, vbProperCase)' to Target = StrConv(Target, lcase) would of worked, but it does not.

Searching the web , never gave me the exact solution , so therefore I am reaching out to Mr Excel for help.

many thanks in advance & thank you for your help.

 

[Fluff]

How about

Target = lCase(Target)

 

[jasonb75]

Given that proper case is vbProperCase I would expect lower case to be vbLowerCase and upper case to be vbUpperCase

edit:- it actually tells you this if you use the vba help.

 

[Trevor3007]

Target = lCase(Target)

wahooo... thanks fluff... yeah that works ?

 

[Trevor3007]

Given that proper case is vbProperCase I would expect lower case to be vbLowerCase and upper case to be vbUpperCase

edit:- it actually tells you this if you use the vba help.

thanks Jason,
I used fluffs sugg & it works.. But I much appreciate your help.

 

[Fluff]

Glad we could help & thanks for the feedback.

 

[Trevor3007]

NP... its the least a can do . You / guys have saved me a whole lotta work.

have a great rest of your day

 

[jasonb75]

For future reference, if you position your cursor in a command / keyword in the vba code editor then press F1 it should take you to a help page for that command.

The help shown might not always be helpful but it is a good place to start.