I'm trying to create a second table in my DB with the same structure as an
existing table but without the data. This code copies both the structure and
the data.

DoCmd.CopyObject , "Table2", acTable, "Table1"

How can I copy just the structure?
--
Thank you,
Del

"Del" <(E-Mail Removed)> wrote in message
news:052D9C4B-E2A6-44D4-86F5-(E-Mail Removed)...
> I'm trying to create a second table in my DB with the same structure as an
> existing table but without the data. This code copies both the structure
> and
> the data.
>
> DoCmd.CopyObject , "Table2", acTable, "Table1"
>
> How can I copy just the structure?


If you want to do it manually, you can copy and paste, choosing "Structure
Only" when prompted. If you want to do it programmatically, you can use
TransferDatabase, specifying the current database as the target of an export
and giving True for the StructureOnly argument, like this:

Docmd.TransferDatabase acExport, "Microsoft Access", _
CurrentDb.Name, acTable, _
"Table1", "Table2", _
True

--
Dirk Goldgar, MS Access MVP
www.datagnostics.com

(please reply to the newsgroup)

On Thu, 4 Sep 2008 09:53:01 -0700, Del wrote:

> I'm trying to create a second table in my DB with the same structure as an
> existing table but without the data. This code copies both the structure and
> the data.
>
> DoCmd.CopyObject , "Table2", acTable, "Table1"
>
> How can I copy just the structure?

You can simply select the existing table,right-click copy, then
right-click and select Paste. When the renaming dialog comes up click
on Structure only.

If you need to do this via code, have you tried deleting the data from
the new table after you copy the existing table?

DoCmd.CopyObject , "Table2", acTable, "Table1"
CurrentDb.Execute "Delete Table2.* From Table2;",dbFailOnError

Then compact the database.

--
Fred
Please respond only to this newsgroup.
I do not reply to personal e-mail

"Del" <(E-Mail Removed)> wrote in message
news:052D9C4B-E2A6-44D4-86F5-(E-Mail Removed)...
> I'm trying to create a second table in my DB with the same structure as an
> existing table but without the data. This code copies both the structure
> and
> the data.
>
> DoCmd.CopyObject , "Table2", acTable, "Table1"
>
> How can I copy just the structure?
> --
> Thank you,
> Del

TransferDatabase will do the job. Just specify CurrentDb.Name for the
receiving database.

DoCmd.TransferDatabase acExport, "Microsoft Access", _
CurrentDb.Name, acTable, "SourceTableName", _
"DestinationTableName", StructureOnly:=True

Thanks, this worked for me.

There is one confusing thing. The default for the database type is supposed
to be Microsoft Access, but when I leave it blank (comma only) I get an
error. Oh well.
--
Thank you,
Del


"Dirk Goldgar" wrote:

> "Del" <(E-Mail Removed)> wrote in message
> news:052D9C4B-E2A6-44D4-86F5-(E-Mail Removed)...
> > I'm trying to create a second table in my DB with the same structure as an
> > existing table but without the data. This code copies both the structure
> > and
> > the data.
> >
> > DoCmd.CopyObject , "Table2", acTable, "Table1"
> >
> > How can I copy just the structure?
>
>
> If you want to do it manually, you can copy and paste, choosing "Structure
> Only" when prompted. If you want to do it programmatically, you can use
> TransferDatabase, specifying the current database as the target of an export
> and giving True for the StructureOnly argument, like this:
>
> Docmd.TransferDatabase acExport, "Microsoft Access", _
> CurrentDb.Name, acTable, _
> "Table1", "Table2", _
> True
>
> --
> Dirk Goldgar, MS Access MVP
> www.datagnostics.com
>
> (please reply to the newsgroup)
>
>