フォルダーの中にCSVが複数入っている状態で
そのCSVの中も可延長ファイルで複数レコードが入っているファイルを読み込む方法を教えてください。
例1)
D:\フォルダー
-----------
AAA.CSV
BBB.CSV
CCC.CSV
-----------
例2)
AAA.CSVの中
-----------
11111,aaaa,ああああああああああ,22222,222
2222222,bb,いい,33333333333333,33333
33333,ccccc,ううううううう,4444,555555
-----------
BBB.CSVの中
-----------
44,dddd,ああああああああああ,22222,222
55555,eeeee,いい,33333333333333,33333
66666,fffffff,ううううううう,4444,555555
77777,GGGGG,ううううううう,4444,555555
-----------
CCC.CSVの中
-----------
8888,hhhh,ああああああああああ,22222,222
999,iiiiii,いい,33333333333333,33333
-----------
※各項目は256バイド以上あるため、VBAコードを使用したいと考えています。
よろしくお願いします
No.1ベストアンサー
- 回答日時:
CSVを一度テーブルに突っ込めばよくないですか?
テーブルに突っ込んだあと、必要ならばSQLで取得したりすればよいのでは。
https://www.feedsoft.net/access/tips/tips93.html
Public Sub Test()
DoCmd.TransferText acImportDelim, , "AAA_CSV", "D:\hoge\AAA.csv"
DoCmd.TransferText acImportDelim, , "BBB_CSV", "D:\hoge\BBB.csv"
DoCmd.TransferText acImportDelim, , "CCC_CSV", "D:\hoge\CCC.csv"
End Sub
もう1つの方法として、schema.iniを用意してその情報を元にインポートする方法があります。
https://docs.microsoft.com/ja-jp/sql/odbc/micros …
https://blog.esrij.com/2010/06/18/schemaini-301f/
ファイルと同じところにshcema.iniというファイルを置いて、中身を以下のように記述。
[AAA.csv]
ColNameHeader=False
Format=CSVDelimited
Col1="列1" Long
Col2="列2" Text
Col3="列3" Text
Col4="列4" Double
Col5="列5" Long
VBAを実行
Public Sub Test2()
DoCmd.SetWarnings False
Dim sql As String
sql = "SELECT * INTO [AAA_CSV] FROM ['TEXT;DATABASE=D:\hoge'].[AAA.CSV]"
DoCmd.RunSQL sql
DoCmd.SetWarnings False
End Sub
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Excel(エクセル) エクセルのVBAについて とあるサイトのコードを参考に、CSVの文字化けを直すVBAを作成しているの 7 2022/11/04 14:15
- その他(プログラミング・Web制作) データ解析ソフトRでのファイル入力read.csvがエラーになります 7 2022/03/27 22:11
- Visual Basic(VBA) 複数のcsvファイルをExcelに一括変換したい 2 2023/03/03 12:44
- XML PHP.laravelについて 1 2023/07/06 15:26
- Visual Basic(VBA) VBA初心者です。電話番号の数字の前に0を表示させたいです。 2 2022/12/14 03:58
- Access(アクセス) CSVファイルの「0落ち」にVBA 6 2023/02/02 15:27
- Excel(エクセル) CSVファイルでVBAを動かす方法 3 2023/04/04 10:22
- Visual Basic(VBA) マクロを教えてください。 7 2023/06/01 19:47
- Visual Basic(VBA) vbaマクロについて 【1.csv】をもとに【商品.csv】に有るものを【有り.csv】として名前を 1 2023/05/18 07:58
- Excel(エクセル) エクセルでcsvファイルを開いてVBAを使いたい 7 2022/04/28 11:12
このQ&Aを見た人はこんなQ&Aも見ています
関連するカテゴリからQ&Aを探す
おすすめ情報
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
CSV形式での保存時に”文字列...
-
カンマ区切りのCSVファイルから...
-
マクロから出力されるcsvのダブ...
-
c#でcsvから指定の1行だけを読...
-
複数のcsvファイルをExcelに一...
-
バッチでCSVを処理する時、空の...
-
エクセルVBA 大容量CSVファイル...
-
複数のCSVファイルのAccessテー...
-
VBAでCSVファイルのデータを集...
-
C# datagridview csv 読込
-
データ解析ソフトRでのファイル...
-
csvファイルでの日付設定「yyyy...
-
VBAでcsvファイルを読み込んで...
-
PHP.laravelについて
-
特定ファイルの一括削除
-
CSV形式のファイルを読み込んで...
-
特定文字を入ってるCSVの特定の...
-
CSVファイルの項目行を削除...
-
VBSでソート&ファイル分割
-
Visual C++によるcsvファイルの...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
カンマ区切りのCSVファイルから...
-
CSV形式での保存時に”文字列...
-
複数のcsvファイルをExcelに一...
-
csvファイル 項目数取得
-
csvファイルでの日付設定「yyyy...
-
バッチでCSVを処理する時、空の...
-
マクロから出力されるcsvのダブ...
-
csvファイルを列数ごとに分割す...
-
csvファイルのデータの一部を取...
-
エクセル形式のファイルの読み込み
-
エクセルVBA 大容量CSVファイル...
-
CSVファイル作成
-
EXCEL|csvで保存→開くcsvを閉じる
-
CSVファイルの項目行を削除...
-
巨大なCSVの加工(指定列のみの...
-
データ解析ソフトRでのファイル...
-
VBAでCSVファイルのデータを集...
-
【ExcelVBA】UTF-8の文字コード...
-
【C#】パス名で無効な文字
-
【エクセル マクロ】読み込ん...
おすすめ情報