Thanks for your reply.
I tried the code you sent me but a 1004 error when it executes
Names("database").Delete

Private Sub Workbook_Open()
Dim s$
s = Names("database").RefersToR1C1
Names("database").Delete
Names.Add "database", RefersToR1C1:=s
End Sub

Any suggestions

Luis Verme

"keepITcool" <xrrcvgpbby@puryyb.ay> escribió en el mensaje
news:xn0e449oxje9xp800akeepitcoolnl@msnews.microsoft.com...
>
> no you cant "change" namelocal as it's part
> of the index of the names collection.
> BUT you can remove it and replace it with a new name.
>
> dim s$
> s=Names("database").referstor1c1
> Names("database").delete
> Names.add "database", referstor1c1:=s
>
> the local name is now equal to english name: "database"
>
>
>
> --
> keepITcool
> | www.XLsupport.com | keepITcool chello nl | amsterdam
>
>
> Luis Verme wrote :
>
> > Can I change the namelocal via VBA?