creating new table in VBA

[jcg]

Can someone provide the VBA code for creating a new table in an access database called "stock1" with fields 1,2 and 3.

Any help would be appreciated.

Jim

 

[dk]

Hi,

The simplest way is to execute a CREATE TABLE SQL statement in your code e.g.

Sub CreateATable()
DoCmd.RunSQL "CREATE TABLE stock (1 TEXT(50), 2 TEXT(50), 3 TEXT (50))"
End Sub

This will create a table with 3 text fields of length 50 characters. To create a numeric field use INT instead of TEXT. There are other data types. Post back if you want something different.