移除VBA项目密码的VBA代码
有时候需要查看源代码来确认bug的位置,很多年前就用过类似代码,从网络上找来备份一下以备不时之需。
看到CSDN博客(2012)上也有,跟下面的代码完全一致,而且显示是原创。而另外一个CSDN博客(2013)有不同版本,为转载。
Private Sub VBAPassword()
'你要解保护的Excel文件路径
Filename = Application.GetOpenFilename("Excel文件(*.xls & *.xla & *.xlt),*.xls;*.xla;*.xlt", , "VBA破解")If Dir(Filename) = "" Then
MsgBox "没找到相关文件,清重新设置。"
Exit Sub
Else
FileCopy Filename, Filename & ".bak" '备份文件。
End IfDim GetData As String * 5
Open Filename For Binary As #1
Dim CMGs As Long
Dim DPBo As Long
For i = 1 To LOF(1)
Get #1, i, GetData
If GetData = "CMG=""" Then CMGs = i
If GetData = "[Host" Then DPBo = i - 2: Exit For
NextIf CMGs = 0 Then
MsgBox "请先对VBA编码设置一个保护密码...", 32, "提示"
Exit Sub
End IfDim St As String * 2
Dim s20 As String * 1'取得一个0D0A十六进制字串
Get #1, CMGs - 2, St'取得一个20十六制字串
Get #1, DPBo + 16, s20'替换加密部份机码
For i = CMGs To DPBo Step 2
Put #1, i, St
Next'加入不配对符号
If (DPBo - CMGs) Mod 2 <> 0 Then
Put #1, DPBo + 1, s20
End If
MsgBox "文件解密成功......", 32, "提示"Close #1
End Sub
移除VBA项目密码的VBA代码相关推荐
- 破解xlsm文件的VBA项目密码
工具 待破解的xlsm文件.Excel2010.Hex Editor 步骤 1.修改.xlsm后缀为.zip 2.使用压缩软件打开,进入xl目录找到vbaProject.bin文件,解压出来 3.使用 ...
- 有没有办法破解密码的Excel的VBA项目
我一直要求更新Excel 2003中的宏,但VBA项目有密码保护,而且似乎还有欠缺,没有人知道密码. 有没有对VBA项目删除或破解口令的方法是什么? 本文地址 :CodeGo.net/60693/ ...
- EXCEL vba工程密码破解
这里写自定义目录标题 方法一: 方法二: 方法一: 这种方法实际是避开VBA工程密码验证,即骗vba编辑器,该密码输入成功,请求放行. 不管他是破解还是欺骗 能达到我们的目的角开就行 1.新建一个工作 ...
- VBA Project密码解除
VBA Project密码解除 第一种方法详细步骤参考: 文中使用编辑器可用http://www.ddooo.com/softdown/98140.htm http://www.360doc.com/ ...
- EXCEL2013 vba工程密码破解
EXCEL vba工程密码破解 这种方法实际是避开VBA工程密码验证,即,骗vba编辑器,该密码输入成功,请求放行. 原理不多说了,先将方法公布: ========================== ...
- VBA - 封装我们的VBA代码
Visual Basic for Applications(简称VBA)是新一代标准宏语言,是基于Visual Basic for Windows 发展而来的.VBA 提供了面向对象的程序设计方法,提 ...
- 移植VBA项目到OMS系统
本文通过描述一次完整的移植 VBA 项目( VisualBoyAdvanced ,一款高性能的 GBA 游戏机模拟器)项目进入 OMS 系统,进而了解 OMS 的图形系统的工作原理,希望为在做项目移植 ...
- Excel2013破解vba工程密码以及工作表保护密码
今天从网上学到如何破解vba工程密码以及工作表保护密码,在这里分享一下. 破解vba工程密码:(引用自http://jingyan.baidu.com/article/2009576170cc05c ...
- keil debug如何在watch直接修改变量值_零基础学VBA:什么是VBA?如何编写和运行VBA代码?...
HI,大家好,我是星光,今天咱们来继续学习VBA.在上一章咱们讲了为什么要学习VBA~VBA还值不值得学~学了还有没有用~零基础学VBA编程01:VBA还能不能学?学了还有没有用? 这一章咱们再来简单 ...
最新文章
- Vmo前端数据模型设计
- C# winform 捕获全局异常
- mysql ha 安装 配置文件_Linux下环境安装配置Rose HA全攻略(图)
- 2、使用Spring框架能带来哪些好处
- Visual Studio 2019报4996错误的解决办法
- 1908元?iPhone SE 3价格大幅下调,网友:这个价格我冲了
- 提出问题之后,对于回答问题内容的仔细确认!!!(一个字一个字确认!!)
- Atitit SOW项目工作说明书 目录 1. SOW工作说明书(Statement of Work,简称SOW)	1 2. 项目工作范围	1 3. 工作期限和工作量估计	1 4. 交付成果(源码
- 计算机硕论题目,硕士论文题目精选(计算机方向)
- java动态字段排序_Java利用Stream来实现多字段排序功能
- android kmplayer,KMPlayer Pro — 安卓本地影音全能播放器
- 大数据经典案例,你知道几个
- 揭秘大厂的物联网关键技术
- 小米五怎么设置锁屏显示无服务器,小米手机怎么设置锁屏状态下不能关机 - 卡饭网...
- SQL SERVER中WITH TIES的用法
- 光学:薄透镜成像、景深
- 航班查询接口调用介绍
- 启示录:了解TOD模式的正确打开方式(一)
- 基于正交投影的实时三维人体姿态估计
- 小而美的LBS应用龙门阵——成都开发者沙龙