激活工作簿中的工作表，其名称与当前日期的日期相匹配

Question

第一篇文章！

所以我有一个宏可以在5个不同的工作表上更新工作簿中的数据。每张表都以星期一至星期五的星期几命名。

我希望宏可以在完成后激活与当前日历日相匹配的那张表，但似乎无法找出代码。

例如，如果我在星期三运行更新代码，我希望标题为＆＃34; Wednesday＆＃34;作为最后一步被激活。

非常感谢任何和所有的帮助，如果我遗漏了任何内容，请道歉！

Answer 1

尝试：

Dim tDay as String
tDay = Format(Date,"dddd")
Thisworkbook.Sheets(tDay).Activate

Answer 2

好的，使用Jordan的建议我能够解决我的问题，结果代码如下。

 Dim tDay As String<br>
 tDay = Format(Date, "dddd")<br>
 Sheets(tDay).Select

非常感谢!!!