为什么.SaveAs rtf会破坏文档中的样式(Word 2016)

时间:2018-11-28 12:30:01

标签: vba ms-word rtf

我有一个DOCX文件形式的文件(欧洲法学)。当我将其保存到RTF时,重新打开后具有不同的编号样式。为什么?

我的工作流程:

  1. 打开文件
  2. 宏SaveAsRtfTest-一切看起来都很好
  3. 关闭文件
  4. 重新打开RTF文件-不好

我的简单宏:

Private Sub SaveAsRtfTest()
  Dim fileName1 As String
  fileName1 = Replace(ActiveDocument.fullName, ".docx", ".rtf", , , vbTextCompare)
  ActiveDocument.SaveAs fileName:=fileName1, FileFormat:=wdFormatRTF, AddToRecentFiles:=False
End Sub

但是当我手动保存时,会出现相同的问题。

非常重要!仅在关闭和打开RTF文件后,编号才可见。

screen

文件(docx和rtf): https://1drv.ms/f/s!AnanHEI101rbhf8vgkipTUNwvXUQ4w

编辑____

我已经比较了ActiveDocument.Range.xml内容。

这是RTF文件的屏幕截图中显示的部分:

<w:p wsp:rsidR="0026237B" wsp:rsidRPr="004F6791" wsp:rsidRDefault="0026237B" wsp:rsidP="0026237B">
    <w:pPr>
        <w:pStyle w:val="ECHRHeading1"/>
        <w:listPr>
            <wx:t wx:val="Artykuł I."/>
            <wx:font wx:val="Times New Roman"/>
        </w:listPr>
    </w:pPr>
    <w:r wsp:rsidRPr="004F6791">
        <w:t>I.  THE CIRCUMSTANCES OF THE CASE</w:t>
    </w:r>
</w:p>

与DOCX相比:

<w:p wsp:rsidR="00A32B8B" wsp:rsidRPr="004F6791" wsp:rsidRDefault="00A32B8B" wsp:rsidP="00A32B8B">
    <w:pPr>
        <w:pStyle w:val="ECHRHeading1"/>
    </w:pPr>
    <w:r wsp:rsidRPr="004F6791">
        <w:t>I.  THE CIRCUMSTANCES OF THE CASE</w:t>
    </w:r>
</w:p>

0 个答案:

没有答案