打开工作表时，工作表类的运行时错误“ 1004”选择方法失败

Question

我的工作簿似乎有问题。当我将其复制到新文件夹或重命名时，Worksheet类的运行时错误'1004'Select方法失败。代码很简单。我是VBA的新手，不知道如何正确地将工作簿或工作表设置为“活动”。

Private Sub Workbook_Open()

Sheets("QUOTE SETUP").Visible = True
Sheets("QUOTE SETUP").Select
Range("F6").Select
End Sub

Answer 1

谢谢你。我想我现在对为什么出现此错误的了解更多。该工作簿受密码保护，并在其上设置为只读。重命名文件夹中的文件后，之后第一次打开它时。您必须启用编辑，然后输入密码。之后，打开第二个同名工作簿。书籍01为[保护视图]，书籍02为正常。那是我得到错误的时间。可能是因为两本书名称相同而在看这本书吗？

我想我是通过复制在网上找到的东西来修复它的，但是我不真正了解它现在是如何或为什么被修复但可以正常工作。 我是VBA和代码的新手，感谢您的宝贵时间，感谢所有帮助和反馈。

'Fix below 
Private Sub Workbook_SheetActivate(ByVal Wsh As Object) 
On Error Resume Next 
Wsh.Range("F6").Select 
End Sub