ترجع الدالة 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