ترجع الدالة VBA Year عددًا صحيحًا مطابقًا لسنة التاريخ المحدد.
Year (التاريخ)
استخدام الوظيفة Year لاسترداد المعلومات ذات الصلة من تاريخ:
Sub YearExample1()
myDate = #10/30/2020#
MsgBox Year(myDate) 'العوائد: 2020
End Sub
تقبل هذه الوظيفة أيضًا تاريخًا بتنسيق نصي:
Sub YearExample2()
myDate = "30/10/2020"
MsgBox Year(myDate) 'العوائد: 2020
End Sub