潘邓LV小闲
你的意思,是不是就是想让你的文档呈只读状态
如果这样,告诉你如下方法
第一步：打开编辑好的Word文档
第二步：工具→保护文档→钩选“编辑限制”→在下拉列表中选择“填写窗体”→点击“是，启动强制保护”→输入密码→确定。
第三步：点击下面的“是，启动强制保护”按钮输入密码。
到这里我们就禁止了Word文档内容的复制。如果以后我们自己酏要解除禁止，可以按照以下顺序操作：
选择“工具--取消文档保护”，在打开的对话框中输入先前设置好的密码就解除禁止了。
缺点是，用记事本打开或另存为网页后就能复制了。
希望以上对你有所帮助!
非常谢谢你 请问“格式设置限制”有什么作用啊？
Word文档中“是，启动强制保护”按钮是灰色的,为什么?
你是不是在做word模板，还在其中添加了各种内容控件，如果是在这种情况下，你的“是，启动强制保护”按钮是灰色的，那你只需要退出内容控件的“设计模式”就可以了，即在点击一次“设计模式”按钮。
word启动强制保护功能，是“灰色”的，怎么解决，求解求解
因为你没有给Word指定要保护哪些内容，它没有保护的目标，所以呈灰色，不让你按。
你需要在上面的“限制对选定的样式设置格式”和“仅允许在文档中进行此类编辑”两个复选框中至少选中一个并进行相应设置才可按。
不行的话，你退出设计模式试一下。更多
我选定了一个啊，可是还是不行，退出设计模式，怎么退出，不好意思我没弄过这个东西请告诉我怎么操作，谢谢
word中如何设置默认退出控件工具箱设计模式_百度经验 http://jingyan.baidu.com/article/2f9b480d4ee3ef41ca6cc26b.html
已经解决了我的问题，非常感谢您的耐心解答。
防止word强制保护密码被破解
建议通过rar压缩加密，否则仅仅在保存word文档时加密是很容易被破解的。更多
不想压缩呢？是希望别人可以看Word内容但是不能更改，删除等等 也不能利用其他方法解掉锁
不想压缩呢？是希望别人可以看Word内容但是不能更改，删除等等 也不能利用其他方法解掉锁
你的想法是做不到的。
word保护怎么设置
1.单击“工具”菜单中的“保护文档”命令。
2.在“保护文档”任务窗格中，选中“限制对选定的样式设置格式”复选框。
3.单击“设置”按钮。
4.在“格式设置限制”对话框中的格式设置样式列表中，选中允许设置其格式的样式的复选框，并清除文档中不允许设置其格式的样式的复选框。
提示：若要将样式限制为最小数目的推荐选项，请单击“推荐的样式”。您可以将样式限制为更少的选项，但是这样会删除 Microsoft Word 在某些功能中使用的样式，例如目录以及项目符号或编号列表。
若希望保留部分自动套用格式功能，例如将“1/2”更改为“½”，请选中“允许自动套用格式替代格式设置限制”复选框。
5.单击“是，启动强制保护”。
6.在“新密码(可选)”框中键入密码，然后确认该密码。
如果想设置打开或修改此文档的密码，那么：
文件——保存/另存为——××选项（97/2000/2003中是“安全选项”；2007中是“常规选项”），输入密码（如果只需一个密码，那么另一个就空着）——确定，就可以了。
还有一种方法：（只适用于97/2000/2003中）在Word中，工具——选项——安全性，输入密码（如果只需一个密码，那么另一个就空着）——确定，就可以了。
至于“设置后所有的内容都不能修改、编辑。复制粘贴也不能进行”，禁止复制是不行的，其它都可以受到保护。
祝你成功！
怎么样设置word密码保护？？
1、加密Word文档
如果Word文档不希望别人查看，可以通过添加打开密码来实现。为Word文档添加密码，可以通过下列两种方法来实现：
方法一：启动Word2003（其他版本操作相似，下同），打开需要加密的文档，执行“工具→选项”命令，打开“选项”对话框，切换到“安全性”标签下，在“打开文件时的密码”右侧的方框中输入密码，按下确定按钮，再确认输入一次密码，确定退出，然后保存一下当前文档即可。
注意：经过加密设置后，以后需要打开该文档时，需要输入正确的密码，否则文档不能打开。
方法二：在对新建文档进行“保存”或对原有文档进行“另存为”操作时，打开“另存为”对话框。
单击工具栏上的“工具”按钮，在随后弹出的下拉列表中，选“安全选项”，打开“安全选项”对话框，在“打开文件时的密码”右侧的方框中输入密码，按下确定按钮，再确认输入一次密码，确定退出，然后保存当前文档即可。
—————————————————————————
2、保护Word文档
如果Word文档允许别人查看，而不允许别人修改，可以采取保护的方法来实现。
方法一：设置“修改文件时的密码”。仿照上述加密操作，在相应的对话框中，在“修改文件时的密码”右侧的方框中输入密码，按下确定按钮，再确认输入一次密码，确定退出后，保存当前文档即可。
注意：在打开设置了“修改文件时的密码”的文档时，会弹出如图5所示的对话框，不输入密码，直接按其中的“只读”按钮，即可打开文档进行浏览。而此时对文档所作的任何修改，均不能被保存到原文档中。
方法二：保护文档：执行“工具→保护文档”命令，展开“保护文档”任务窗格。
选中“仅允许在文档中进行此类编辑”选项，然后按下“是，启动强制保护”按钮，打开“启动强制保护”对话框，输入并确认输入密码一篇密码，确定返回即可。
注意：①对文档启动强制保护后，如果试图对文档进行编辑操作时，在状态栏会出现“不允许修改，因为此文档已经锁定”的提示。
②如果需要解除锁定，请执行“工具→取消文档保护”命令，输入正确的密码，确定即可。
word中启动了强制保护，但图片依然能被复制怎么办。
使用“文档保护”的方法：
在【工具】菜单中选中【保护文档】，在右边的窗口单击【仅允许在文档中进行此类编辑】复选框，再单击【是，启动强制保护】。
此方法可以让文档中的图片无法复制，如果截屏的话就没办法了。
求vb判断word的强制保护是否开启的详细代码
如果没有保护活动文档，该示例保护文档，使审阅者只能插入批注而不改变文档内容。
If ActiveDocument.ProtectionType = wdNoProtection Then
ActiveDocument.Protect Type:=wdAllowOnlyComments
End If
如果已保护活动文档，本示例解除文档保护。
Set Doc = ActiveDocument
If Doc.ProtectionType <> wdNoProtection Then Doc.Unprotect更多
用你的代码vb还是没有正确判断word的强制保护是否开启。
我手动把word的文档的强制保护开启后调试一次，手动关闭后调试一次，我在调试时看到wdNoProtection 这个值在程序运行时一直是空值，你能把你对word的声明跟我说一下吗我只定义了下边的两个
Dim Myword As Object
Set Myword = CreateObject("Word.Application")
还要定义那些？求解呀！给个全部代码，能用的话追加50分
hbhyd3000@163.com
wdNoProtection是WdProtectionType 常量之一
其值是-1,你就将它换成-1
不懂，能请你把详细代码帮我做一遍吗？就是在窗体的load事件中判断一个word文件的强制保护是否开启如果开启就执行取消强制保护的操作，如果没有开启就启动强制保护，帮帮我我，我把我剩下的财富值全给你，发我邮箱谢谢了
Dim aDoc As Document
Dim wdApp As Word.Application
Sub Command1_Click() '打开文件
Set wdApp = New Word.Application
Set aDoc = wdApp.Documents.Open(FileName:="文件名")
wdApp.Visible = True '设置Word对象可见
End Sub
Private Sub Command2_Click() '如果没有保护文档，保护文档，
If aDoc.ProtectionType = wdNoProtection Then
aDoc.Protect Type:=wdAllowOnlyComments, Password:="mm" '密码"mm"
End If
End Sub
Private Sub Command3_Click() '如果已保护活动文档，解除文档保护。
If aDoc.ProtectionType <> wdNoProtection Then
aDoc.Unprotect ("mm")
End If
End Sub
顺便请问你VB+ACCSEE熟吗
请帮我看看这个问题
http://zhidao.baidu.com/question/337701068.html
你用command控件来让操作者人工判断，我是想让vb自动判断。人工判断我早搞清楚了。
我的意思是让vb自己判断word的强制保护是否开启，如果word的强制保护开启了，那么vb就解除文档的强制保护，如果word的强制保护没有启动，那么vb就启动word的强制保护，这个功能我要在load事件里实现，大哥帮咱在想想。你的问题俺看了也回了
就把下面代码放入LOAD事件中,你看行吗
Dim aDoc As Document
Dim wdApp As Word.Application
Set wdApp = New Word.Application
Set aDoc = wdApp.Documents.Open(FileName:="文件名")
wdApp.Visible = True '设置Word对象可见
If aDoc.ProtectionType = wdNoProtection Then '如果没有保护文档，保护文档，
aDoc.Protect Type:=wdAllowOnlyComments, Password:="mm" '密码"mm"
End If
If aDoc.ProtectionType <> wdNoProtection Then '如果已保护活动文档，解除文档保护。
aDoc.Unprotect ("mm")
End If
你那个文件名和密码总应该要事先知道吧.czduanyh@163.com
Dim aDoc As Document
Dim wdApp As Word.Application
这两个定义vb提示用户未定义类型
工程-引用
找到micrsoft word 11.0 object library(看你的OFFICE版本 我的是11.0)
转载请注明出处51数据库 » word强制保护 请教WORD中强制保护的问题
