返回列表 上一主題 發帖

[發問] 保護 鎖定的單元格

ciboybj

帖子
47 
主題
19 
精華
0 
積分
82 
點名
0  
作業系統
win  
軟體版本
xp 
閱讀權限
20 
註冊時間
2014-7-4 
最後登錄
2021-9-4 
1# 跳轉到 » 倒序看帖
打印
tT
發表於 2014-8-17 16:59 | 只看該作者

[發問] 保護 鎖定的單元格

各位好
我為避免使用者亂編輯其他格子
所以我於EXCEL 啟動時,將部分的格子鎖定後保護
然後,當使用者啟用巨集後
我透過 ActiveSheet.Unprotect 將保護取消
但是,執行完巨集後,
我不知道要如何恢復將鎖定的格子進行保護??

不知道有沒有人可以幫我解決~

謝謝
收藏 分享

GBKEE

帖子
5923 
主題
13 
精華
1 
積分
5986 
點名
0  
作業系統
win10 
軟體版本
Office 2010 
閱讀權限
150 
性別
男 
來自
台灣基隆 
註冊時間
2010-5-1 
最後登錄
2022-1-23 

2017 雞年全勤獎章2016猴年全勤獎章2015羊年全勤獎章2014馬年全勤獎章2013蛇年全勤獎章2012龍年全勤獎章論壇貢獻勳章熱烈參與勳章2011兔年全勤獎章
2#
發表於 2014-8-18 05:50 | 只看該作者
回復 1# ciboybj
可錄製巨集看看內容.
感恩的心......(在麻辣家族討論區.用心學習會有進步的)
但資源無限,後援有限,  一天1元的贊助,人人有能力.

TOP

ciboybj

帖子
47 
主題
19 
精華
0 
積分
82 
點名
0  
作業系統
win  
軟體版本
xp 
閱讀權限
20 
註冊時間
2014-7-4 
最後登錄
2021-9-4 
3#
發表於 2014-8-18 11:30 | 只看該作者
各位好
我找到其他人提供的解答
  1. Sub Macro1()
  2. '
  3. ' Macro1 Macro
  4. ' tsaimh 在 2014/2/18 錄製的巨集
  5. '

  7. '加密
  8. Range("D5").Select
  9. ActiveSheet.Protect ("123")
  10. End Sub
  11. Sub Macro2()
  12. '
  13. ' Macro1 Macro
  14. ' tsaimh 在 2014/2/18 錄製的巨集
  15. '

  17. '解密
  18. Range("D5").Select
  19. ActiveSheet.Unprotect ("123")
  20. End Sub
複製代碼
http://discuz.bestdaylong.com/forum.php?mod=viewthread&tid=31946&fromuid=2

TOP

        靜思自在 : 【蒙蔽的自由】人常在什麼都可以自由自在的時候，卻被這種隨心所欲的自由蒙蔽，虛擲時光而毫無覺知。
返回列表 上一主題