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

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

このQ&Aに関連する最新のQ&A

A 回答 (1件)

TransferSpreadsheet メソッド


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

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

ありがとうございます!

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

お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!


人気Q&Aランキング

おすすめ情報