アクセス【Access】

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

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

 

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

 

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

 

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

 

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

 

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

 

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

 

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

 

 

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

 

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

 

 

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

 

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

 

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

 

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

アニメ見るならココ!おすすめのVOD

アニメ好きの私がおすすめのVOD(ビデオオンデマンド)です。

価格、アニメ数においても総合1位は『dアニメ』!



初回ご加入時に限り、31日間無料でお試し! ドコモのケータイ以外も登録可能!

アニメ作品数No.1の見放題サイト! ※国内の定額動画配信サービスにおいて。2018年3月時点、NTTコム オンライン・マーケティング・ソリューション株式会社調べ。

 

スマートフォン・タブレット・パソコンも対応 !Chromecastなら高画質で視聴可能!!

RELATED POST