ボタンを追加アドインメニュー①(VBA-Excel)プログラム試験
Автор: そふとのイトウ
Загружено: 2026-01-12
Просмотров: 7
Описание:
(D0001)mv【応用】アドインメニューへボタンを追加する試験①
【目次】
1.アドインメニューへボタンを追加
2.登録したボタンよりメニューを実行
-----------------------------------
≪使用したソースプログラム≫
/////////「Module1モジュール」
Option Explicit
' ***********************************************
' コマンドバーを登録する
' ***********************************************
Function Open_CommandBar()
Dim myCmdBar As CommandBar
Dim myCmdBarBtn As CommandBarButton
Set myCmdBar = Application.CommandBars.Add(Name:="メニュー_試験", Temporary:=True)
Set myCmdBarBtn = myCmdBar.Controls.Add(Type:=msoControlButton)
myCmdBarBtn.Caption = "ユーザー専用ボタン(メニュー削除の実行)"
myCmdBarBtn.TooltipText = "Text_00"
myCmdBarBtn.Style = 2
myCmdBarBtn.OnAction = "OnAction_00"
myCmdBar.Position = 1
myCmdBar.Visible = True
End Function
' ***********************************************
' コマンドバーを削除
' ***********************************************
Function OnAction_00()
'
Application.CommandBars("メニュー_試験").Delete
MsgBox "ボタン削除プロシージャ実行中"
'
End Function
-----------------------------------
Повторяем попытку...
Доступные форматы для скачивания:
Скачать видео
-
Информация по загрузке:
![🔴 EXPRESS BIEDRZYCKIEJ | ARKADIUSZ MYRCHA, PROF. MARCIN MATCZAK [NA ŻYWO]](https://imager.clipsaver.ru/VjhtZK5XJnU/max.jpg)
