Outlook (的 OutlookBarGroup.Shortcuts 屬性)
會傳回包含在快捷方式窗格中的 OutlookBarShortcuts快捷方式 集合。 唯讀。
語法
expression。 Shortcuts
表達 代表 OutlookBarGroup 物件的變數。
範例
此 Microsoft Visual Basic for Applications (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
另請參閱
支援和意見反應
有關於 Office VBA 或這份文件的問題或意見反應嗎? 如需取得支援服務並提供意見反應的相關指導,請參閱 Office VBA 支援與意見反應。