Makro linkimine kontekstimenüüga
Kas soovite ühe oma makro ühendada kontekstimenüü uue käsuga? See muudab kasutajate jaoks makro avamise eriti lihtsaks: klõpsake hiire parema nupuga lahtril ja kontekstimenüü on saadaval, nagu on näidatud järgmisel joonisel:
Joonise kontekstimenüüs näete juba uut käsku. Selle nimi on "Minu uus tellimus". Uue kirje integreerimiseks kasutage järgmist programmi koodi:
Alamkontekst Menüü Erwiden ()
Koos Application.CommandBars ("Cell"). Controls.Add
.Caption = "Minu uus käsk"
.OnAction = "Makro"
Lõpeta
End Sub
Atribuudi OnAction väärtuse määramisel sisestage oma makro nimi, mis lingitakse uue menüüelemendiga.
Uue kirje eemaldamiseks kontekstimenüüst kasutage järgmist programmi koodi:
Alamkontekst Menüü Loeschen ()
Application.CommandBars ("Cell"). Juhtelemendid (Application.CommandBars ("Cell"). Controls.Count) .Delete
End Sub
Makro eemaldab kontekstimenüüst viimase kirje. Kuna uus kirje lisatakse siia eelnevalt, kustutab makro selle kirje kontekstimenüüst.