Hur man länkar ett makro till snabbmenyn
Vill du länka ett av dina makron med ett nytt kommando i snabbmenyn? Detta gör det särskilt enkelt för användare att hämta makrot: Klicka bara på en cell med höger musknapp och snabbmenyn är tillgänglig, som följande bild visar:
Du kommer redan att se ett nytt kommando i snabbmenyn i figuren. Det kallas "My New Order". Använd följande programkod för att integrera den nya posten:
Sub ContextMenuErwiden ()
Med Application.CommandBars ("Cell"). Controls.Add
.Caption = "Mitt nya kommando"
.OnAction = "Makro"
Sluta med
Avsluta Sub
I värdetilldelningen till egenskapen OnAction anger du namnet på ditt makro som ska länkas till det nya menyalternativet.
För att ta bort den nya posten från snabbmenyn, använd följande programkod:
Sub ContextMenuLoeschen ()
Application.CommandBars ("Cell"). Kontroller (Application.CommandBars ("Cell"). Controls.Count) .Delete
Avsluta Sub
Makrot tar bort den sista posten från snabbmenyn. Eftersom den nya posten läggs till här i förväg raderar makrot denna post från snabbmenyn.