1.如何把word文档设置成不可更改的模式
不想让人随意修改自己的word文档怎么办,这里演示一下怎么设置word文档不可修改。
工具/原料
word
方法/步骤
打开要进行设置的word文档。
点击“工具”—“保护文档”。
在右侧出现的“保护文档”选项卡中,勾选第2项中的“仅允许在文档中进行此类编辑”,在下拉列表中选择“填写窗体”。
点击第3项中的“是,启动强制保护”。
在弹出的“启动强制保护”窗口中,输入并确认密码,点击“确定”。
可以看到工具栏中的选项都已变成灰色无法进行修改。
保存文件后关闭即可。
2.如何将word文档中的内容更改为不可编辑状态
有几种方法、
1.用插入窗体的办法:先在 视图-〉工具栏-〉窗体,显示窗体工具栏,然后在文档中不用保护的地方插入“文字型窗体域”,然后在 工具-〉保护文档 。这就可以防止窗体域以外的文本被复制,编辑。
2.对selectioin.change事件编程
查看当前是否在规定的表格里
如果不是,则回到表格中
3.用代码给word 文件加密
Dim WordApp As Word.Application
Dim WordDoc As Word.Document
Set WordApp = CreateObject( "Word.Application ")
Set WordDoc = WordApp.Documents.Open( "c:\aa.doc ")
WordDoc.Protect wdAllowOnlyComments, , "加密的密码 "
WordDoc.SaveAs strSaveWordPath
WordDoc.Close
WordApp.Quit
Set WordDoc = Nothing
Set WordApp = Nothing
这样让用户的光标离不开表格也就无法进行其它操作了