VBA 程序加密破解

小码哥学习中

已于 2023-02-10 14:59:33 修改

阅读量1.1w

点赞数 9

CC 4.0 BY-SA版权

分类专栏： VB/VBA 文章标签： .net

于 2017-11-09 19:45:20 首次发布

本文链接：https://blog.youkuaiyun.com/boveysmith/article/details/78493183

本文介绍了如何绕过VBA工程的密码验证，通过新建工作簿、插入模块并编写特定代码来实现VBA程序的破解。操作步骤包括新建模块、复制代码、运行破解程序等，提醒读者破解完成后需恢复密码保护，并强调不得用于非法用途。

摘要生成于 C知道，由 DeepSeek-R1 满血版支持，前往体验 >

今天遇到一个excel小工具感觉不错，想研究研究代码，竟然有密码，我就不淡定了。网上找了找代码，改了一下就OK了。

这种方法实际是避开VBA工程密码验证，即，骗vba编辑器，该密码输入成功，请求放行。

原理不多说了，先将方法公布：
===================================================
1.新建一个工作簿，打开，按ALT+F11，进入vba代码编辑器窗口：

2.新建一个模块，“插入”--“模块”把以下代码复制进模块并保存。

Option Explicit
Private Declare Sub MoveMemory Lib "kernel32" Alias "RtlMoveMemory" (Destination As Long, Source As Long, ByVal Length As Long)
Private Declare Function VirtualProtect Lib "kernel32" (lpAddress As Long, ByVal dwSize As Long, ByVal flNewProtect As Long, lpflOldProtect As Long) As Long
         
Private Declare Function GetModuleHandleA Lib "kernel32" (ByVal lpModuleName As String) As Long
    
Private Declare Function GetProcAddress Lib