標題: [發問] 有關語法無法執行的問題！ [打印本頁]

---

作者: skyutm    時間: 2013-1-6 00:55     標題: 有關語法無法執行的問題！

論壇的各位先進大家好！很抱歉又來打擾了，因為小弟的成績系統已完成很久了，所以有一段時間都沒來。現在又出現問題，所以想來請教！
下面的語法，是要來開放未鎖定的儲存格，可以改變儲存格的字型等等的選項，但是離開這個工作表又回來後，原來的設定又變了，變成未鎖定的儲存格又無法改變格式內容，不知問題出在哪裡？    是在附件檔案的「成績單」工作表
    '保護「成績單」表格↓'
    With Sheets("成績單")
    .Protect DrawingObjects:=True, Contents:=True, Scenarios:=True, AllowFormattingCells:=True
    .EnableSelection = xlUnlockedCells
    .Protect Password:="6323"
    End With
    '保護「成績單」表格↑'

---

作者: skyutm    時間: 2013-1-6 00:57

[attach]13808[/attach]回復 1# skyutm
附件檔

---

作者: Hsieh    時間: 2013-1-6 01:26

回復 2# skyutm

       ActiveSheet.Protect Password:="6323", DrawingObjects:=True, Contents:=True, Scenarios:=True _
        , AllowFormattingCells:=True, AllowFormattingColumns:=True, _
        AllowFormattingRows:=True
    ActiveSheet.EnableSelection = xlUnlockedCells

---

作者: skyutm    時間: 2013-1-6 17:21

回復 3# Hsieh
再次感謝超級版大幫忙解惑，小弟已測試無誤。
不過還是想再請教，因為這個語法我是從錄製巨集得知的，後來我比較版主和我的語法，發現少了AllowFormattingColumns:=True, AllowFormattingRows:=True這兩行，是這樣的因素嗎？

---

作者: Hsieh    時間: 2013-1-7 00:22

回復 4# skyutm

應是你對保護工作表功能中，允許使用者編輯的功能認識錯誤
導致錄製巨集時並未勾選允許設定格式的條件所致
[attach]13821[/attach]
這就是我們一直強調要先認識EXCEL基本功能、操作這樣才能錄製得到正確的程式碼

---

作者: skyutm    時間: 2013-1-7 22:04

回復 5# Hsieh
天呀！真的不是我要拍馬屁，版大真是一語驚醒夢中人，我就是只勾允許儲存格，我一直以為只要勾那一欄就好了。

---

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