06-45.598553 contact@hpvl.nl

Diverse scripts

t Personal Shortcut menu 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”, ,...