Excel VBA教程:AllowEditRanges集合

   
Protection
AllowEditRanges
AllowEditRange

所有AllowEditRanges对象的集合,这些对象代表受保护的工作表中可编辑的单元格区域。

AllowEditRanges集合用法

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

返回一个 AllowEditRanges集合后,可用Add方法在受保护的工作表中添加一个可编辑的区域。

本示例中,Microsoft Excel 允许用户在活动工作表中编辑区域 A1:A4,并将指定区域的标题和地址通知用户。


Sub UseAllowEditRanges()
    Dim wksOne As Worksheet
    Set wksOne = Application.ActiveSheet
    ' Unprotect worksheet.
    wksOne.Unprotect
    ' Establish a range that can allow edits
    ' on the protected worksheet.
    wksOne.Protection.AllowEditRanges.Add _
        Title:="Classified", _
        Range:=Range("A1:A4"), _
        Password:="secret"
    ' 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

上页:Excel VBA教程:AllowEditRange对象 下页:Excel VBA教程:Application对象

Excel VBA教程:AllowEditRanges集合

Excel VBA教程:Application对象 Excel VBA教程:Areas集合
Excel VBA教程:AutoCorrect对象 Excel VBA教程:AutoFilter对象
Excel VBA教程:AutoRecover对象 Excel VBA教程:Axes集合对象
Excel VBA教程:Axis对象 Excel VBA教程:AxisTitle对象
Excel VBA教程:Border对象 Excel VBA教程:Borders集合
Excel VBA教程:CalculatedFields集合对象 Excel VBA教程:CalculatedItems集合对象
Excel VBA教程:CalculatedMember对象 Excel VBA教程:CalculatedMembers集合
Excel VBA教程:CalloutFormat对象 Excel VBA教程:CellFormat对象
Excel VBA教程:Characters对象 Excel VBA教程:Chart对象
Excel VBA教程:ChartArea对象 Excel VBA教程:ChartColorFormat对象
版权所有 © 中山市飞娥软件工作室 证书:粤ICP备09170368号