ACCESS Date関数で日付を取得する方法

ACCESSでは日付を扱うシーンが多くあります。

その中でも今日の日付を取得するDate関数はかなり多用されます。

今回は、Date関数で日付を取得する方法をご紹介します。

---

こんにちは。
はこにわガジェット （@hakoniwagadget） です。

ACCESSを使った売上管理、顧客管理などのデータベース開発を行っています。
ACCESSは使いこなすために少しスキルが必要なものの、うまく活用すればExcelよりも業務の効率化が図れます。
この記事ではACCESSをもっと使いこなしたい方向けにACCESSの関数をご紹介していきます。

Date関数

Date関数は本日の日付を取得する関数です。
以下の構文で利用できます。

Date()

非常によく使うのはテーブルやフォームの既定値設定でしょう。

例えば、下記のようなテーブルのデザインビューで日付型のフィールドの既定値にDate()を設定しておくことで、新規レコード作成時は自動的に今日の日付が入力されます。

データシートビューで見てみましょう。

新規レコードには自動的に本日の日付が入力されています。

特に日付は入力している当日の日付を入力するケースが多いため、既定値に今日の日付を設定しておくと入力効率が高まり、開発者の想定しないNull値も防ぐことができるでしょう。

また、フォームの場合はデザインビューから、プロパティシートのデータタブに既定値設定箇所があります。

VBAでのDate関数の利用

一方、ACCESS VBAでDate関数を利用する場合は、記述方法が少し異なります。

VBAの場合は

Date

で今日の日付を取得します。

下記は今日の1年後の日付を表示するプロシージャです。

 Public Sub hiduke()

    Dim hiduke_keisan As Date
    
    hiduke_keisan = DateAdd("yyyy", 1, Date)
    
    MsgBox "日付：" & hiduke_keisan, vbOKOnly + vbInformation, "日付計算結果"
    
 End Sub
 

DateAdd関数を使って、Date関数で取得した日付の1年後の日付を取得し、変数hiduke_keisanへ格納。
その後、MsgBox関数で日付を表示しています。

このように、同じACCESSでもテーブルやフォームではDate()、VBAではDateと使い分けが必要ですので注意しましょう。

以上、Date関数で日付を取得する方法をご紹介しました。

---

ACCESSを使いこなせば、業務の効率化や自動化が実現できます。
しかし、自分でACCESSを学ぶには時間がない、難しそうで不安、という方も多いでしょう。

そんな時は、ACCESS開発歴20年以上、過去に100以上のACCESSデータベースを開発してきた私（@hakoniwagadget）にお任せください。

ACCESSの新規開発、既存のACCESSの修正、ACCESSの操作レッスンなど様々なサービスをご提供しています。
ご興味のある方は下記のサービス一覧をご覧ください。

最後までお読みいただき、ありがとうございました。