WORD文件可以手動加密和自動加密，依次讓我們看看來如何操作：

手動加密有兩種方法

1.新建WORD，在“檔案”--“準備”--“加密文件”實現；

2.編輯完WORD後，在“另存為”--“WORD文件”--“工具”--“常規選項”實現。

下面我們來著重說說自動加密的方法

自動加密

自動加密就不得不提到“宏”了。

什麼是“宏”？

宏是WORD裡面命令和指令的集合，以實現任務執行的自動化。

With Options.AllowFastSave = True.BackgroundSave = True.CreateBackup = False.SavePropertiesPrompt = False.SaveInterval = 15.SaveNormalPrompt = FalseEnd WithWith ActiveDocument.ReadOnlyRecommended = False.EmbedTrueTypeFonts = False.SaveFormsData = False.SaveSubsetFonts = False.Password = "123456" ’開啟許可權密碼.WritePassword = "123456" ’修改許可權密碼End WithApplication.DefaultSaveFormat = " "

6.這樣在你的快速訪問工具欄的左上角就會出現一個建立密碼的宏圖示，想要自動加密單擊該圖示即可。

　第一步：在“工具”選單中選擇“宏”選項卡，單擊“宏”命令，鍵入宏的名稱“AllAutoPassword”，在“宏的位置”框中選擇“所有的活動模板和文件”，在“說明”中可以鍵入對該宏的說明，例如“利用‘宏’給文件進行統一加密”，最後單擊“建立”按鈕即可。

　　第二步：系統會彈出“宏”編輯視窗，在Sub AllAutoPassword()和End Sub之間輸入以下程式碼：

　　//密碼為123456

　　With Options

　　.AllowFastSave = True

　　.BackgroundSave = True

　　.CreateBackup = False

　　.SavePropertiesPrompt = False

　　.SaveInterval = 15

　　.SaveNormalPrompt = False

　　End With

　　With ActiveDocument

　　.ReadOnlyRecommended = False

　　.EmbedTrueTypeFonts = False

　　.SaveFormsData = False

　　.SaveSubsetFonts = False

　　.Password = "123456" ’開啟許可權密碼

　　.WritePassword = "123456" ’修改許可權密碼

　　End With

　　Application.DefaultSaveFormat = " "

　　第三步：程式碼輸入後，選擇“檔案”選單中的“儲存Normal”，點選“關閉並返回到Microsoft Word”，再在“工具”選單中選擇“自定義”，選擇“命令”標籤，在“類別”中選擇“宏”，在“命令”中找到 “Normal.NewMacros.AllAutoPassword”，然後將它移至常用工具欄內即可。

　　以後，使用者新建或關閉一個文件時，該宏將提醒使用者是否儲存對該文件的修改，如果選擇“是”，那麼文件將自動被加上密碼“123456”，反之則不加密碼