返回列表 上一主題 發帖

解除選取儲存格的保護 (己解決 )

回復 6# trainee

選取區域解鎖
  1. Sub Part_Protect()
  2. With ActiveSheet
  3. .Unprotect "12345"  
  4. .Cells.Locked = True
  5. Selection.Locked = False
  6. .Protect "12345"  '密碼12345
  7. End With
  8. End Sub
複製代碼
play.gif
學海無涯_不恥下問

TOP

        靜思自在 : 【時間如鑽石】時間對一個有智慧的人而言,就如鑽石般珍貴;但對愚人來說,卻像是一把泥土,一點價值也沒有。
返回列表 上一主題