【发布时间】:2011-04-30 03:39:07
【问题描述】:
我只需要激活某个工作表。我有一个保存工作表名称的字符串变量。
【问题讨论】:
-
是否可以接受最佳答案(@Alex 或模组)?我很乐意看到这从开放性问题中消失,只是为了适应我的强迫症^^
我只需要激活某个工作表。我有一个保存工作表名称的字符串变量。
【问题讨论】:
以下宏对您有帮助吗?
Sub activateSheet(sheetname As String)
'activates sheet of specific name
Worksheets(sheetname).Activate
End Sub
基本上你想使用 .Activate 函数。或者你可以像这样使用 .Select 函数:
Sub activateSheet(sheetname As String)
'selects sheet of specific name
Sheets(sheetname).Select
End Sub
【讨论】:
sheetname 可以是工作表索引号(整数)。即使Option Base 的值为 0,它也从索引 1 开始。
我建议你使用工作表的索引而不是工作表的名称,这样你也可以“动态地”循环工作表
for i=1 to thisworkbook.sheets.count
sheets(i).activate
'You can add more code
with activesheet
'Code...
end with
next i
它还会提高性能。
【讨论】:
Worksheets().Activate相比,这如何提高性能?
另一种(非动态)链接文本以激活不带宏的工作表的方法是使所选字符串成为实际链接。 您可以通过选择包含文本的单元格并按 CTRL+K 然后选择选项/选项卡“放置在此文档中”并选择要激活的选项卡来执行此操作。 如果您单击文本(现在是链接),则配置的工作表将变为活动/选中。
【讨论】: