VBA源码加密的思路

荒野孤行

目前将VBA源码设置工程密码后，使用AOPR软件仍是可暴力破解的。暂想到的思路是不管用户有没有破解VBA源码，只要用户触发打开VBAProject的操作（想请教这里如何识别到用户的触发操作）就激活ThisWorkbook里面的程序，要求用户输入正确密码后才可打开。恳请大佬们的指导，感谢。

如下是用户打开Excel表即触发的日期比对，如果超过限制日期则需要输入密码：
Private Sub Workbook_Open()
Dim OverTime, Nowtime As Date
Dim pw
OverTime = DateValue("2022/10/01") '这里输入你要到期的日期
Nowtime = DateValue(Now)
On Error Resume Next
If Nowtime >= OverTime Then
    If InputBox("若想打开此文档，请输入正确的密码：") <> "woody.123" Then
     Application.Quit
    End If
End If
End Sub

ahn

换种加密方式好些：
http://www.excelpx.com/thread-466767-1-1.html