Bestimmen Sie mit VBA in Microsoft Excel, welche CommandBar-Schaltfläche ein Makro gestartet hat

Anonim

Lassen Sie die Makros selbst bestimmen, welche CommandBar-Schaltfläche sie gestartet hat.
Wenn Sie das folgende Makro an mehrere CommandBar-Schaltflächen anhängen, zeigt die Messagebox unterschiedliche Inhalte an:

Sub DummyMacro() If Application.CommandBars.ActionControl Is Nothing Then ' das Makro wurde nicht über eine Befehlsleistenschaltfläche gestartet MsgBox "Das könnte Ihr Makro sein!", vbInformation, _ "Dieses Makro wurde nicht über eine CommandBar-Schaltfläche gestartet" Else ' das Makro wurde über eine Befehlsleistenschaltfläche gestartet MsgBox "Das könnte Ihr Makro sein!", vbInformation, _ "Dieses Makro wurde über diese Befehlsleistenschaltfläche gestartet: " & _ Application.CommandBars.ActionControl.Caption End If End Sub