怎么用vba在access中创建新表

把下面的过程放到任何一个模块中 Public Sub CreateTabel(rst As DAO.Recordset, TabelName As String) Dim TS As TableDefs Dim T As TableDef Dim F As DAO.Field Set TS = CurrentDb.TableDefs Set T = New TableDef rst.MoveFirst For Each

有几个接近的办法： 1.用数据透视表 2.打开一个新表。菜单 数据——〉导入外部数据——〉新建数据库查询，按提示 *** 作。选择源数据并设定筛选条件，就可以得到筛选的数据。 以上其实都不是真正的新表，而只是形成一个查询的结果。源数据如果有变

---