技術情報
Year
年を返します。

定義
Year(引数1)
  • 引数1(必須)
  • 日付を表す値を指定します。
    日付を表す文字列でも内部形式がDate型のVariant値でも構いません。

説明
引数1で指定した日付の年を整数で返します。

Dim a

'今日が何年かを返します
a = Year(Now)

'2009/4/13が何年かを返します
a = Year("2009/4/13")