I'm in the process of create all my query into table.
Since I have lots of query I 've to put in into SQL statement in VBA
but I got an error Invalid arguments

these is my code

Dim db As Database
Dim rs, sql
Set db = CurrentDb()
sql = "SELECT [ID], [Name], [Address], [Phone] INTO newCustomer " & _
      "FROM Customer;"
Set rs = db.OpenRecordset(sql, dbOpenDynaset)

Thanks
Elmer

There's another option you could do - you could just use a docmd - eg:
Steven

There are 10 kinds of people in the world - those who understand binary - and those with friends

Steven,

Great!!! it works I really appreciate your help. :)

Thanks
Elmer