Check Name existance : Name « Excel « VBA / Excel / Access / Word

Check Name existance

 

Sub Main()
  If NameExists("SalesData") Then
    MsgBox "Name Exists"
  Else
    MsgBox "Name does not exist"
  End If
End Sub

Function NameExists(myName As String) As Boolean
  Dim X As String
  On Error Resume Next
  X = Names(myName).RefersTo
  If Err.Number <> 0 Then
    NameExists = False
    Err.Clear
  Else
    NameExists = True
  End If
End Function

Related examples in the same category

1.	Using named ranges of cells
2.	Storing Values in Names
3.	Store formulas into names. The formula must start with an equals sign (=).
4.	use the Evaluate method equivalent to evaluate the name in VBA:
5.	Hide a name by setting its Visible property to False
6.	Hide the name after it has been created:
7.	Searching for a Name
8.	Searching for the Name of a Range
9.	Determining which Names Overlap a Range
10.	A name can also store the data stored in an array.
11.	find out which names are overlapping the selected cells, regardless of whether they entirely contain the selected cells
12.	specify that the Names collection belongs to a worksheet:
13.	Adding Comments for a name
14.	storing a formula in a name is the same as for a range
15.	use names to store numbers between sessions
16.	Checking for the Existence of a Name
17.	Define a name by hard code the cell address
18.	Select named range
19.	Go to a name
20.	Generate Range object from named range
21.	Generate named range from Range object
22.	Is Name In Workbook
23.	Names Overlapping Selection
24.	Selection Entirely In Names
25.	Insert hidden name
26.	Fill named range with values
27.	Range objects cannot be used with an worksheet object as superobject
28.	Enables access to named ranges in arbitrary workbooks
29.	Using the Names Object to List All Named Ranges
30.	Retrieving Values Stored as a Workbook Name Using the Evaluate Method