Access フィールドサイズ

ExcelからAccessへインポートする際にテキスト型のフィールドサイズは255となりますが、複数のフィールドを一度に同じサイズにする方法はありますでしょうか？

基本的なことかと思いますがよろしくお願いします。

No.1 ベストアンサー 回答者： imogasi 回答日時： 2009/05/15 13:36

TransferSpreadsheet メソッド

では各フィールドのサイズを指定するのは無い様です。
ーーー
（アクセス）ＶＢＡでなら
Sub test15()
Dim dbsA As Database
Set dbsA = CurrentDb
dbsA.Execute "ALTER TABLE 名簿 ALTER COLUMN [氏名] text(15)"
End Sub
でサイズが255の氏名フィールドが15になりました。こういうのを
全フィールドに渡って（dbsA("名簿").Fields.Count分）繰り返すとか。

この回答へのお礼

VBAでないと無理なんですねー
自分でもいろいろ考えたんですけど。ありそうでないんですね。

ありがとうございます！

お礼日時：2009/05/15 21:55