現在の日付と時刻を取得するにはどうすればよいですか?

このチュートリアルでは、VBA コードを使用して今日の日付と時刻を取得するさまざまな方法を学びます。

VBAでの今日の日付

VBAには、現在の日付を取得するために使用できる「 DATE 」と呼ばれる関数があります。この関数を使用すると、次の例のように、システムの日付設定に基づいて現在の日付が返されます。

 Sub myMacro() Range("A1") = Date End Sub

このコードを実行すると、セル A1 に現在の日付が入力され、Excel の現在の日付形式が使用されます。

次のコードのように、この関数を使用してメッセージボックス内の今日の日付を取得することもできます。

 Sub myMacro() MsgBox Date End Sub

同様に、今日の日付と時刻を取得するために使用できる「 NOW 」という関数があります。ご覧のとおり、次のコードでこれを使用して、セル A1 の現在の日付と時刻を取得しています。

 Sub myMacro() Range("A1") = Now End Sub

ここで、日付と時刻の代わりに現在時刻のみを取得したい場合は、now 関数とともに別の関数「Format」を使用する必要があります (この関数の詳細については、こちらを参照してください)。

上記のコードでは、now 関数を使用して format 関数の値を提供し、時刻のみにフォーマットを使用しました。

 Sub myMacro() Range("A1") = Format( Now , "HH:MM Am/Pm") End Sub

format 関数を使用して、現在の日付の形式を変更することもできます。次のコードでは、format 関数を使用し、形式を「YYYYMMDD」として指定しています。

 Sub myMacro() Range ("A1"). Value = Format ( Date , "YYYY/MM/DD") End Sub

注: 上記のコードでは、value プロパティを使用してセル A1 に日付を入力しました。