custom menu to the Word's 'File' menu

[vlad]

I need to add a custom menu to the Word's 'File' menu.
How can I do this?

 

[vlad]

Well, I've created some code to add the menu item I need:

Sub AddSaveToWFMenu()
Dim FileMenu As CommandBarPopup
Dim MyControl As CommandBarControl

Set FileMenu = CommandBars("Menu Bar").Controls(1)
Set MyControl = FileMenu.Controls.Add(Type:=msoControlButton, Before:=4,
Temporary:=True)
MyControl.Caption = "Save to Workflow"
MyControl.OnAction = "SaveToWF"
End Sub

Sub SaveToWF()
MsgBox "Success!!!" ' just to make sure it works
End Sub

Now I have the next questions:
how can I set an icon for this item? and
how can I make this menu item permanent? I would like my setup program to be
able to do it on any PC.

Thanks again,
vlad.