быстро изменить тип данных таблицы в Access 2007 - PullRequest
Новая
       6

быстро изменить тип данных таблицы в Access 2007

0 голосов
/ 24 февраля 2011

У меня есть таблица с> 100 столбцами, импортированными из Excel для доступа к 2007 году, и я хочу изменить все типы данных полей в memo, надоело вручную нажимать на выпадающий список типов данных по одному, могу ли я это сделать?это VBA или оператор SQL?Спасибо!

1 Ответ

0 голосов
/ 24 февраля 2011

Я наконец исправил: 

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

Посмотрите, может ли это кому-нибудь помочь, еще раз спасибо.

...