VBAで Line Input を使ってCSVを1行ずつ読み、Split(行, ",") で列に分ける方法はよく使われます。ところが、金額の「"1,000"」や住所の「"東京都港区1-2-3, ABCビル"」のように、ダブルクォーテーションで囲まれた値の中にカ...
Excel・CSV
Excel・CSVの記事一覧
毎朝同じクエリをCSVで出力する作業は、Windowsのタスクスケジューラを使えば、Accessを手で開かずに実行できます。仕組みは単純で、決まった時刻にAccessを起動し、出力用のマクロを実行して、終わったらAccessを閉じるだけです。 ただし、無人で動かす場合は、エラーのダイアログや起動時の確認画面が出ると、誰...
同じ請求番号や同じ取引先の行が何行もある明細を、キーごとに1行にまとめたいことがあります。Power Queryの「グループ化」を使うと、金額は合計し、品目や担当者などの文字列はカンマ区切りで1つのセルにつなげられます。 グループ化は複数の行を1行に畳む処理です。設定を誤ると、金額が合わなくなったり、列が消えたり、同じ...
共有フォルダにある納品物や請求書PDFの一覧を、ファイル名を1つずつ書き写して作っていると、ファイルが追加・更新されるたびに作り直すことになります。Power Queryの「フォルダーから」を使えば、フォルダ内のファイル名・拡張子・更新日時・保存場所を表として取り込めます。一度作れば、あとは［更新］を押すだけで最新の一...
フォルダに毎日・毎月たまっていくCSVを、Accessへ1つずつ手で取り込んでいると、どのファイルを取り込んだのか分からなくなります。同じファイルを2回入れていないかも確かめにくくなります。 この記事では、次の流れをVBAで作ります。VBAの Dir 関数でフォルダ内のCSVを順に見つけ、DoCmd.TransferT...
「明細500行から10件を選んで中身を確認したい」というとき、VBAのRnd関数で行番号を10回作ると、同じ行が2回選ばれることがあります。Rndは呼ぶたびに独立して値を返すので、前に出た値を避けてはくれません。 この記事では、重複しない乱数を指定した個数だけ作る方法を2つ紹介します。そのうえで、明細から抜き取りチェッ...
DoCmd.TransferTextの実行時エラーは、メッセージに原因の手がかりが含まれていることが多いです。それでも、番号だけでは、どの引数が悪いのか分かりにくいことがあります。この記事では、エラー番号とメッセージから原因の当たりを付ける方法をまとめます。確かめる順番は、定義名、テーブル・クエリ名、ファイルパス、ファ...
AccessのインポートウィザードでCSVを取り込もうとすると、「インデックスが有効範囲にありません」と表示されることがあります。このメッセージだけでは原因が分かりません。ウィザードがCSVの列を数えたり、列名を取り込み先に対応付けたりする段階で、想定と実際がずれたときに出ることがあります。ここでは、見出し行、行ごとの...
VBAで Open 文と Line Input # を使ってCSVを読むと、日本語が「譌･譛ｬ」のような意味の通らない文字に変わることがあります。英数字は正しく読めるのに、日本語だけが化けるのが典型的な症状です。 多くの場合、原因はUTF-8で保存されたCSVを、Shift_JISとして読んでいることです。この記事では...
店舗別や月別に出力されたCSVを、1つの表に縦にまとめるのではなく、ファイルごとに別のシートとして1つのブックに並べたい場面があります。1つずつ開いてコピーする方法だと、貼り付け先のシートを間違えたり、先頭の0が消えたり、文字化けしたりといったミスが起きやすくなります。 この記事では、次の2つの方法を説明します。 VB...
