標題:
請問一下，如何讓別人改一個儲存格，工作表就重新保護？
[打印本頁]
作者:
bowwow1975
時間:
2013-5-16 17:42
標題:
請問一下，如何讓別人改一個儲存格，工作表就重新保護？
最近拿到一個檔案，我先取消保護工作表後（輸入密碼）！！
只要在特定的儲存格更改，就會又進入工作表保護~~~
請問這樣怎麼辦到的？
作者:
stillfish00
時間:
2013-5-16 18:22
回復
1#
bowwow1975
VBAProject中，複製貼上到工作表
Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, [A1]) Is Nothing Then '特定儲存格
Protect Password:="123" '保護工作表 密碼123
End If
End Sub
複製代碼
作者:
bowwow1975
時間:
2013-5-16 19:46
回復
2#
stillfish00
如果是單純只寫這一段呢？
ActiveSheet.Protect Password:="123", UserInterfaceOnly:=True
複製代碼
作者:
stillfish00
時間:
2013-5-16 20:01
本帖最後由 stillfish00 於 2013-5-16 20:03 編輯
回復
3#
bowwow1975
ActiveSheet.Protect Password:="123", UserInterfaceOnly:=True
只有這段就是單純以123作為密碼保護當前的工作表，當然你要自己呼叫巨集才會執行
2#所寫的是每次當[A1]儲存格的值變動時，就會自動以123保護工作表，事件觸發時自己就會呼叫執行
歡迎光臨 麻辣家族討論版版 (http://forum.twbts.com/)
