AllowEditRanges 对象 (Excel)

代表可在受保护工作表上编辑的单元格的所有 AllowEditRange 对象的集合。

备注

使用 Protection 对象的 AllowEditRanges 属性可返回 AllowEditRanges 集合。

返回 AllowEditRanges 集合后，可以使用 Add 方法添加可在受保护的工作表上编辑的区域。

示例

在此示例中，Microsoft Excel 允许编辑活动工作表上的 A1：A4 范围，然后通知用户指定区域的标题和地址。

Sub UseAllowEditRanges() 
 
 Dim wksOne As Worksheet 
 Dim wksPassword As String 
 
 Set wksOne = Application.ActiveSheet 
 
 ' Unprotect worksheet. 
 wksOne.Unprotect 
 
 wksPassword = InputBox ("Enter password for the worksheet") 
 
 ' Establish a range that can allow edits 
 ' on the protected worksheet. 
 wksOne.Protection.AllowEditRanges.Add _ 
 Title:="Classified", _ 
 Range:=Range("A1:A4"), _ 
 Password:=wksPassword 
 
 ' Notify the user 
 ' the title and address of the range. 
 With wksOne.Protection.AllowEditRanges.Item(1) 
 MsgBox "Title of range: " & .Title 
 MsgBox "Address of range: " & .Range.Address 
 End With 
 
End Sub

方法

• Add

属性

• Count
• 项目

另请参阅

• Excel 对象模型引用

支持和反馈

有关于 Office VBA 或本文档的疑问或反馈？ 请参阅 Office VBA 支持和反馈，获取有关如何接收支持和提供反馈的指南。