UDF - case sensitive argument

[ed]

Here is my issue:
For example, ‘txt’ is coming from a cell in a worksheet entered by the user.

Function Test(txt as string) as string
If (txt = "comm. lse" Or txt = "ME") Then
Do this
Else
Do that
End If
End Function

If the user enters Comm Lse, the statement will “Do that� instead of “Do
this�. Any suggestions? (drop downs are not welcomed by the users...yet!)

[JulieD]

Hi Ed

if you want a case insesitive function you can do something along the
following lines

Function Test(txt As String) As String
If (LCase(txt) = "comm. lse" Or UCase(txt) = "ME") Then
Do this
Else
Do that
End If
End Function

Cheers
JulieD

"ed" <[email protected]> wrote in message
news:[email protected]...
> Here is my issue:
> For example, 'txt' is coming from a cell in a worksheet entered by the
> user.
>
> Function Test(txt as string) as string
> If (txt = "comm. lse" Or txt = "ME") Then
> Do this
> Else
> Do that
> End If
> End Function
>
> If the user enters Comm Lse, the statement will "Do that" instead of "Do
> this". Any suggestions? (drop downs are not welcomed by the
> users...yet!)
>

[JE McGimpsey]

If you're just worried about case:

Public Function Test(txt As String) As String
If (LCase(txt) = "comm. lse" Or UCase(txt) = "ME") Then
'Do this
Else
'Do that
End If
End Function

note that this will not catch the lack of a "." in your example.


In article <[email protected]>,
"ed" <[email protected]> wrote:

> Here is my issue:
> For example, ‘txt’ is coming from a cell in a worksheet entered by the user.
>
> Function Test(txt as string) as string
> If (txt = "comm. lse" Or txt = "ME") Then
> Do this
> Else
> Do that
> End If
> End Function
>
> If the user enters Comm Lse, the statement will “Do that� instead of “Do
> this�. Any suggestions? (drop downs are not welcomed by the users...yet!)