Microsoft Excel'de VBA kullanarak bir makroyu başlatan CommandBar düğmesini belirleme

Anonim

Onları başlatan CommandBar düğmesinin kendilerinin belirlemesine izin verin.
Aşağıdaki makroyu birden çok CommandBar düğmesine eklerseniz, mesaj kutusu farklı içerikler görüntüler:

Sub DummyMacro() If Application.CommandBars.ActionControl Is Nothing Then ' makro bir komut çubuğu düğmesinden başlatılmadı MsgBox "Bu, çalışan makronuz olabilir!", vbInformation, _ "Bu makro bir CommandBar düğmesinden başlatılmadı" Diğer ' makro bir komut çubuğu düğmesinden başlatıldı MsgBox "Bu, çalışan makronuz olabilir!", vbInformation, _ "Bu makro şu CommandBar düğmesinden başlatıldı: " & _ Application.CommandBars.ActionControl.Caption End If End Sub