ActiveDocument.SaveAs FileName:="Test1.htm",
           FileFormat:=102, LockComments:=False,
           Password:="", AddToRecentFiles:=True,
           WritePassword:="", ReadOnlyRecommended:=False,
           EmbedTrueTypeFonts:=False,
           SaveNativePictureFormat:=False,
           SaveFormsData:=False, 
           SaveAsAOCELetter:=False