Hi Nils,

Try:

Worksheets("Sheet2").Name = _
Worksheets("Sheet1").Range("A1").Value

Change the worksheet names and cell reference to suit.

---
Regards,
Norman



"Nils Morten Blakstad" wrote in message
...


Thanks again - very much thanks!!!!!
You realy is good at this!
I tried your solution for Q1 - and succeded again :))

My problem No. 2 whas this:

How can I copy a text from a certain cell i the spreadsheet and paste
this text as name of the sheet - or e.g. a new sheet in the workbook?
The text in the cell will vary.

Is this a better description of the problem?

Regards Nils Morten
(I hope I don't bother you too much in this case!)



*** Sent via Developersdex http://www.developersdex.com ***
Don't just participate in USENET...get rewarded for it!