ActiveSection Property
Applies To
Binder object.
Description
Returns a Section object that represents the active section in the binder. If the binder doesn't contain any visible sections, an error occurs. Read-only.
Remarks
To make a section the active section, use the Activate method.
See Also
Activate method.
Example
This example opens Binder2.obd, activates the first section, and creates a copy of the active section, if the active section is an Excel chart. The new section is renamed "Copy of Section 1."
Set newBinder = GetObject("C:\Binder2.obd", "Office.Binder")
With newBinder
.Visible = True
.Sections(1).Activate
If .ActiveSection.Type = "Excel.Chart.8" Then
.ActiveSection.Copy
.ActiveSection.Name = "Copy of Section 1"
End If
End With