Define a name by referring the selection cell address : Name Create « Excel « VBA / Excel / Access / Word






Define a name by referring the selection cell address

 
Sub DefineName2()
  ActiveWorkbook.Activate
  [A1].CurrentRegion.Activate
  ActiveWorkbook.Names.Add Name:="WorkArea", RefersTo:="=" + Selection.Address
  Debug.Print Range("WorkArea").Address(External:=True)
End Sub

 








Related examples in the same category

1.create a global name that refers to a range using the Add method of the Workbook object's Names collection
2.Create a local name
3.renames an existing name:
4.Create a name based on a Range
5.Add the name to the Names collection associated with the worksheet, which only includes the names that are local to that worksheet
6.Define a name by referring a workbook