为什么我不能使用Private Sub Workbook_Open（ByVal Sh As Object）任何解决方法？

Question

我希望代码在工作簿加载时运行。我正在使用Private Sub Workbook_Open(ByVal Sh As Object)，但会引发错误“程序错误与事件描述不匹配”-请提出任何想法，因为Private Sub Workbook_SheetActivate(ByVal Sh As Object)有效。

但是我希望代码在工作簿打开时运行。

我知道不允许Private Sub Workbook_Open(ByVal Sh As Object)。

Answer 1

请参阅我的评论，正如前面几个人所述，您不能只更改标准Excel事件处理程序的签名。

但是，您可以在该处理程序中工作并访问工作簿中的工作表。

Private Sub Workbook_Open()
    Dim objSheet As Worksheet

    For Each objSheet In ThisWorkbook.Sheets
        ' Do something with the sheet that you're interested in.
    Next
End Sub

我希望有帮助。