I am wanting to copy a worksheet and then rename it with a
suffix that is a named range on the worksheet.

viz. something like
Sheets("Worksheet(2)").Name = "Worksheet ("& Region &")"
where region is thenamed range. What is the code required
for this.

TIA
Ron

Ron,

Where do you want to copy the worksheet to? The same workbook?
Try something like


Worksheets(2).Copy
ActiveSheet.Name = Range("Region").Text


--
Cordially,
Chip Pearson
Microsoft MVP - Excel
Pearson Software Consulting, LLC
www.cpearson.com


"Ron McCormick" wrote in message
...
I am wanting to copy a worksheet and then rename it with a
suffix that is a named range on the worksheet.

viz. something like
Sheets("Worksheet(2)").Name = "Worksheet ("& Region &")"
where region is thenamed range. What is the code required
for this.

TIA
Ron

Ron,

Disregard my previous reply. Use something like the following
instead.

With Worksheets
.Item(2).Copy after:=.Item(.Count)
End With
ActiveSheet.Name = Range("Region").Text


--
Cordially,
Chip Pearson
Microsoft MVP - Excel
Pearson Software Consulting, LLC
www.cpearson.com



"Ron McCormick" wrote in message
...
I am wanting to copy a worksheet and then rename it with a
suffix that is a named range on the worksheet.

viz. something like
Sheets("Worksheet(2)").Name = "Worksheet ("& Region &")"
where region is thenamed range. What is the code required
for this.

TIA
Ron