如何“保护”工作表并保持某些列解锁?

问题描述 投票:0回答:3

我创建了一个按钮和代码来锁定(或保护)工作簿中的工作表。我还创建了一个按钮和代码来解锁(或取消保护)工作簿中的工作表。

我有一些列,我希望用户能够输入信息;但我不希望整张纸解锁/不受保护。

我的培训表上的示例,单元格 K6:U3175 我希望不受保护。这是我尝试过的:

'This is for the Lock Button on the WOOKBOOK TIPS sheet.
'Upon clicking once on the LOCK button, the scripts below re-protecting all the worksheets.

   ActiveWorkbook.Protect Password:="password"
   Sheets("1  - TRAINING").Protect "password"
   ActiveSheet.Range("1  - TRAINING").Range("K6:U3175").Locked = False

我在解锁范围的代码中收到错误。我怎样才能取消对那部分细胞的保护?

excel vba
3个回答
1
投票

按以下顺序:

  1. 取消保护工作表
  2. 更改任何单元格或单元格组上的锁定/解锁设置
  3. 重新保护工作表

1
投票

您需要遵循加里的答案提供的事件顺序。 在代码中,这看起来像

With ThisWorkbook.Worksheet(1)
    .Unprotect "1234" 'insert your pasword here (1)
    .Range("A:B").Cells.Locked = False '(2)
    .Protect "1234" 'insert your pasword here (3)
End With

0
投票

我想保护谷歌工作表中的多个选项卡,并允许在每个选项卡的某些列中进行编辑。这样可以吗

© www.soinside.com 2019 - 2024. All rights reserved.