Question

全部显示

应用于 LineNumbering 对象的 Active 属性。

如果该属性值为 True，则指定文档、一节或多节的行号处于活动状态。Long 类型，可读写。

expression.Active

expression 必需。该表达式返回一个 LineNumbering 对象。

应用于 Selection 对象的 Active 属性。

如果该属性值为 True，则指定窗口或窗格中的所选内容处于活动状态。Boolean 类型，只读。

expression.Active

expression 必需。该表达式返回一个 Selection 对象。

应用于 Window 对象的 Active 属性。

如果该属性值为 True，则指定窗口处于活动状态。Boolean 类型，只读。

expression.Active

expression 必需。该表达式返回一个 Window 对象。

示例

当应用于 LineNumbering 对象时。

本示例为所选内容中的第一节激活行号设置功能。

Sub CountByFive()
    With Selection.Sections(1).PageSetup.LineNumbering
        .Active = True
        .CountBy = 5
        .StartingNumber = 1
    End With
End Sub

当应用于 Selection 对象时。

本示例将活动窗口拆分为两个窗格，如果第一个窗格中的所选内容不处于活动状态，则激活该内容。

Sub SplitWindow()
    ActiveDocument.ActiveWindow.Split = True
    If ActiveDocument.ActiveWindow.Panes(1).Selection _
            .Active = False Then
        ActiveDocument.ActiveWindow.Panes(1).Activate
    End If
End Sub

当应用于 Window 对象时。

如果 Windows 集合中的第一个窗口当前不处于活动状态，则本示例激活该窗口。

Sub ActiveWin()
    If Windows(1).Active = False Then Windows(1).Activate
End Sub