Dim sampleRange as Range
Set sampleRange = Worksheet.Range(Cells(1,1),Cells(1,4)
sampleRange.Name = \"Range1\"
MsgBox sampleRange.Name
The above co
sampleRange.Name = "Range1" to name the range is poor practice
It only works because Name (the string containing "The Name") is the default property of Name.
Much better sampleRange.Name.Name = "Range1"
It's never good practice to use the default property without referring to it explicitly.
Good programming exactly controls the environment by referring explicitly to the property required.
Removes ambiguity as created the issue here. Eliminates the issue created if the default property is changed in a future update.
For a Range, Name isn't a string it's a Name object, that you then take the Name property of to get the string:
MsgBox sampleRange.Name.Name