Question

我想要一个事件处理宏，它可以在打开时最大化excel工作簿和窗口。我希望这是一个适用于我的任何工作簿的个人宏。我目前有这个：

Private Sub Workbook_Open()
   Application.WindowState = xlMaximized
   ActiveWindow.WindowState = xlMaximized
End Sub

在“ThisWorkBook”中保存了“VBAProject（PERSONAL.XLSB）”

代码最大化了工作簿，但是当它达到“ActiveWindow.WindowState = xlMaximized”时，它给出了运行时错误'91'。任何人都可以帮我这个吗？

谢谢

Answer 1

您的代码假设有ActiveWindow，但无法保证。

使用If Not [object] Is Nothing Then...检查对象引用是否可用：

Private Sub Workbook_Open()
   Application.WindowState = xlMaximized
   If Not ActiveWindow Is Nothing Then ActiveWindow.WindowState = xlMaximized
End Sub

VBA工作簿。打开运行时错误'91'

1 个答案: