Question

我正在试图用Excel 2016来解决这个错误。问题很简单： Excel 2016在从Internet下载并且在用户单击“启用编辑”之后尝试引用工作簿（ActiveSheet或ActiveWorkbook）时，会引发错误。此错误在2007或2010 Excel中不会出现。我已阅读了几个主题，并在此主题上尝试了许多选项：Excel's VBA ActiveWorkbook is "Nothing" when "Enable Editing" from ProtectedView

我建议的示例工作簿是空的，除了以下代码：

movie_data

我试过了

Private Sub Workbook_Open()
ActiveWorkbook.Sheets("Sheet2").Activate
End Sub

和其他一些人。这应该很简单。我想做的就是激活一张纸。（当然我可以取消选择警告，但这是一个广泛分布的应用程序，Excel默认为此设置）

以下是我的示例工作簿：https://www.dropbox.com/s/l94jxtvik656z17/Excel2016_BugTest.xlsm?dl=0

在下载之前尝试打开它没有错误。我非常感谢您对此问题的帮助，因为我有很多客户投诉。谢谢，好色

Answer 1

我想我明白了，到目前为止似乎工作，这是我发现的：

Dim WbProtected As Workbook
If Application.ProtectedViewWindows.Count > 0 Then
Set WbProtected = Application.ProtectedViewWindows(1).Workbook
WbProtected.Sheet2.Activate
Else:
Sheet2.Activate
End If

当我打开没有错误时，现在似乎正在工作。当有人回复此主题时找到答案：https://stackoverflow.com/a/24415286/1012838

在这里：https://msdn.microsoft.com/en-us/library/office/ff822367.aspx?f=255&MSPPError=-2147217396

从Internet下载时，ActiveSheet和ActiveWorkbook的Excel VBA 2016错误

1 个答案: