Share via


Panes Property

Returns a Panes collection object representing the panes displayed by the specified explorer.

expression**.Panes**

*expression   * Required. An expression that returns an Explorer object.

Example

This Microsoft Visual Basic/Visual Basic for Applications (VBA) example adds a group named "Marketing" as the second group in the Shortcuts pane.

Sub AddGroup()
    Dim myOlApp As New Outlook.Application
    Dim myolBar As Outlook.OutlookBarPane
    Set myolBar = myOlApp.ActiveExplorer.Panes.Item("OutlookBar")
    myolBar.Contents.Groups.Add "Sales", myolBar.Contents.Groups.Count + 1
End Sub

If you use Microsoft Visual Basic Scripting Edition (VBScript) in a Microsoft Outlook form, you do not create the Application object. This example shows how to perform the same task using VBScript code.

Set myolBar = Application.ActiveExplorer.Panes.Item("OutlookBar")
myolBar.Contents.Groups.Add "Marketing", myolBar.Contents.Groups.Count + 1

Applies to | Explorer Object