Excel vba named range exists

Function NamedRangeExist(ByRef pWorkBook As Workbook, pName As String) As Boolean
    Dim nName As Name
    For Each nName In pWorkBook.Names
        If nName.Name = pName Then
            NamedRangeExist = True
            Exit Function
        End If
    Next nName
End Function

Similar codes

1 vote343 views1 answer
Vb.net get name by Selection Changed
VBA
0 vote352 views1 answer
Vba add spaces
VBA
0 vote335 views1 answer
String contins in vba
VBA
0 vote332 views1 answer
Vba check if class implements interface
VBA
0 vote330 views1 answer
Vba declare 64-bit ptrsafe
VBA
0 vote385 views1 answer
Filesystemobject vba reference
VBA
0 vote347 views1 answer
Vba remove last vbcrlf
VBA
0 vote321 views1 answer
Vba paste values
VBA
8 votes367 views1 answer
Excel vba determine number of elements in a 1D array
VBA
0 vote326 views1 answer
Telephon call in vba
VBA