View Single Post
  #2   Report Post  
Posted to microsoft.public.excel.programming
Bill Martin[_2_] Bill Martin[_2_] is offline
external usenet poster
 
Posts: 105
Default .Name case sensitive

CinqueTerra wrote:
As part of a Print Macro, I am populating a list box with all range names
beginning with "prt1". In testing my macro, I noted that it was case
sensitive ("prt1 vs Prt1"). I've handled this with an OR statement. I'd
like a more robust solution which handles all the possible upper/lower case
combinations of prt1. Thanks in advance!

Here is my code:

Private Sub UserForm_Initialize()
Dim nme As Name

With lstP1
For Each nme In ActiveWorkbook.Names
If Left(nme.Name, 4) = "Prt1" Or Left(nme.Name, 4) = "prt1" Then
.AddItem nme.Name
End If
Next nme
End With



How about:

If ucase(Left(nme.Name, 4)) = "PRT1" Then

Bill