Hi Greg;

Try:

ActiveSheet.Name = Range("D7").Value

---
Regards,
Norman



"Greg" wrote in message
...
Ok part of it works great but I have gone about it the wrong way can
anyone help me with how to get the active worksheet to be named the value
in d7

Thanks
"Greg" wrote in message
...
Thanks for that will try now.

Greg
"Damon Longworth" wrote in message
...
Try something similar to this for paste:

Range("A1").PasteSpecial Paste:=xlPasteValues


Use something similar to this for the name:

MyName = worksheets("MySheet").Range("D7").value

Sheets.Add

Activesheet.Name = MyName


--
Damon Longworth

Don't miss out on the 2005 Excel User Conference
Sept 16th and 17th
Stockyards Hotel - Ft. Worth, Texas
www.ExcelUserConference.com


"Greg" wrote in message
...
I have two problem I need help with,

the first is I use the recorder to complete my macro codes this work
very well, but I am having problems when i use the paste special
function in the macro.

What I am looking to do is every week copy a whole worksheet to another
worksheet and have it paste only the values not the formulas to help
save some disc space. But it seems to not be able to do this.

Can some one help with this?

Problem number 2 is to do with the above as such. What I am looking to
do is have a macro create a new worksheet and then rename that sheet
with the name in cell "d5"

Thanks in advance

Greg