按钮的宏到excel的今天的表

Question

我想知道是否可以创建一个宏链接来打开名为“Today（）”的工作表？我有一个工作簿，其中包含根据日期命名的工作表以及“主页”工作表和“月末”工作表。有一个宏复制最后一张纸，为今天创建一张新纸张，其中包含昨天纸张的余额值。我想在每张纸上添加一个按钮，将我还原到以今天的日期命名的纸张。

这是我的代码

Sub TodaySheet()

Dim FindName As String, FindSheet As Worksheet

    For Each FindSheet In ActiveWorkbook.Worksheets

        If FindSheet.Name = "Today()" Then
            FindSheet.Activate
            Exit Sub
        End If

    Next

End Sub

希望我走在正确的轨道上？

Answer 1

您不需要遍历工作表，尽管它可以工作。您可以在一个声明中直接“。激活”所需的一个。