Year関数を使用したプログラミング例を紹介します。
例題
表示されている時刻（B1セル）から年のみを抽出して表示（B2セル）します
[実行前]：
表示されている時刻は「2020/9/4 11:50:15」です。
[実行後]：
年は2020年なので「2020」を抽出して表示します。
プログラミング
プログラミングは以下の通りとなります。
[記述例]：
Sub サンプル()
Range("B2") = Year(Range("B1"))
End Sub
Year関数を使用して表示されている時刻（B1セル）より年を抽出し、結果をB2セルに表示して下さい。
との内容になります。
ダンロード
上記で説明したファイルをダウンロードできます。ご自由にお使い下さい。