Add an item to the menu in Word (Views: 28)
Problem/Question/Abstract: How to add an item to the menu in Word Answer: { ... } var CBar: CommandBar; MenuItem: OleVariant; { ... } { Add an item to the File menu } CBar := Word.CommandBars['File']; MenuItem := CBar.Controls.Add(msoControlButton, EmptyParam, EmptyParam, EmptyParam, True) as CommandBarButton; MenuItem.Caption := 'NewMenuItem'; MenuItem.DescriptionText := 'Does nothing'; {Note that a VB macro with the right name must exist before you assign it to the item!} MenuItem.OnAction := 'VBMacroName'; { ... } |