解密Word加密文档的方法

随着信息化时代的到来，文档电子化已经成为了我们生活中日常的一部分，我们更衣的是电子文档。虽然电子文档在传输、分享、保存等方面十分的方便，但是又同时存在着一些不安全因素。例如：抛弃不当所导致的文档丢失、误删除、文件损坏等；网络黑客攻击、病毒或者恶意软件等网络攻击，可能导致我们电子的文档信息泄露；而在一定程度上为了保障文档信息的安全性，许多人会将文档进行加密处理，而在实际的情况中，我们也需要对加密文档进行解密来获取内部的信息。

所谓的解密，即是利用确切的方法或者计算机程序将加密后的信息重新还原成原来的信息状态。在这里，我将会通过不同的途径来解答“如何解密word加密文档”，这可能会涉及到一些技术性的问题，不过我将尽力使内容易于理解和操作。

I. 利用密码来解密word加密文档

首先，如果你在加密文档的时候设定了密码。那么解密方法最简单的方式就是使用密码进行解密。只需打开密码输入框，输入正确的密码即可。如果密码不正确，就会弹出提示，这时候你需要重新输入正确的密码才能进行解密。当然，在这个时候如果你已经忘记了密码，那就只能使用其他的方法进行解密。

II. 利用Zipcarck进行解密

如果你是用的word2007以上版本，就可以利用Zipcrack这个小工具进行解密。但是，这种方法有一个前提，就是加密文档的形式为.docx或.xlsx格式文件。

1. 首先下载安装Zipcrack这个小工具，然后将加密word文档改后缀名为Zip，例如：Test.docx改为Test.zip。这时，就可以看到一个压缩文件夹。

2. 在你将Test.zip压缩包打开后，可以发现里面有一个word目录，点击进入。

3. 在word文件夹中，找到settings.xml（用记事本打开），找到w:cryptEncryptedData标签，这个标签中的内容就是我们加密文件的密码，将其复制下来。

4. 打开文档的压缩文件Test.zip之后，修改docProps\core.xml文件，找到加密文档的密码的属性值，然后将刚才复制的加密密码粘贴到属性值中。保存修改后的文件，再压缩回放到原来路径。

5. 最后再将Test.zip的格式改回原来的.docx格式，然后用word打开，便可以顺利解密了。

III. 利用万能钥匙解密

万能钥匙是一款专门针对失误丢失或者忘记word文件密码的软件。它可以直接找到doc密码，并迅速将其破解。该软件可以在各大软件下载网站上进行下载并安装。使用方法大致如下：

1. 下载安装完成后，打开万能钥匙软件。

2. 点击顶部菜单栏中的“开始破解”，然后选择你所要破解的加密文件。

3. 等待软件的破解程序进行解密。

4. 当破解成功后，一个弹窗会提示你新的解密后密码。

5. 使用该密码即可打开你所要读取的文档。

IV. 利用vba代码进行解密

VBA（Visual Basic for Applications）是word中的一种程序语言，可利用VBA的库函数，很好的解决加密文档的任务。步骤如下：

1. 在word中打开加密文件，依次按下ALT+F11，打开VB窗口。

2. 点击“插入”标签页中的 “模块” 选项卡，打开一个新的模块窗口。

3. 将下面的代码复制到模块中，其中密文为必需变量，所以请在输入你的文件密码时正确的输入到引号当中。

Sub PasswordBreaker()

‘假设密码在1到7位之间

‘每个密码只有数字，它们的ASCII代码在31到126之间

Dim i As Integer, j As Integer, k As Integer

Dim l As Integer, m As Integer, n As Integer

Dim i1 As Integer, i2 As Integer, i3 As Integer

Dim i4 As Integer, i5 As Integer, i6 As Integer

On Error Resume Next

For i = 32 To 126: For j = 32 To 126: For k = 32 To 126

For l = 32 To 126: For m = 32 To 126: For i1 = 32 To 126

For i2 = 32 To 126: For i3 = 32 To 126: For i4 = 32 To 126

For i5 = 32 To 126: For i6 = 32 To 126

‘去掉下面的几行注释可以加速速度，但容易出错

‘If i + j + k + l + m + i1 + i2 + i3 + i4 + i5 + i6 = 925 Then

‘MsgBox “密码: ” & Chr(i) & Chr(j) & Chr(k) & Chr(l) & Chr(m) & Chr(i1) & Chr(i2) & Chr(i3) & Chr(i4) & Chr(i5) & Chr(i6)

‘End If

ActiveDocument.Unprotect Chr(i) & Chr(j) & Chr(k) & Chr(l) & Chr(m) & Chr(i1) & Chr(i2) & Chr(i3) & Chr(i4) & Chr(i5) & Chr(i6)

If ActiveDocument.ProtectContents = False Then

MsgBox “密码名为: ” & Chr(i) & Chr(j) & Chr(k) & Chr(l) & Chr(m) & Chr(i1) & Chr(i2) & Chr(i3) & Chr(i4) & Chr(i5) & Chr(i6)

Exit Sub

End If

Next: Next: Next: Next: Next: Next

Next: Next: Next: Next: Next: Next

End Sub

4. 待复制粘贴完毕后，按下ALT+A再按下Q，就可以退出VBA窗口。

5. 现在，点击“开发工具”标签页，选择“宏”，然后选择刚才编写的名为“PasswordBreaker”模块，现在你只需要点击“运行”按钮即可进行解密。

总之，不管是哪种方式，只要按照步骤操作就可以成功解决word加密文档的解密问题。希望你能在实际操作的时候得到不错的结果。

标签： word文档解密软件