Share via

OutlookBarGroup.Shortcuts Property

  • Article
Outlook Developer Reference

Returns an OutlookBarShortcuts collection of shortcuts contained within the Shortcuts pane. Read-only.

Syntax

expression.Shortcuts

expression   A variable that represents an OutlookBarGroup object.

Example

This Microsoft Visual Basic/Visual Basic for Applications (VBA) example deletes all empty groups in the Shortcuts pane.

Visual Basic for Applications 
  Sub DeleteEmptyGroups()
    Dim myOlBar As Outlook.OutlookBarPane
    Dim myOlGroup As Outlook.OutlookBarGroup
    Dim x As Integer

Set myOlBar = Application.ActiveExplorer.Panes.Item("OutlookBar")
For x = myOlBar.Contents.Groups.Count To 1 Step -1
    Set myOlGroup = myOlBar.Contents.Groups.Item(x)
    If myOlGroup.Shortcuts.Count = 0 Then
        myOlBar.Contents.Groups.Remove x
    End If
Next x



End Sub

See Also