Créer une barre d'outils Outlook 2003 en utilisant VBA

Question

Dans Excel 2003, je peux accéder à la collection Application.CommandBars pour créer des barres d'outils personnalisées à l'aide VBA. Y at-il un équivalent dans Outlook 2003?

Je suis en train de changer les étiquettes sur les boutons d'une barre d'outils client. À l'avenir, je voudrais créer la barre d'outils à partir de zéro.

Cordialement, Dave

- Trindaz sur Fedang # Outlook VBAs

Answer 1

Ended jusqu'à la résolution de celui-ci moi-même. Voici le code si vous êtes intéressé:

Dim expExplorer As Outlook.Explorer
Dim cmbCommandBar As CommandBar
Dim ctlBarControl As CommandBarControl
For Each expExplorer In Outlook.Explorers
    For Each cmbCommandBar In expExplorer.CommandBars
        If cmbCommandBar.Name = "name-of-toolbar" Then
            For Each ctlBarControl In cmbCommandBar.Controls
                If ctlBarControl.Caption = "caption-i-want-to-change" Then
                    ctlBarControl.Caption = "new-caption-text"
                End If
            Next ctlBarControl
        End If
    Next cmbCommandBar
Next expExplorer