Zjistěte, které tlačítko CommandBar spustilo makro pomocí jazyka VBA v aplikaci Microsoft Excel

Nechte makra určit, které tlačítko CommandBar je spustilo.
Pokud níže uvedené makro připojíte k více tlačítkům CommandBar, zobrazí se v okně zpráv jiný obsah:

Sub DummyMacro () If Application.CommandBars.ActionControl Is Nothing Then 'the macro was not started from a commandbar button MsgBox "This might be your macro running!", VbInformation, _ "This macro was not started from a CommandBar button" Else " makro bylo spuštěno z tlačítka na příkazovém panelu MsgBox „Může to být spuštěné vaše makro!“, vbInformation, _ "Toto makro bylo spuštěno z tohoto tlačítka CommandBar:" & _ Application.CommandBars.ActionControl.Caption End If End Sub