2011-02-24 67 views
0

我有一個表格,其中包含從excel導入的> 100列,以便訪問2007,並且我想將所有字段的數據類型更改爲備忘錄,手動點擊數據類型下拉列表一個接一個,我可以通過VBA或SQL語句來完成嗎?謝謝!在Access 2007中快速更改表格的數據類型

回答

0

我固定它最後:

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 

看看這可以再幫人在這裏,謝謝。

+0

這會創建一個新字段,而不會更改現有字段的數據類型。它是作爲對實際問題的答案嗎? – 2011-02-26 01:55:26

+0

我計劃創建一個新表格,並用原來的表格代替 – lokheart 2011-02-27 13:37:12

+3

那麼,這些信息將成爲您問題的有用部分! – 2011-02-28 05:16:01