![](http://oshiete.xgoo.jp/images/v2/pc/qa/question_title.png?8acaa2e)
![](http://oshiete.xgoo.jp/images/v2/common/profile/M/noimageicon_setting_10.png?8acaa2e)
お世話になります。
ACCESSのインポート機能で、以下のテキストをインポートしようと
しています。
001,aaaaa_____,99999
002,bbbbbbb___,99999
003,ccc_______,99999
(_は空白を意味します。)
この2カラム目が空白を含めて10バイトなのですが、
固定長でインポートしても、カンマ区切りでインポートしても
インポート後のテーブルには後ろの空白はカットされてしまいます。
VARCHARではなくCHARのイメージでインポートする方法はありますでしょうか。
よろしくお願いします。
No.1ベストアンサー
- 回答日時:
自力でインポートするしかないようですね。
Sub インポート()
Dim SQL AS String
Dim 行 AS String
Dim 項目
'テーブルのデータを消去(必要に応じて)
CurrentDb.Execute "DELETE * FROM hoge"
'テキストファイルを開く
Open "C:\~\hoge.txt" For Input As #1
'EOFまでのループ
Do Until EOF(1)
'1行読み込み
Line Input #1, 行
'カンマで分離
項目 = Split(行, ",")
'SQL構築
SQL = "INSERT INTO hoge VALUES"
SQL = SQL & "('" & 項目(0) & "'"
SQL = SQL & ",'" & 項目(1) & "'"
SQL = SQL & "," & 項目(2) & ")"
'SQL実行
CurrentDb.Execute SQL
Loop
Close
End Sub
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Access(アクセス) access,vbaでフォルダ内のファイルをテーブルにインポート、ファイル名もフィールドに追加したい 1 2022/08/31 11:11
- Excel(エクセル) capeofdragonと申します Excel2016を使っておりまして 半角又は全角の任意文字列が 2 2022/10/31 13:51
- Outlook(アウトルック) 【 Windows 10 】アドレス帳に正しくインポートを完了させたい。 3 2023/04/23 13:41
- Access(アクセス) Access2016のExcelインポートの機能のことで教えてください 1 2022/09/11 14:58
- Excel(エクセル) CSVファイルがカンマ区切りにならない。対処法を教えていただきたいです。 仕事でSMS一斉送信ができ 2 2022/07/01 21:24
- 写真・ビデオ iphoneからPCへ写真をインポート、保存先がわかりません。 2 2022/09/29 02:06
- 音楽配信 Spotifyでインポートした曲とSpotifyで配信されている曲の音量差がある件について 1 2023/04/02 00:02
- Chrome(クローム) ブラウザのブックマークの同期の仕方についてお尋ねします。 1 2022/08/10 16:44
- iPhone(アイフォーン) iPhoneの写真をパソコンに取り込めない(問題が発生しましたとでてしまう) 8 2022/10/06 17:26
- サッカー・フットサル 至急お願いします! プレステ4のウイイレ2021やっていますがあのいわゆる神データというのをUSBで 1 2022/05/05 17:43
このQ&Aを見た人はこんなQ&Aも見ています
-
性格の違いは生まれた順番で決まる?長男長女・中間子・末っ子・一人っ子の性格の傾向
同じ環境で生まれ育っても、生まれ順で性格は違うものなのだろうか。家庭教育研究家の田宮由美さんに教えてもらった。
-
アクセスでのテキストデータ取り込みについて
その他(データベース)
-
ACCESSのデータに自動で半角スペースを入れたい
その他(データベース)
-
インポート時のエラー「データ型の変換エラー」
Access(アクセス)
-
-
4
ACCESS2007インポート時の空白行列削除につ
その他(Microsoft Office)
-
5
エクセルからアクセスにインポートすると、エラーが出てしまいます。原因を教えていただけませんか。
Access(アクセス)
-
6
Access で項目にブランク(スペース)を入力出来ないのですが?
Word(ワード)
-
7
Access インポート
Access(アクセス)
-
8
アクセスで数値型のフィールドにNullをいれたい
その他(データベース)
-
9
ACCESSで空白のデーターをクエリで判定/識別する方法を教えてくださ
Access(アクセス)
-
10
Accessにインポートしようとするとエラーに
Access(アクセス)
-
11
Access2000 テキストデータのインポート
Access(アクセス)
-
12
Access2003 クエリで、空の列は作れますか?
Access(アクセス)
-
13
Accessにインポートしたら並び順が変わっちゃった
Access(アクセス)
-
14
アクセスで入力したデータの順番が変わってしまいます
その他(ビジネス・キャリア)
-
15
ACCESSにEXCELからインポートした時に先頭に空列ができる
Excel(エクセル)
-
16
エクセルのデータをアクセスにインポートしたいのですが、フィールド名として使用できないデータがあるようで・・
Access(アクセス)
-
17
Accessでテーブルの値をテキストボックスに代入するには?
Access(アクセス)
-
18
「#エラー」の回避
Access(アクセス)
-
19
ACCESSで400以上のフィールドがある場合の作成方法‥
その他(データベース)
-
20
Access 同じデータをたくさんのレコード(同一列)に一度に入力するには
Access(アクセス)
関連するカテゴリからQ&Aを探す
おすすめ情報
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
Excel 2019 のピボットテーブル...
-
エクセルVBAで5行目からオート...
-
Oracle 2つのDate型の値の差を...
-
SUBSTRING 関数に渡した長さの...
-
セルの右クリックで出る項目を...
-
access2000:フォームで入力し...
-
Accessレポートで特定条件で改...
-
Accessで数値型にNULLをInsert...
-
空白をそのままインポートする...
-
Access テキスト型に対する指定...
-
複数のレコードを1つのレコード...
-
APN設定について教えていただけ...
-
VBAで複数の数式セルを最終行ま...
-
Excel 関数
-
アンドロイド おサイフケータイ...
-
エクセルグラフの凡例スペース
-
必須入力項目と入力必須項目
-
jwwのクロスラインカーソルの角...
-
ORACLEでLONG項目からCHAR項目...
-
datファイルからaccessにインポ...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
Excel 2019 のピボットテーブル...
-
エクセルVBAで5行目からオート...
-
Access テキスト型に対する指定...
-
Oracle 2つのDate型の値の差を...
-
エクセルグラフの凡例スペース
-
SUBSTRING 関数に渡した長さの...
-
ORACLEでLONG項目からCHAR項目...
-
必須入力項目と入力必須項目
-
セルの右クリックで出る項目を...
-
BIOSでAHCIに設定したいが、項...
-
複数のレコードを1つのレコード...
-
APN設定について教えていただけ...
-
VBAで複数の数式セルを最終行ま...
-
2行目を表示できますか?
-
Accessで数値型にNULLをInsert...
-
access2000:フォームで入力し...
-
SQLでの変数の扱いについて
-
SELECT文でLEFT関数を使うと未...
-
空白をそのままインポートする...
-
datファイルからaccessにインポ...
おすすめ情報