Создайте панель инструментов Outlook 2003, используя VBA

StackOverflow https://stackoverflow.com/questions/3796622

  •  05-10-2019
  •  | 
  •  

Вопрос

В Excel 2003 я могу получить доступ к коллекции Application.CommandBars Для создания пользовательских панелей инструментов с использованием VBA. Есть ли эквивалент в Outlook 2003?

Я пытаюсь изменить этикетки на кнопках панели инструментов клиента. В будущем я хотел бы создать панель инструментов с нуля.

Ура, Дэйв

--Триндаз на Феданге # Outlook-VBAS

Это было полезно?

Решение

Оказался решением этого сам. Вот код, если вы заинтересованы:

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
Лицензировано под: CC-BY-SA с атрибуция
Не связан с StackOverflow
scroll top