使用VBA創建Outlook 2003工具欄

Question

在Excel 2003中，我可以訪問集合Application.CommandBars以使用VBA創建自定義工具欄。在Outlook 2003中是否有相同的功能？

我正在嘗試更改客戶工具欄按鈕上的標籤。將來我想從頭開始創建工具欄。

乾杯，戴夫

--Trindaz上Fedang＃端起來解決這個一個自己的Outlook VBAS

Answer 1

。這裏的代碼，如果你有興趣：

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