应用于 LineNumbering 对象的 Active 属性。
如果该属性值为 True,则指定文档、一节或多节的行号处于活动状态。Long 类型,可读写。
expression.Active
expression 必需。该表达式返回一个 LineNumbering 对象。
如果该属性值为 True,则指定窗口或窗格中的所选内容处于活动状态。Boolean 类型,只读。
expression.Active
expression 必需。该表达式返回一个 Selection 对象。
本示例为所选内容中的第一节激活行号设置功能。
Sub CountByFive()
With Selection.Sections(1).PageSetup.LineNumbering
.Active = True
.CountBy = 5
.StartingNumber = 1
End With
End Sub
本示例将活动窗口拆分为两个窗格,如果第一个窗格中的所选内容不处于活动状态,则激活该内容。
Sub SplitWindow()
ActiveDocument.ActiveWindow.Split = True
If ActiveDocument.ActiveWindow.Panes(1).Selection _
.Active = False Then
ActiveDocument.ActiveWindow.Panes(1).Activate
End If
End Sub
如果 Windows 集合中的第一个窗口当前不处于活动状态,则本示例激活该窗口。
Sub ActiveWin()
If Windows(1).Active = False Then Windows(1).Activate
End Sub