Partager via


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

Objet OutlookBarGroup

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.