Domanda

In Excel 2003 ho può accedere al Application.CommandBars collezione per creare barre degli strumenti personalizzate utilizzando VBA. Esiste un equivalente in Outlook 2003?

Sto cercando di modificare le etichette sui pulsanti di una barra degli strumenti del cliente. In futuro mi piacerebbe creare la barra degli strumenti da zero.

Saluti, Dave

- Trindaz su Fedang # Outlook-vbas

È stato utile?

Soluzione

Abbiamo finito per risolvere questo uno io. Ecco il codice, se siete interessati:

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
Autorizzato sotto: CC-BY-SA insieme a attribuzione
Non affiliato a StackOverflow
scroll top