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

0 vote301 views1 answer
Vbscript for loop
VBA
1 vote294 views1 answer
Add control vb
VBA
1 vote294 views2 answers
Vba string to date
VBA
0 vote281 views1 answer
Docker vboxmanage not found
VBA
0 vote297 views1 answer
Limit combobox to list vba
VBA
0 vote309 views1 answer
Add text to combobox drop down vb
VBA
0 vote277 views1 answer
Vba first line of string
VBA
0 vote263 views1 answer
Excel vba arrondir
VBA
0 vote292 views1 answer
Vba option button selected
VBA
0 vote320 views1 answer
Vbnet check if string is only letters
VBA