Propriété OutlookBarGroup.Shortcuts (Outlook)
Renvoie une collection OutlookBarShortcuts de raccourcis contenus dans le volet Raccourcis . En lecture seule.
Syntaxe
expression. Shortcuts
Expression Variable qui représente un objet OutlookBarGroup .
Exemple
Cet exemple Microsoft Visual Basic pour Applications (VBA) supprime tous les groupes vides dans le volet Raccourcis .
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
Voir aussi
Assistance et commentaires
Avez-vous des questions ou des commentaires sur Office VBA ou sur cette documentation ? Consultez la rubrique concernant l’assistance pour Office VBA et l’envoi de commentaires afin d’obtenir des instructions pour recevoir une assistance et envoyer vos commentaires.