| |
きりんと申します。
作業を効率化したいので、VBA初心者ですが教えて頂けると助かります。
＜現状の作業＞ ※ファイル名はすべて仮です。
1. 20100701.mdbファイルをopenし、データベースのウィンドウの白地場所で
「テーブルのリンク」を選択し、下記のファイルを選択し、「リンク」をクリックする。
C:\Users\Public0701\203456.csv
2.「区切り記号付き」が選択されていることを確認し、「次へ」をクリックする。
3.「先頭行をフィールド名として使う」を選択し、「設定」においてフィールド51が「テキスト型」になっていることを確認し、「OK」を選択し「完了」とする。
1のcsvファイルがPublicフォルダに複数存在しており、1-3の作業を繰り返し
行う必要があります。
C:\Users\Public0701\203456.csv
C:\Users\Public0701\203457.csv
:
:（ざっと30ファイルほどあります。）
Public0701フォルダには、csvファイルしか存在しておらず、
すべてのcsvに対して、同作業を繰り返す必要があります。
実はPublic0701〜Public0731フォルダまであるので
同じ作業を繰り返ししております。
効率化を図るVBAなどありましたら教えていただければ助かります。
よろしくお願いいたします。
|
|
![[未読]](./data/access/image/read_icon.gif){kind=icon}
