Rediger højreklikmenuen for at kalde en makro - VBA -kodeeksempler

Højreklik for at kalde en makro

Her er en kode, der giver en bruger mulighed for at vælge din makro fra standardmenuen, der vises, efter at de har højreklikket på en celle.

1. Indsæt følgende kode i vinduet ThisWorkbook -kode

 Private Sub Workbook_Open () Dim MyMenu As Object Set MyMenu = Application.ShortcutMenus (xlWorksheetCell) _ .MenuItems.AddMenu ("This is my Custom Menu", 1) With MyMenu.MenuItems .Add "MyMacro1", "MyMacro1",, 1, ,, "". Tilføj "MyMacro2", "MyMacro2",, 2,, "" End With Set MyMenu = Nothing End Sub

2. Indsæt følgende kode i et modul

 Offentlig Sub mymacro1 () MsgBox "Makro1 fra en højreklikmenu" Afslut sub Offentlig under mymacro2 () MsgBox "Makro2 fra en højreklikmenu" Afslut sub

3. Luk din projektmappe, og åbn igen!