1. 程式人生 > >word裡如何禁止複製與另存為?

word裡如何禁止複製與另存為?

你在word文件裡面插入以下巨集:
Private Sub Document_Open()
If ActiveDocument.ProtectionType = wdNoProtection Then
ActiveDocument.Protect _
Type:=wdAllowOnlyFormFields, NoReset:=True
End If
End Sub
如果要高階一點的方法,可以參考官網:
http://office.microsoft.com/zh-cn/word-help/RZ001117927.aspx
追問
如果能有辦法強制啟用巨集就更好了。加上以下就可以禁止另存為了。禁止另存為的目的也是防止將檔案存純文字格式取出其中文字。
Sub FileSaveAs()
End Sub
追答
:)
Private Sub Document_Open()
 
這句就是開啟word自動啟用巨集的意思~你還需要禁止另存為的巨集?