That is because you left out a necessary equal sign:

Sub Tester3()
ActiveWorkbook.Names.Add Name:="TEMPLE", RefersTo:= _
"=$F$1:OFFSET($F$1,,,COUNTA($F:$F))"
End Sub

worked.

--
Regards,
Tom Ogilvy

"Chuckles123" wrote in message
...

Bob,

Thanks for your help very much.

I tried the following, starting my range at F1, and continuing down the
F Col:

ActiveWorkbook.Names.Add Name:="TEMPLE", RefersTo:= _
"$F$1:OFFSET($F$1,,,COUNTA($F:$F))"

It did not work.
Chuckles123


--
Chuckles123
------------------------------------------------------------------------
Chuckles123's Profile:
http://www.excelforum.com/member.php...o&userid=14948
View this thread: http://www.excelforum.com/showthread...hreadid=265895