Καθορίστε ποιο κουμπί CommandBar ξεκίνησε μια μακροεντολή χρησιμοποιώντας VBA στο Microsoft Excel

Anonim

Αφήστε τις μακροεντολές να καθορίσουν το ίδιο το κουμπί CommandBar που τις ξεκίνησε.
Εάν επισυνάψετε την παρακάτω μακροεντολή σε πολλά κουμπιά CommandBar, το γραμματοκιβώτιο θα εμφανίσει διαφορετικά περιεχόμενα:

Sub DummyMacro () If Application.CommandBars.ActionControl Is Nothing Τότε "η μακροεντολή δεν ξεκίνησε από ένα κουμπί γραμμής εντολών MsgBox" Αυτό μπορεί να είναι η μακροεντολή σας που τρέχει! ", VbInformation, _" Αυτή η μακροεντολή δεν ξεκίνησε από ένα κουμπί CommandBar "Άλλο" η μακροεντολή ξεκίνησε από ένα κουμπί γραμμής εντολών MsgBox "Αυτή η μακροεντολή μπορεί να εκτελείται!", vbInformation, _ "Αυτή η μακροεντολή ξεκίνησε από αυτό το κουμπί CommandBar:" & _ Application.CommandBars.ActionControl.Caption End If End Sub