Määrake, milline CommandBari nupp käivitas makro, kasutades Microsoft Excelis VBA -d

Las makrod määravad ise, milline käsuriba nupp neid käivitas.
Kui lisate alloleva makro mitmele käsuriba nupule, kuvatakse sõnumikastis erinev sisu:

Sub DummyMacro () If Application.CommandBars.ActionControl Is Nothing Siis 'makro ei käivitatud käsuriba nupult MsgBox "See võib olla teie makro töötab!", VbInformation, _ "Seda makro ei käivitatud käsuriba nupult" Muu " makro käivitati käsuriba nupult MsgBox "See võib olla teie makro!", vbInformation, _ "See makro käivitati sellest CommandBar nupust:" & _ Application.CommandBars.ActionControl.Caption End If End Sub