お世話になります。
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も見ています
-
プロが教えるわが家の防犯対策術!
ホームセキュリティのプロが、家庭の防犯対策を真剣に考える 2組のご夫婦へ実際の防犯対策術をご紹介!どうすれば家と家族を守れるのかを教えます!
-
アクセスでのテキストデータ取り込みについて
その他(データベース)
-
インポート時のエラー「データ型の変換エラー」
Access(アクセス)
-
ACCESSのデータに自動で半角スペースを入れたい
その他(データベース)
-
-
4
アクセスで数値型のフィールドにNullをいれたい
その他(データベース)
-
5
アクセスのエラー「クエリには出力フィールドが1つ以上必要です。」
その他(Microsoft Office)
-
6
アクセスで#エラーを表示させない方法は?
Access(アクセス)
-
7
Accessで数値型にNULLをInsertするとエラー
その他(データベース)
-
8
ACCESS2007インポート時の空白行列削除につ
その他(Microsoft Office)
-
9
OR関数
その他(Microsoft Office)
-
10
レコードを保存するコード アクセスvba
その他(Microsoft Office)
-
11
ACCESSで空白のデーターをクエリで判定/識別する方法を教えてくださ
Access(アクセス)
-
12
アクセスVBAで既に開いているエクセルを閉じたい
Yahoo!ショッピング
-
13
アクセスのデータ型。数値型についてお聞きしたいのですが・・・
Access(アクセス)
-
14
Accessのマクロでモジュールを実行させたい。
Access(アクセス)
-
15
ACCESSでVBAから選択クエリの抽出条件を指定したい
Access(アクセス)
-
16
エクセルのデータをアクセスにインポートしたいのですが、フィールド名として使用できないデータがあるようで・・
Access(アクセス)
-
17
Access で項目にブランク(スペース)を入力出来ないのですが?
Word(ワード)
-
18
アクセスで入力したデータの順番が変わってしまいます
その他(ビジネス・キャリア)
-
19
MS Accessでフォームの「開く時」と「読込み時」のイベントの違い
Access(アクセス)
-
20
Access サブフォームでの選択行の取得
その他(データベース)
関連するカテゴリからQ&Aを探す
おすすめ情報
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
Excel 2019 のピボットテーブル...
-
Oracle 2つのDate型の値の差を...
-
エクセルVBAで5行目からオート...
-
Accessで数値型にNULLをInsert...
-
Access テキスト型に対する指定...
-
ORACLEでLONG項目からCHAR項目...
-
他テーブルで一致する列から名...
-
Accessの表形式のフォームについて
-
セルの右クリックで出る項目を...
-
SUBSTRING 関数に渡した長さの...
-
access2000:フォームで入力し...
-
エクセルグラフの凡例スペース
-
Joy To Keyのマウスやキーボー...
-
複数のレコードを1つのレコード...
-
空白をそのままインポートする...
-
Accessレポートで特定条件で改...
-
Accessのハイパーリンク...
-
Access又はExcelで256項目を超...
-
項目が部分的に違う複数のCSVを...
-
第2正規化と第3正規化の違い
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
エクセルVBAで5行目からオート...
-
Oracle 2つのDate型の値の差を...
-
Access テキスト型に対する指定...
-
セルの右クリックで出る項目を...
-
アンドロイド おサイフケータイ...
-
BIOSでAHCIに設定したいが、項...
-
Excel 2019 のピボットテーブル...
-
エクセルグラフの凡例スペース
-
正しく入力されていない項目も...
-
SUBSTRING 関数に渡した長さの...
-
複数のレコードを1つのレコード...
-
access2000:フォームで入力し...
-
必須入力項目と入力必須項目
-
Accessで数値型にNULLをInsert...
-
パソコンで画像ファイルを手持...
-
Accessレポートで特定条件で改...
-
空白をそのままインポートする...
-
2行目を表示できますか?
-
ORACLEでLONG項目からCHAR項目...
-
VBAで複数の数式セルを最終行ま...
おすすめ情報