Ta very much
Works fine now


-----Original Message-----
Andy,

You need to enable access to the VBProject. Go to the
Tools menu,
choose Macros, then Security. In that dialog, choose the
Trusted
Publisher tab and check the "Trust access to Visual Basic
Project".
I

"Andy" wrote in
message
...
I am using excel XP and I get the following error:

Run-time error '1004':
Programmactic access to visual basic project is not
trusted

I have tried both running from within the sheet object
and
as a module, neither work. My code is exactly as below.

Sub Macro1()

ThisWorkbook.VBProject.VBComponents
(ActiveSheet.CodeName).Name = "NewSheet"

End Sub


Thanks in advance
Andy


-----Original Message-----
Andy wrote:
On previously asking for help on renaming the object
name
of a worksheet I got the responce(s) below but can't
get
either to work

Both work for me (Excel 97).
I assume you have the relevant worksheet active?
What error do you get?

Bill Manville
MVP - Microsoft Excel, Oxford, England
No email replies please - reply in newsgroup

.



.