Quote:
Sub Macro1()
'
' Macro1 Macro
' Macro created 20/10/2011 by Stephen Lawrence
'
ActiveDocument.SaveAs FileName:="S:\Digital Signage\LW shop floor.htm", FileFormat:=wdFormatHTML, _
LockComments:=False, Password:="", AddToRecentFiles:=True, WritePassword _
:="", ReadOnlyRecommended:=False, EmbedTrueTypeFonts:=False, _
SaveNativePictureFormat:=False, SaveFormsData:=False, SaveAsAOCELetter:= _
False
End Sub
Save the Macro and close the VB screen, you will now need to create an icon on the toolbar to allow the user to run the macro. To do this right click on the toolbar, select ‘customise’, enter the ‘commands’ tab then scroll down and select ‘macros’ in the menu. On the right you will see an icon with your chosen macro name against it, simply drag this icon to the toolbar.