Office) (CommandBars.ActiveMenuBar 屬性

發行項
04/07/2023

會取得代表容器應用程式中的使用中功能表列的 CommandBar 物件。唯讀。

注意事項

[!注意事項] CommandBars 用於部分的 Microsoft Office 應用程式已經由 Microsoft Office Fluent 使用者介面的新功能區元件取代。如需詳細資訊，請參閱 Office Fluent 功能區概觀。

語法

運算式。ActiveMenuBar

表達代表 CommandBars 物件的 變數。

範例

本範例會將名為 Custom 的暫存快顯控制項新增至使用中功能表列的結尾，並將名為 Import 的控制項新增至快顯控制項。

Set myMenuBar = CommandBars.ActiveMenuBar 
Set newMenu = myMenuBar.Controls.Add(Type:=msoControlPopup, Temporary:=True) 
newMenu.Caption = "Custom" 
Set ctrl1 = newMenu.CommandBar.Controls _ 
    .Add(Type:=msoControlButton, Id:=1) 
With ctrl1 
    .Caption = "Import" 
    .TooltipText = "Import" 
    .Style = msoButtonCaption 
End With

另請參閱

CommandBars 物件成員

支援和意見反應

有關於 Office VBA 或這份文件的問題或意見反應嗎？如需取得支援服務並提供意見反應的相關指導，請參閱 Office VBA 支援與意見反應。