Copyinng & Renaming Worksheets

  • Thread starter Thread starter Ron McCormick
  • Start date Start date
R

Ron McCormick

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,

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
 
Back
Top