Range.ExportFragment (Word)
Exporta o intervalo selecionado no documento para uso como fragmento do documento.
ExportFragment (FileName, Format)
Dim strFileName As String: strFileName =
ActiveDocument.Range.ExportFragment FileName:=strFileName, Format:=wdFormatDocument
Arguments
O seguinte argumento é opcional
FileName (String) - Especifica o caminho e o nome do arquivo do arquivo no qual salvar o fragmento do documento.
Format (WdSaveFormat) - Especifica o formato de arquivo do arquivo de fragmento do documento.
Aqui você pode encontrar os valores possíveis para