Make macro work with upper case and lower case

[Caitlin535]

Hello! I have the following Macro (below) in a spreadsheet I use to record work times for my employees. In column C there is a dropdown in which they are supposed to choose "ARRIVED," and then a timestamp appears in both column D and P. Similar for column E - they're supposed to select "DEPARTED" from a dropdown menu and then it enters a timestamp in both column F and Q.


The trouble is, sometimes employees type "Arrived" or "Departed" instead of using the dropdowns. Because these are the correct words the dropdown error function doesn't alert, but unfortunately the Macro doesn't run. Is there a way to make the Macro not case-dependent?


Thanks!

Private Sub Worksheet_Change(ByVal Target As Range)
On Error GoTo Handler
If Target.CountLarge > 1 Then Exit Sub
If Target.Column = 3 And Target.Value = "ARRIVED" Then
Application.EnableEvents = False
Target.Offset(0, 1) = Format(Now(), "hh:mm")
Target.Offset(0, 13) = Format(Now(), "mm-dd-yyyy hh:mm")
Application.EnableEvents = True
End If


If Target.Column = 3 And Target.Value = "(Absent)" Then
Application.EnableEvents = False
Target.Offset(0, 2) = "(Absent)"
Target.Offset(0, 13) = "(Absent)"
Application.EnableEvents = True
End If


If Target.Column = 5 And Target.Value = "DEPARTED" Then
Application.EnableEvents = False
Target.Offset(0, 1) = Format(Now(), "hh:mm")
Target.Offset(0, 12) = Format(Now(), "mm-dd-yyyy hh:mm")
Application.EnableEvents = True
End If


Handler:
Application.EnableEvents = True


End Sub

 

[Fluff]

Use

LCase(Target.Value) = "arrived" Then

 

[JoeMo]

try:

If Target.Column = 3 And UCase(Target.Value) = "ARRIVED" Then


and similarly for the "DEPARTED" line

 

[Fluff]

Cross posted https://www.excelforum.com/excel-pr...th-upper-case-and-lower-case.html#post5224360

While we do not prohibit Cross-Posting on this site, we do ask that you please mention you are doing so and provide links in each of the threads pointing to the other thread (see rule 13 here along with the explanation: Forum Rules).
This way, other members can see what has already been done in regards to a question, and do not waste time working on a question that may already be answered.

 

[Caitlin535]

I'm so sorry; once again, my error (in cross-posting) was inadvertent. Will be very careful not to do so again. Have always made all other posts only on this site, and will continue to do so in future; to be honest, I initially hadn't realized I was posting on a different site (as the two look so similar!). I was about to post the link, as I should have done initially; thank you for having done so already. Apologies again!