Can't find a simple syntax error

[GraeagleBill]

Access complains there's a syntax error but I've not been able to discover where it might be. I've tried the SELECT with and without parenthesis but didn't seem to fix anything. Any ideas?

DoCmd.RunSQL "CREATE TABLE tblOneLabel AS (SELECT BoxID, AreaName FROM tblBoxLabels WHERE [RecID] = 1);"

[pbaldy]

You're trying to make a new table? Try

SELECT BoxID, AreaName
INTO tblOneLabel
FROM tblBoxLabels WHERE [RecID] = 1

[GraeagleBill]

Your suggestion worked perfectly. The sub where the statement below executes is passed "SeedID".

DoCmd.RunSQL "SELECT * INTO tblOneLabel FROM tblBoxLabels WHERE [RecID] = " & SeedID

Is there a way to get RunSQL to execute quietly? Two messages display: 1 that table "tblOneLabel" is being replaced and 2 that a record is being added.

[isladogs]

There are two methods
You can add the line DoCmd.SetWarnings False before running the code and then DoCmd.SetWarnings True afterwards
Doing that suppresses all messages including error messages

A better method is to use CurrntDb.Execute instead of DoCmd.RunSQL.
That suppresses unwanted messages except for errors

[pbaldy]

More info:

http://www.baldyweb.com/SQLWarnings.htm

[GraeagleBill]

Thanks Colin. As soon as I corrected the spelling error all worked as desired.

What struck me as a bit humorous is the fact that I don't recall EVER having used DoCmd.RunSQL. I think it might have occurred resulting from a Cut/Paste of an example somewhere.

Thanks again,
Bill

[GraeagleBill]

Thanks Paul, lesson learned.
Bill