复制Word文档/实例而不保存

时间:2018-06-11 06:39:08

标签: vb.net ms-word

我尝试复制整个格式化文本(也有表格):

Dim Type As Microsoft.Office.Interop.Word.WdRecoveryType

[...]

actDoc.Range().Copy()
newDoc.Range().PasteAndFormat(Type)

粘贴时某些文字格式不正确(边距) - 所以它根本没有帮助。

我在这里找到的第二种方法:Copy-Content-from-one-Word-Document-to-another-in-C-VB.NET

Dim sourceDoc As New Document("source.docx")
Dim destinationDoc As New Document("target.docx")
For Each sec As Section In sourceDoc.Sections
    For Each obj As DocumentObject In sec.Body.ChildObjects
        destinationDoc.Sections(0).Body.ChildObjects.Add(obj.Clone())
    Next
Next
destinationDoc.SaveToFile("target.docx", FileFormat.Docx2010)
System.Diagnostics.Process.Start("target.docx")

...但我收到错误 - 正文不是版块中的成员。

那么 - 如何复制未保存的已打开文档或实例本身?或者有没有办法正确地解决所有事情?

提前致谢。

0 个答案:

没有答案