AllowEditRanges.Add 方法 (Excel)
在受保护的工作表中添加可编辑的单元格区域。 返回 AllowEditRange 对象。
语法
表达式。添加 (标题、 范围、 密码)
表达 一个代表 AllowEditRanges 对象的变量。
参数
名称 | 必需/可选 | 数据类型 | 说明 |
---|---|---|---|
Title | 必需 | 字符串 | 区域的标题。 |
区域 | 必需 | 区域 | Range 对象。 允许编辑的单元格区域。 |
Password | 可选 | Variant | 单元格区域的密码。 |
返回值
一个代表该区域的 AllowEditRange 对象。
示例
此示例允许编辑活动工作表上的 A1:A4 区域,通知用户,更改此指定区域的密码,然后通知用户此更改。
Sub UseChangePassword()
Dim wksOne As Worksheet
Set wksOne = Application.ActiveSheet
' Protect the worksheet.
wksOne.Protect
' Establish a range that can allow edits
' on the protected worksheet.
wksOne.Protection.AllowEditRanges.Add _
Title:="Classified", _
Range:=Range("A1:A4"), _
Password:="secret"
MsgBox "Cells A1 to A4 can be edited on the protected worksheet."
' Change the password.
wksOne.Protection.AllowEditRanges(1).ChangePassword _
Password:="moresecret"
MsgBox "The password for these cells has been changed."
End Sub
支持和反馈
有关于 Office VBA 或本文档的疑问或反馈? 请参阅 Office VBA 支持和反馈,获取有关如何接收支持和提供反馈的指南。
反馈
https://aka.ms/ContentUserFeedback。
即将发布:在整个 2024 年,我们将逐步淘汰作为内容反馈机制的“GitHub 问题”,并将其取代为新的反馈系统。 有关详细信息,请参阅:提交和查看相关反馈