Names Property Example
This example defines the name "myName" for cell A1 on Sheet1.
ActiveWorkbook.Names.Add Name:="myName", RefersToR1C1:= _ "=Sheet1!R1C1"