With ActiveDocument
.XMLSaveDataOnly = False
.XMLUseXSLTWhenSaving = False
.XMLSaveThroughXSLT = ""
.XMLHideNamespaces = False
.XMLShowAdvancedErrors = False
.XMLSchemaReferences.HideValidationErrors = False
.XMLSchemaReferences.AutomaticValidation = True
.XMLSchemaReferences.IgnoreMixedContent = False
.XMLSchemaReferences.AllowSaveAsXMLWithoutValidation = True
.XMLSchemaReferences.ShowPlaceholderText = False
End With
ActiveDocument.SaveAs2 FileName:= _
"\\dcs-files\profiles\dcs-Ales\asdasd.xml", FileFormat:=wdFormatXML, _
LockComments:=False, Password:="", AddToRecentFiles:=True, WritePassword _
:="", ReadOnlyRecommended:=False, EmbedTrueTypeFonts:=False, _
SaveNativePictureFormat:=False, SaveFormsData:=False, SaveAsAOCELetter:= _
False, CompatibilityMode:=0