Question

在我正在进行的项目中，我即将完成的工作，我想确保接替我工作的人留下的东西在我离开后不会破坏。该项目是一年中每天保存的持续跟踪器，每个工作表（用于不同的感兴趣项目）都按工作表的名称分开。例如，主要表单简称为“YYYY”，其中“YYYY”是当前年份。其他工作表称为“DTDYYYY”，“MTDYYYY”，“YTDYYYY”，其中YYYY是当前年份。到2013年，如果我使用的小VBA能够获取当前的YYYY并自动找到合适的工作表，我会喜欢它。

我知道我可以使用SheetIDX约定来引用工作表。我知道我可以使用Sheets（NAME）方法。但是，我不太确定如何最好地实现我的目标。

Answer 1

Application.Sheets("Sheet1").Index
Application.Sheets(1).Name

希望这就是你所需要的。

对不起，我没有看到关于当年的最后一部分。也许这个？

Application.Sheets(Year(Date())).Activate

Answer 2

您需要一个字符串作为名称。

With ThisWorkbook
    .Sheets(CStr(Year(Date))).Select
End With

excel VBA如何从工作表名称确定工作表索引

2 个答案: