Add items to WORD standard toolbar

[SysAdmMke]

How would I add the SAVEAS icon to the Word 2003 standard toolbar using vbscript?

Thanks
Mike

 

[GrimR]

You would need to do it in VBA. Open word record a macro add your button stop recording, save it as a add-in for redistribution.
Lot's of tut's on the net

 

[Remou]

You can use automation:

msoControlButton=1
msoButtonCaption=2
SaveAsID=748
PositionBefore=1

Set ws=CreateObject("Word.Application")
ws.Visible=True

ws.Documents.Open "C:\Docs\Tek-Tips.doc"
ws.CustomizationContext = ws.ActiveDocument.AttachedTemplate
ws.CommandBars("Standard").Controls.Add msoControlButton, SaveAsID, PositionBefore

Set ctl = ws.CommandBars.FindControl (msoControlButton, SaveAsID)

ctl.Style = msoButtonCaption

 

[Remou]

Oops. Add another comma here:

[tt]ws.CommandBars("Standard").Controls.Add msoControlButton, SaveAsID,[red],[/red] PositionBefore[/tt]