More than 5 years have passed since last update.

Q12.今日の日付をyyyymmdd形式で取得するには？

Last updated at 2020-01-19Posted at 2020-01-19

例えば、ファイル名とかに取得したタイミングの日付を末尾につけたりするケースとかありますよね。
aaa_2020mmddみたいな感じでね。
当日の日付をyyyymmdd形式で取得するにはどうしたらいいでしょう？
実はVBAでは簡単に取得することができます。

今回は、単純に当日日付をダイアログで表示するだけのごくシンプルなマクロを作ってみましょう。

Sub Q12_Answer()
    MsgBox Format(Date, "yyyymmdd")
End Sub

Format関数を使うだけのシンプルなコードです。
Format関数を使うといろいろな形式で表現することができます。

例えば、yyyy/mm/ddといった区切りに/を使った表現とかね。

今回はファイル名でつけることを想定して考えたのでこのような形式にしています。

実行結果は以下です。(2020/01/19に実行しています。)