Поделиться через


Свойство OutlookBarGroup.Shortcuts (Outlook)

Возвращает коллекцию сочетаний клавиш OutlookBarShortcuts , содержащуюся в области Ярлыки . Только для чтения.

Синтаксис

выражение. Shortcuts

Выражение Переменная, представляющая объект OutlookBarGroup .

Пример

В этом примере Microsoft Visual Basic для приложений (VBA) удаляются все пустые группы в области Ярлыки.

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

См. также

Объект OutlookBarGroup

Поддержка и обратная связь

Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.