『壹』 加密后的2003版本的word怎么自动执行VBA宏代码
第一个问题应该不存在,工程加密不会影响宏的正执行,你可以把宏代码改为简内单的MsgBox "OK"进行加密测试
第二个问题基本容上无解,由于大家对宏病毒的敏感,一般都不允许新信任工程访问,杀毒软件会高度注视。如果你的客户是裸奔的,可以修改注册表来实现。
『贰』 如何用vba编程对word和excel进行文件保护
保护工作簿(Protect方法) Sub ProtectWorkbook() MsgBox "保护工作簿结构,密码为123" ActiveWorkbook.Protect Password:="123", Structure:=True MsgBox "保护工作簿窗口,密码为123" ActiveWorkbook.Protect Password:="123", Windows:=True MsgBox "保护工作簿结构和窗口,密码为123" ActiveWorkbook.Protect Password:="123", Structure:=True, Windows:=True End Sub 示例说明:使用Protect方法来保护工作簿,带有三个可选参数,参数Password指明保护工作簿密码,要解除工作簿保护应输入此密码;参数Structure设置为True则保护工作簿结构,此时不能对工作簿中的工作表进行插入、复制、删除等操作;参数Windows设置为True则保护工作簿窗口,此时该工作簿右上角的最小化、最大化和关闭按钮消失。 解除工作簿保护(UnProtect方法) Sub UnprotectWorkbook() MsgBox "取消工作簿保护" ActiveWorkbook.Unprotect "123" End Sub word的应该一样吧
『叁』 通过vba可以破解word文档、Excel工作薄的密码吗 有vba代码吗
有个破解excel限制编辑的代码,你可以是看看
excel文件解锁(固化清单)
『肆』 word密码文件禁止OPRemovba_chs破解,怎么办
方法一:插入文件抄法
启动WORD,新建一个空白文档,执行“插入——〉文件”命令,打开“插入文件”对话框,定位到需要解除保护的文档所在的文件夹,选中相应文档,单击“插入”按钮,将加密保护的文档插入到新文档中,文档保护会被自动撤销。
方法二:文件另存法
打开保护的文档,执行“文件——〉另存为”命令,打开“另存为”对话框,将“文件类型”选定为“WORD97—2003&6.0/95—RTF(*.doc)”,然后取名保存,关闭该文档,重新打开一下,执行“工具——〉取消文档保护”命令即可。
或者将文件类型另存为HTML,然后将其中的内容,复制粘贴到新建文档中。
方法三:写字板法
启动写字板,打开保护的WORD文档,另存为WORD文档,同时可以取消对文档的保护。
但此方法可能会使文档中的图片等要素丢失。
方法四:第三方软件法(即一般所说的解密软件)
『伍』 Word 利用 VBA 保护某种样式的文字不被删除
保护工作簿(Protect方法)
Sub ProtectWorkbook()
MsgBox "保护工作簿结构,密码为123"
ActiveWorkbook.Protect Password:="123", Structure:=True
MsgBox "保护工作簿窗口,密码为123"
ActiveWorkbook.Protect Password:="123", Windows:=True
MsgBox "保护工作簿结构和窗口,密码为123"
ActiveWorkbook.Protect Password:="123", Structure:=True, Windows:=True
End Sub
示例说明:使用Protect方法来保护工作簿,带有三个可选参数,参数Password指明保护工作簿密码,要解除工作簿保护应输入此密码;参数Structure设置为True则保护工作簿结构,此时不能对工作簿中的工作表进行插入、复制、删除等操作;参数Windows设置为True则保护工作簿窗口,此时该工作簿右上角的最小化、最大化和关闭按钮消失。
解除工作簿保护(UnProtect方法)
Sub UnprotectWorkbook()
MsgBox "取消工作簿保护"
ActiveWorkbook.Unprotect "123"
End Sub
word的应该一样吧
『陆』 怎么用VBA实现Excel和Word的加密
sub 设置密码()
ActiveWorkbook.password=InputBox("输入密码内:1234")
Activeworkbook.Close
End sub
Sub 取消容密码()
Activeworkbook.password.= ""
end sub
『柒』 excel和word可以整天软件加密码吗
以下代码把d:\tmp目录下的所有excel 文件设置密码为成都豺狼;word同理
在工具菜单下选专宏,点vba编辑,粘贴如下代属码,修改目录 和密码 执行
Sub Macro1()
' 宏由 成都豺狼 录制,时间: 2009-4-25
pth = "d:\tmp\"
fln = Dir(pth & "*.xls")
Do While fln <> ""
Workbooks.Open Filename:=pth & fln
ActiveWorkbook.SaveAs Filename:=pth & fln, FileFormat:= _
xlNormal, Password:="成都豺狼", WriteResPassword:="成都豺狼", ReadOnlyRecommended:= _
False, CreateBackup:=False
ActiveWorkbook.Close
fln = Dir
Loop
End Sub
『捌』 word vba 密码忘记了 怎么破解
工具:来5秒WORD-EXCEL密码破解自.exe
1、网络“5秒WORD-EXCEL密码破解”,点击下方的连接,下载软件,软件不是很大,直接下载下来就可以了,下载下来是一个压缩包,解压该压缩包。打开压缩包解压出来的文件夹,第二个文件就是我们的密码破解工具,双击打开工具。
2、浏览,找到我们要破解的文件,点击确定,破解就开始啦,点击移除密码。
3、弹出对话框,点击确定。
4、解密时间要看密码复杂程度,不过应该没有太变态的密码。
5、成功破解密码,并且生成了一个新的没有密码的文件。