When I compare cell a1 to b1 in a formula capitalization is ignored, (ie. 2a
= 2A). This same check in a VB script fails. I'm trying to create a sheet
based of a text box and my check against the names passes but I get an error
trying to name the new sheet with the capitalized version of the name.

Ideas?

Hi,

Do an upper case compare

If UCase(Range("a1")) = UCase(Range("b1")) Then
'do things
End If

Mike

"dawall33" wrote:

> When I compare cell a1 to b1 in a formula capitalization is ignored, (ie. 2a
> = 2A). This same check in a VB script fails. I'm trying to create a sheet
> based of a text box and my check against the names passes but I get an error
> trying to name the new sheet with the capitalized version of the name.
>
> Ideas?

Hi,

Similar solution

Private Sub Worksheet_Change(ByVal Target As Range)
If Range("A1").Value = 99 Then
Range("B1").Hyperlinks(1).Follow
End If
End Sub


Mike

"Mike H" wrote:

> Hi,
>
> Do an upper case compare
>
> If UCase(Range("a1")) = UCase(Range("b1")) Then
> 'do things
> End If
>
> Mike
>
> "dawall33" wrote:
>
> > When I compare cell a1 to b1 in a formula capitalization is ignored, (ie. 2a
> > = 2A). This same check in a VB script fails. I'm trying to create a sheet
> > based of a text box and my check against the names passes but I get an error
> > trying to name the new sheet with the capitalized version of the name.
> >
> > Ideas?

OOPS wrong thread

"Mike H" wrote:

> Hi,
>
> Similar solution
>
> Private Sub Worksheet_Change(ByVal Target As Range)
> If Range("A1").Value = 99 Then
> Range("B1").Hyperlinks(1).Follow
> End If
> End Sub
>
>
> Mike
>
> "Mike H" wrote:
>
> > Hi,
> >
> > Do an upper case compare
> >
> > If UCase(Range("a1")) = UCase(Range("b1")) Then
> > 'do things
> > End If
> >
> > Mike
> >
> > "dawall33" wrote:
> >
> > > When I compare cell a1 to b1 in a formula capitalization is ignored, (ie. 2a
> > > = 2A). This same check in a VB script fails. I'm trying to create a sheet
> > > based of a text box and my check against the names passes but I get an error
> > > trying to name the new sheet with the capitalized version of the name.
> > >
> > > Ideas?

Re: Ideas?

Patient: "Doctor, it hurts when I do this"
Doctor: "Don't do that.
--
Jim Cone
Portland, Oregon USA



"dawall33" <(E-Mail Removed)>
wrote in message
When I compare cell a1 to b1 in a formula capitalization is ignored, (ie. 2a
= 2A). This same check in a VB script fails. I'm trying to create a sheet
based of a text box and my check against the names passes but I get an error
trying to name the new sheet with the capitalized version of the name.

Ideas?

Hi,

No problem we'll get there. using X in your code makes X a variable and not
the letter X. To make it the letter X put it in quotes like below. Now you
'may' encounter another problem because it becomes case sensitive so note how
i've included an UCASE statement so if you now enter x or X it works

Private Sub Worksheet_Change(ByVal Target As Range)
If UCase(Range("E5").Value) = "X" Then
Range("B5").Hyperlinks(1).Follow
End If
End Sub

Mike



"Mike H" wrote:

> OOPS wrong thread
>
> "Mike H" wrote:
>
> > Hi,
> >
> > Similar solution
> >
> > Private Sub Worksheet_Change(ByVal Target As Range)
> > If Range("A1").Value = 99 Then
> > Range("B1").Hyperlinks(1).Follow
> > End If
> > End Sub
> >
> >
> > Mike
> >
> > "Mike H" wrote:
> >
> > > Hi,
> > >
> > > Do an upper case compare
> > >
> > > If UCase(Range("a1")) = UCase(Range("b1")) Then
> > > 'do things
> > > End If
> > >
> > > Mike
> > >
> > > "dawall33" wrote:
> > >
> > > > When I compare cell a1 to b1 in a formula capitalization is ignored, (ie. 2a
> > > > = 2A). This same check in a VB script fails. I'm trying to create a sheet
> > > > based of a text box and my check against the names passes but I get an error
> > > > trying to name the new sheet with the capitalized version of the name.
> > > >
> > > > Ideas?

You can make all text comparisons in a module ignore case by placing

Option Compare Text

at the top of the module (above and outside of any procedure or
variable declarations). Or, you can ignore case with StrComp

If StrComp(string1, string2, vbTextCompare) = 0 Then
' strings are equal
Else
' strings are different
End If

Cordially,
Chip Pearson
Microsoft Most Valuable Professional
Excel Product Group, 1998 - 2009
Pearson Software Consulting, LLC
www.cpearson.com
(email on web site)



On Thu, 9 Apr 2009 12:33:02 -0700, dawall33
<(E-Mail Removed)> wrote:

>When I compare cell a1 to b1 in a formula capitalization is ignored, (ie. 2a
>= 2A). This same check in a VB script fails. I'm trying to create a sheet
>based of a text box and my check against the names passes but I get an error
>trying to name the new sheet with the capitalized version of the name.
>
>Ideas?