Sub store() NumofSales = 5123 Names.add name:="TotalSales", RefersTo:=NumofSales 'Or use this: Names.add name:="TotalSales", RefersTo:=5123 End Sub