如何使用VBA获取当前年份

Question

嗨,我正在使用这个过去的线程如何使用Vba获取当前年份

答案是使用Year(Date)所以我实现它像这样:

Dim a As Integer
a = Year(Date)

但是当我尝试使用它时,我收到了一个错误

Runtime 13 : Type Mismatch

Answer 1

在Excel VBA中,您要使用DATEPART.假设您尝试获取年份的数据是有效的(很难从您问题中的小信息中获知).

从这里:

MS EXCEL:DATEPART功能(VBA)

通过语法和示例了解如何使用Excel DATEPART函数.

描述

Microsoft Excel DATEPART函数返回给定日期的指定部分.

句法

Microsoft Excel DATEPART函数的语法是:

DatePart(间隔,日期,[firstdayofweek],[firstweekofyear])

这个具体的例子:

DatePart("yyyy","15/10/2012")将返回2012年