Leith,
Cheers works perfectly thanks


Corey....
"Leith Ross" <Leith.Ross.29ybwn_1151228401.9628@excelforum-nospam.com> wrote
in message news:Leith.Ross.29ybwn_1151228401.9628@excelforum-nospam.com...
>
> Hello Corey,
>
> Sub Macro1()
> With ThisWorkbook
> If .Worksheets.Count < 99 Then Exit Sub
> Worksheets(Array("Opening Page", "Template")).Copy
> End With
> End Sub
>
> Sincerely,
> Leith Ross
>
>
> --
> Leith Ross
> ------------------------------------------------------------------------
> Leith Ross's Profile:
> http://www.excelforum.com/member.php...o&userid=18465
> View this thread: http://www.excelforum.com/showthread...hreadid=555333
>