2

我正在开发一个 Excel COM-Addin，它将打开预定义的 Excel 模板/文件。为了确保 excel 模板只能与插件结合使用，我想对某些文件进行密码保护。棘手的部分是找到或定义一个 BEFORE OPEN WORKBOOK - 事件。目的是在没有提示窗口的情况下交出密码并打开文件。

我尝试过以下事件但失败了：

1.

EventDel_BookOpen = New Excel.AppEvents_WorkbookOpenEventHandler(AddressOf OpenWorkbook)
AddHandler xlApp.WorkbookOpen, EventDel_BookOpen

Private Sub OpenWorkbook(ByVal wb As Excel.Workbook)
    If wb.HasPassword Then
        wb.Password = "test"
    End If
End Sub

弹出提示窗口后触发该事件。

2.

EventDel_WBookOpen = New Excel.WorkbookEvents_OpenEventHandler(AddressOf WBOpenWorkbook)
AddHandler xlBook.Open, EventDel_WBookOpen

Private Sub WBOpenWorkbook()
    If xlBook.HasPassword Then
        wb.Password = "test"
    End If
End Sub

这个事件根本没有触发。

请让我知道，如果您有任何好的想法来解决我的问题。

提前谢谢了，

雷纳

4

0 回答 0