VBA：将工作表与当前date分配给对象

一块我的macros添加一个新的工作表与当前的date，但是当我想分配工作表到一个对象不起作用。 我得到了

运行时错误9

Dim shA As Worksheet Set shA = Worksheets(Date) 

谁能帮忙？

Answer 1

您需要将Date转换为String格式，具体取决于date的格式。

 Dim shA As Worksheet Set shA = Worksheets(Format(Date, "dd.mm.yyyy")) 

Answer 2

考虑到您的计算机date格式为DD.MM.YYYY ，如果您正在寻找更改工作表的选项卡名称，那么它是这样的：

ActiveSheet.name = Date()

要么

shA.Name = Date()

因此，你会得到这个：