プロフィール
VBA

RecordSetからcsv、tsvファイルを出力する

Accessのテーブルからtsvファイルを出力しようとしたところ、意外と簡単に出す方法がありませんでした。

備忘録のために残しておこうと思います。

※カンマ区切りのcsv出力はTransferTextでできるのですが、不便なので。

作成したAccessファイルはヤフーボックスにあげておきます。

https://yahoo.jp/box/cPnbyi

コード

 

やる処理はざっくり説明すると以下です。

①ヘッダーをRecordSetから区切り文字付きで取り出す
②データをRecordSetから区切り文字付きで取り出す
③ファイルにヘッダーとデータを出力

 

VBA C# オススメ参考書プログラミングの参考書でオススメの紹介をしていきます。 それぞれ私が使っている言語のみです。 VBAのオススメ参考書をExc...

出力結果

実際に作った処理を動かしてみます。

テーブルの中身

出力元のテーブルは以下のようになっています。

supplier_cd addr post_num tel fax
301101 明治屋 埼玉県川越市 NULL 03-****-****
301102 パスコ 東京都江戸川区 NULL 4-****-****
301103 ライヘルフ 大阪府東大阪市 NULL 5-****-****
301104 リプトン紅茶 東京都港区 NULL 6-****-****
301105 上島珈琲 横浜市中区 NULL 7-****-****
301106 流通パートナーズ NULL NULL 8-****-****
301107 全食 千葉市美浜区 NULL 9-****-****
301108 大地 新潟県新潟市 NULL 10-****-****
301109 明治乳業 東京都江東区 NULL 11-****-****
301200 キッコーマン 千葉県野田市 NULL NULL
301201 片岡物産 川崎市川崎区 NULL NULL
301202 ロイヤル食品 福岡市那珂区 NULL NULL
301203 東京製菓 東京都大田区 NULL NULL
301204 武州フーズ 埼玉県入間郡 NULL NULL
301205 コカコーラボトリング NULL NULL NULL

出力結果

キレイに出力することができました。

※RecordSetにテーブルのデータを取得する箇所は別のところで紹介します。

RecordSetにテーブルのデータを取得するC#やVB.netを経験してからVBAを扱うと、DataTableってVBAにはないの?と思ってしまいますよね。 DataTabl...

COMMENT

メールアドレスが公開されることはありません。 * が付いている欄は必須項目です