Desnom tipkom miša kliknite za pozivanje makronaredbi
Evo nekoliko koda koji će omogućiti korisniku da odabere vašu makronaredbu sa zadanog izbornika koji se pojavi nakon što desnom tipkom miša kliknu ćeliju.
1. Stavite sljedeći kôd u prozor koda ThisWorkbook
Private Sub Workbook_Open () Dim MyMenu As Object Set MyMenu = Application.ShortcutMenus (xlWorksheetCell) _ .MenuItems.AddMenu ("Ovo je moj prilagođeni izbornik", 1) S MyMenu.MenuItems .Dodajte "MyMacro1", "MyMacro1", 1 ,, "" .Dodajte "MyMacro2", "MyMacro2",, 2,, "" End With Set MyMenu = Nothing End Sub
2. Stavite sljedeći kôd u modul
Javni Sub mymacro1 () MsgBox "Makro1 s izbornika desnom tipkom miša" Završi podjavni javni Sub mymacro2 () MsgBox "Makro2 iz izbornika desnog klika" Završi pod
3. Zatvorite radnu knjižicu i ponovno je otvorite!