在Access 2007中快速更改表格的数据类型

Question

我有一个表格，其中包含从excel导入的> 100列，以便访问2007，并且我想将所有字段的数据类型更改为备忘录，手动点击数据类型下拉列表一个接一个，我可以通过VBA或SQL语句来完成吗？谢谢！

Answer 1

我固定它最后：

Dim db As DAO.Database 
Dim tdf1 As DAO.TableDef 
Dim fld As DAO.Field 

Set db = CurrentDb 
Set tdf = CurrentDb.OpenRecordset("ssi_10q12_v5_table") 
Set tdf1 = db.CreateTableDef("ssi_10q12_v5_table_1") 


    Debug.Print tdf.Name, 
    Debug.Print tdf.Fields.Count 
    For x = 0 To tdf.Fields.Count - 1 
     Debug.Print tdf.Fields(x).Name, 
     Set fld = tdf1.CreateField(tdf.Fields(x).Name, dbMemo) 
     tdf1.Fields.Append fld 

    Next x 

db.TableDefs.Append tdf1 
Set fld = Nothing 
Set tdf = Nothing 

End Sub 

看看这可以再帮人在这里，谢谢。