Selecting sheets via vba

[SV18]

Hi all,

I'm trying to select 3 sheets from a workbook and simply copy them to a new workbook, for some reason this is eluding me and I can't get the code right! Can someone please help, this is the code I have:

Dim x As Object

For Each x In Array("AC table", "Administrator table", "Scheme Table")
Sheets(x).Copy
Next

 

[VoG]

Try

Sheets(Array("AC table", "Administrator table", "Scheme Table")).Copy

 

[SV18]

It was so easy...thanks for the help VoG