How about
:
Worksheets(Name of the worksheet to be copied from Sefor_2).Cop
after:=WorkBooks("Sefor_1").Sheets(Name of worksheet in Sefor_1)
This should copy the wanted sheet in sefor_2 right after the sheet i
Sefor_1 as a new Sheet.
Best Regards
Noo
--
Message posted from
http://www.ExcelForum.com