お世話になります。
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
アクセスで数値型のフィールドにNullをいれたい
その他(データベース)
-
5
ACCESS2007インポート時の空白行列削除につ
その他(Microsoft Office)
-
6
アクセスで#エラーを表示させない方法は?
Access(アクセス)
-
7
アクセスのエラー「クエリには出力フィールドが1つ以上必要です。」
その他(Microsoft Office)
-
8
Access で項目にブランク(スペース)を入力出来ないのですが?
Word(ワード)
-
9
AccessVBAで作成したExcelファイルを削除する方法は?
Visual Basic(VBA)
-
10
「#エラー」の回避
Access(アクセス)
-
11
Accessで数値型にNULLをInsertするとエラー
その他(データベース)
-
12
Access テキスト型に対する指定桁での0埋め方法
その他(データベース)
-
13
アクセスで入力したデータの順番が変わってしまいます
その他(ビジネス・キャリア)
-
14
Accessのマクロでモジュールを実行させたい。
Access(アクセス)
-
15
ACCESSでVBAから選択クエリの抽出条件を指定したい
Access(アクセス)
-
16
ODBCリンクの際にACCESSでは読み取り専用にしたい!
Oracle
-
17
Accessで、1つの項目に複数の置換えを1度でするには?
Access(アクセス)
-
18
Accessのデータのインポートで重複分を排除
その他(Microsoft Office)
-
19
ACCESSで空白のデーターをクエリで判定/識別する方法を教えてくださ
Access(アクセス)
-
20
【ACCESS/必須条件とOR条件を組み合わせる】
その他(Microsoft Office)
関連するカテゴリからQ&Aを探す
おすすめ情報
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
Excel 2019 のピボットテーブル...
-
エクセルVBAで5行目からオート...
-
Oracle 2つのDate型の値の差を...
-
Access テキスト型に対する指定...
-
エクセルグラフの凡例スペース
-
access2000:フォームで入力し...
-
セルの右クリックで出る項目を...
-
Excelで空白以外の値がある列の...
-
BIOSでAHCIに設定したいが、項...
-
複数のレコードを1つのレコード...
-
SUBSTRING 関数に渡した長さの...
-
空白をそのままインポートする...
-
ORACLEでLONG項目からCHAR項目...
-
2行目を表示できますか?
-
Accessで数値型にNULLをInsert...
-
SQLのSELECT文で*を使わない理由
-
SQLでの変数の扱いについて
-
APN設定について教えていただけ...
-
DBのタイプの指定とサイズにつ...
-
ピボットテーブルについて 列フ...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
Excel 2019 のピボットテーブル...
-
エクセルVBAで5行目からオート...
-
Oracle 2つのDate型の値の差を...
-
セルの右クリックで出る項目を...
-
Access テキスト型に対する指定...
-
SUBSTRING 関数に渡した長さの...
-
Accessで数値型にNULLをInsert...
-
APN設定について教えていただけ...
-
エクセルグラフの凡例スペース
-
ORACLEでLONG項目からCHAR項目...
-
複数のレコードを1つのレコード...
-
空白をそのままインポートする...
-
アンドロイド おサイフケータイ...
-
access2000:フォームで入力し...
-
VBAで複数の数式セルを最終行ま...
-
株に関する用語集
-
必須入力項目と入力必須項目
-
他テーブルで一致する列から名...
-
BIOSでAHCIに設定したいが、項...
-
datファイルからaccessにインポ...
おすすめ情報