what is wrong with this line?

Steve, try using a variable to hold the data. Something like this

Sub YourMacro()
dim rangeName As String
'Your code
rangeName = Sheets("Employer Entry").Range("F20").Value
ActiveWorkbook.Names.Add Name:=rangeName
End Sub

Regards,
Barrie
Barrie Davidson

Barry,
Thanks for the suggestion. I tried that but the macro keeps hanging on the line ActiveWorkbook.Names.Add Name:=rangeName

RunTime Error '1004':
Application-defined or object-defined error

Any more thoughts,
Steve Sub YourMacro()

Steve, forgot to ask, what address are you trying to name?

Barrie

Barry,

In my macro, I create a sheet and then highlight a range. The problem happens when I try to name the range. It should be the same name as the text in F20 on a sheet named Employer Entry. Also, the range name is the same as the sheet name I just created.

Almost got it

Barry,
I almost have it. At least now it does not stop the macro. I have changed my line to read:

ActiveWorkbook.Names.Add Name:=rangeName, RefersToR1C1:= _
"=rangeName!R15C3:R25C4"

The only problem now is the word "rangename" shows up as the range name instead of the word that rangename represents. Can you fix my syntax?

Steve

In my macro, I create a sheet and then highlight a range. The problem happens when I try to name the range. It should be the same name as the text in F20 on a sheet named Employer Entry. Also, the range name is the same as the sheet name I just created. :

Steve, try this instead

Sub YourMacro()
dim rangeName As String
Dim namedSelection As String

'Your code
rangeName = Sheets("Employer Entry").Range("F20").Value
namedSelection = "=" & ActiveSheet.Name & "!" & Selection.Address
ActiveWorkbook.Names.Add Name:=rangeName, RefersTo:=namedSelection
End Sub

Barrie
Barrie Davidson

Great!

Thanks Barry,
It works great!

Steve