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