如何将word文档中的内容更改为不可编辑状态word文档改成不可编辑

Question

如题所述

Answer 1

有几种方法、
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 strSaveWordPathWordDoc.CloseWordApp.Quit Set WordDoc = Nothing Set WordApp = Nothing 这样让用户的光标离不开表格也就无法进行其它操作了