VBA 年月日をそれぞれ取得する

  • 作成日 2022.09.24
  • vba
VBA 年月日をそれぞれ取得する

VBAで、年月日をそれぞれ取得するコードを記述してます。

環境

  • OS windows10 64bit

サンプルコード

年月日をそれぞれ取得するには、「Date」に対してそれぞれ、年「Year」月「Month」日「Day」を使用します。

Debug.Print Year(Date) ' 2021
Debug.Print Month(Date) ' 9
Debug.Print Day(Date) ' 28

適当なボタンを用意して、セル上に年月日をそれぞれ表示する
以下のソースコードを記述します。

ソースコード

Option Explicit

Private Sub CommandButton1_Click()

    Cells(3, 2).Value = Year(Date)
    Cells(3, 3).Value = Month(Date)
    Cells(3, 4).Value = Day(Date)

End Sub

ボタンをクリックすると、年月日が表示されていることが確認できます。