Protection 对象 - Microsoft Excel Visual Basic 2002 参考

返回介绍

Protection 对象

发布于 2019-08-07 字数 1919 浏览 832 评论 0

Worksheet
Protection
AllowEditRanges

代表工作表可使用的各种保护选项类型。

Protection 对象用法

可用 Worksheet 对象的 Protection 属性返回一个 Protection 对象。

返回一个 Protection 对象后,就可用该对象的下列属性来设置或返回保护选项。


  • AllowDeletingColumns

  • AllowDeletingRows

  • AllowFiltering

  • AllowFormattingCells

  • AllowFormattingColumns

  • AllowFormattingRows

  • AllowInsertingColumns

  • AllowInsertingHyperlinks

  • AllowInsertingRows

  • AllowSorting

  • AllowUsingPivotTables

下例说明如何使用 Protection 对象的 AllowInsertingColumns 属性,在首行中放置三个数并保护工作表。然后本示例检查允许插入列的保护设置是否为 False,并在需要时将其设置为 True。最后,通知用户插入一列。

Sub SetProtection()
    Range("A1").Formula = "1"
    Range("B1").Formula = "3"
    Range("C1").Formula = "4"
    ActiveSheet.Protect
    ' Check the protection setting of the worksheet and act accordingly.
    If ActiveSheet.Protection.AllowInsertingColumns = False Then
        ActiveSheet.Protect AllowInsertingColumns:=True
        MsgBox "Insert a column between 1 and 3"
    Else
        MsgBox "Insert a column between 1 and 3"
    End If
End Sub

上一篇:Points 集合对象

下一篇:PublishObject 对象

发布评论

需要 登录 才能够评论, 你可以免费 注册 一个本站的账号。

支持 Markdown 语法,需要帮助?

目前还没有任何评论,快来抢沙发吧!