<Access>基本からVBAまでまるわかり!独学時に使える参考書

【Access】CSVファイルなどの日付抽出のVBAコードと方法

スポンサーリンク
アクセス【Access】

Excelのファイルを利用すときとかありませんか??

 

私はCSVファイルから商品データ抽出して参照しているんですが、CSVの名前が毎日変わるんですよ。名前が変わるというか名前の後ろに当日の日付が入るんです。

 

説明が悪いので、どういう意味?って思うかもしれませんが、こういう意味です。↓

 

『商品リスト_2017年04月10日.csv』っていう具合です。

 

Accessからボタンクリックひとつでデータをインポートするには、日付が邪魔なんです。

 

そこで、日付を合わせてインポートするという意味で作ったんですが、最後にインポートした日付を表示するのにも使えました。

 

データをインポートした最終日をそこから抽出し、テキストボックスに表示しました。

 

そのコードがこちらです。

 

 

最後のMe.日付=がテキストボックスに表示する部分になります。

 

どんな感じで見積書に使用したかというと、こんな感じです。

 

 

赤く囲っているところが抽出した日付を書き込んだところです。

 

ただファイルの日付を取り出して表示しただけなんですが、こういう風に見えるとデータの最終更新日が見えて、親切かつちょっと多機能に見えるでしょ?

 

ただの自己満足なんですけどね。

 

こんなやり方もありだと思います。