Muokkaa hiiren kakkospainikkeella olevaa valikkoa kutsuaksesi makro - VBA -koodiesimerkkejä

Soita makro napsauttamalla hiiren kakkospainikkeella

Tässä on koodi, jonka avulla käyttäjä voi valita makron oletusvalikosta, joka tulee näkyviin sen jälkeen, kun hän on napsauttanut solua hiiren kakkospainikkeella.

1. Aseta seuraava koodi ThisWorkbook -koodi -ikkunaan

 Private Sub Workbook_Open () Dim MyMenu Object Set MyMenu = Application.ShortcutMenus (xlWorksheetCell) _ .MenuItems.AddMenu ("Tämä on oma valikko", 1) MyMenu.MenuItems .Lisää "MyMacro1", "MyMacro1", 1 , "" .Lisää "MyMacro2", "MyMacro2",, 2, "" End With Set MyMenu = Nothing End Sub

2. Laita seuraava koodi moduuliin

 Julkinen Sub mymacro1 () MsgBox "Makro1 hiiren kakkospainikkeella" Lopeta Sub Public Public Sub mymacro2 () MsgBox "Makro2 hiiren kakkospainikkeella" End Sub

3. Sulje työkirja ja avaa se uudelleen!