返回列表 上一主題 發帖

[發問] 單一儲存格保護

回復 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
複製代碼
學海無涯_不恥下問

TOP

        靜思自在 : 愛不是要求對方,而是要由自身的付出。
返回列表 上一主題