Excel VBA 實用技巧 ( 輕輕的進階編 ) – 如何保護工作簿或頁面與解除保護

~ 上傳‧分享‧網賺 ~

~ 免費上傳空間‧請即申請 Freak Share ~

~ 進入後請點選左上角 注冊 ! ~

~ 聲明事項 ~

如各位想把以下本文章轉貼 , 請記得要注明出處.

本文章之內容為本人之經驗所寫, 絕無抄襲成份, 特此聲明.

由於圖片製作需時, 所以更新會比較慢.

存放圖片的 SHARE A PIC SERVER 可能讀取速度較慢, 請耐心等待.

嗯 … 保護的英文是什麼 ? 你知道嗎 ?

嗯 … 這個問題太簡單了吧 ~ 哈哈 ~ 不可能不知道了 ~ 就是 Protect嘛 ~ 那麼 , 不保護又是什麼呢 ?

嗯 … 不保護好像有點不夠貼切 , 那麼 … 解除保護的英文會是什麼呢 ? 很簡單嘛 ~ 簡單得很 , 就是前面加上 UN 的 PROTECT , UnProtect 了. 這個說明了什麼 ? 這就說明了 … … 嘿嘿嘿 … … 嘿嘿嘿 … 我懂英文 ~ 哈哈哈哈 ~

好了 ~ 回到問題上吧 ~

正如剛才所說 , 保護和解除保護是 Protect 和 UnProtect , 在 VBA 的程式碼當中 , 要保護工作簿或者工作頁 , 程式碼也是包含了 Protect 和 UnProtect 的 , 看一下程式碼 :

==================

ThisWorkbook.Protect Password:="1234", structure:=True, Windows:=True

Worksheets("Sheet1").Protect Password:=" abcd1234"

==================

上面的一句是保護工作簿 , 而下面的一句是保護指定工作頁 , 你會發現 , 其實單從文字上來看就已經知道 , 這句程式碼是說明 這個 WORKBOOK 需要保護 , 這個頁面需要保護 , 但是 , 保護工作簿的程式碼跟保護工作頁的程式碼是不同的 , 工作簿的保護設定多了兩個東西 , 一個是 structure:=True , 另一個是 Windows:=True .

structure:=True 的意思是 , 對檔案的結構進行保護 , 設定為 TRUE 之後 , 工作頁的名稱就無法修改了 , 而且 , 工作頁的次序也不能變更 , 還有 , 如果你用你的鼠標指著工作頁的名稱按下右鍵 … 嘿嘿嘿 ~ 看到了吧 ~ 滿好玩的 ~ 哈哈 ~ 而 Windows:=True 這個的意思是 , 當設定為 TRUE , 工作簿就不可以進行分割 , 凍結等等的東西 .

對指定頁面保護的程式碼 , 要注意 Worksheets("Sheet1") 這個部份 , 這裡是必須要指明需要保護的是那個頁面 . 但是這個就不用設定什麼 STRUCTURE 和 WINDOWS 了 , 就是簡簡單單的 PROTECT 就可以了 . 定成保護之後 , 頁

有保護 , 當然就有解除保護 , 解除保護的方法跟保護差不多 , 只是把Protect 和 UnProtect 換一下 , 再把密碼加上去就行了 ~

==================

ThisWorkbook.Unprotect Password:="1234"

Worksheets("Sheet1").Unprotect Password:="abcd1234"

==================