軟體:EXCEL
版本:2016
各位前輩大神好,
小弟因整理舊資料而製作一份包含多個工作表的活頁簿,
為了避免切換工作表時不小心誤刪除或誤更改資料內容,
希望用保護工作表的方式將已整理完畢的工作表上鎖,
由於工作表份數約有10+,
一個一個手動上鎖太繁複,
所以寫了一段簡單的VBA程式自動上鎖,程式碼如下:
Sub protect()
Dim key as string
key = InputBox("Enter the password:")
For Each ws In Worksheets: ws.protect Password = key
Next ws
End Sub
上述程序可以執行,
卻無法透過校閱>取消保護工作表>手動方式輸入密碼解鎖,
會顯示密碼錯誤的訊息,
小弟在上網查資料之後已得知上述程式碼須修正為:
For Each ws In Worksheets: ws.protect Password:=key
即可使用手動方式輸入密碼解鎖。
問題:
原版本的程式語法雖然有錯誤但卻仍能執行並且成功上鎖工作表,
請問在這種情況下上鎖之後,
解鎖密碼是EXCEL預設的嗎?
要輸入甚麼才能解鎖呢?
希望版上前輩大大能指點迷津!
感激感謝!