標題: [發問] 單一儲存格保護 [打印本頁]

---

作者: rouber590324    時間: 2017-7-5 11:28     標題: 單一儲存格保護

DEAR  ALL 大大-
1.需求:單一儲存格保護
2.問題點:使用保護功能.會ALL儲存格保護.不需保護之儲存格需手動設定不保護.表單多無法一一設定
3.請問如何用 VB 書寫程式設定單一儲存格 SHEET1.RANGE("A1") 儲存格保護無法修改
4.煩不吝賜教   THANKS*10000

---

作者: Hsieh    時間: 2017-7-5 11:47

回復 1# rouber590324

保護功能是可以指定儲存格的

1. Sub ex()
   
2. With ActiveSheet
   
3. .Cells.Locked = False '取消鎖定
   
4. .Range("A1").Locked = True '鎖定儲存格
   
5. .Protect '保護工作表
   
6. End With
   
7. End Sub

複製代碼

---

作者: rouber590324    時間: 2017-7-5 13:10

DEAR Hsieh  大大
100%符合需求.感謝指導

---

歡迎光臨 麻辣家族討論版版 (http://forum.twbts.com/)