Excel - 如何选择仅复制的工作表

时间:2014-07-04 23:03:50

标签: excel excel-vba vba

我有以下代码行作为我的VBA宏的一部分。

Sheets("sheetName").copy After:=Sheets(Sheets.count)
Set copySheet = Sheets(Sheets.count)

上面的代码应该复制带有name,sheetName的工作表,然后将复制的工作表设置为copySheet。它从第二次运行宏时以某种方式正确运行。第一次,它选择了错误的表格。

因为我想要复制的工作表是隐藏的,所以我也不认为我可以使用Set copySheet = ActiveSheet

因此,作为一种解决方案,我正在寻找一种方法或变量,我可以选择复制的表格'。 VBA有这样的命令或变量吗?

1 个答案:

答案 0 :(得分:0)

“活动”对象并不总是很好用,但以下是另一种选择:

Sub SetSt()

Dim copySheet As Excel.Worksheet

Sheets("sheetName").Copy After:=Sheets(Sheets.Count)
Set copySheet = Sheets(Excel.ActiveSheet.Name)

End Sub

对我而言,无论是否隐藏工作表,如Brettdj,我的原始代码都没有问题。