Propiedad OutlookBarGroup.Shortcuts (Outlook)
Devuelve una colección OutlookBarShortcuts de accesos directos incluidos en el panel de accesos directos. Solo lectura.
Sintaxis
expresión. Shortcuts
Expresión Variable que representa un objeto OutlookBarGroup .
Ejemplo:
En este ejemplo de Microsoft Visual Basic para aplicaciones (VBA), se elimina todos los grupos vacíos del panel de accesos directos.
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
Consulte también
Soporte técnico y comentarios
¿Tiene preguntas o comentarios sobre VBA para Office o esta documentación? Vea Soporte técnico y comentarios sobre VBA para Office para obtener ayuda sobre las formas en las que puede recibir soporte técnico y enviar comentarios.