Вы можете использовать модуль кода для создания меню.
Sub CreateMenu(Act As Activity)
Act.AddMenuItem("m1", "m1")
Act.AddMenuItem("m2", "m2")
Act.AddMenuItem("m3", "m3")
End Sub
Затем вы можете вызвать этот метод из других действий. События будут обрабатываться в каждом действии.