使用VBA获取当前年份,可以使用Date函数。Date函数返回当前日期和时间,可以通过Year函数提取年份。以下是一个简单的示例:
Sub GetCurrentYear()
Dim CurrentYear As Integer
CurrentYear = Year(Date)
MsgBox "当前年份是:" & CurrentYear
End Sub
在这个示例中,我们定义了一个名为GetCurrentYear的子程序。在子程序中,我们使用Date函数获取当前日期和时间,并使用Year函数提取年份。然后,我们使用MsgBox函数弹出一个消息框,显示当前年份。
请注意,这个示例是在Microsoft Excel中运行的。如果您在其他应用程序中使用VBA,您可能需要稍微修改代码以适应不同的环境。
云+社区技术沙龙[第10期]
小程序云开发官方直播课(应用开发实战)
腾讯云GAME-TECH沙龙
小程序·云开发官方直播课(数据库方向)
Hello Serverless 来了
腾讯云GAME-TECH游戏开发者技术沙龙
小程序·云开发官方直播课(数据库方向)
腾讯位置服务技术沙龙
领取专属 10元无门槛券
手把手带您无忧上云