VBA无法识别正确数量的MS Word窗口/打开的文档

Question

在我工作的地方，我们有将xml文件转换为word文档的软件。唯一的问题是，它一次只能创建1个xml文件，一次只能生成1个单词文档。我正在尝试找到一种方法将所有word文档合并为1。这是我想出的代码。

Sub merge()
Dim myDoc As Documents
Dim count As Integer

Set myDoc = Documents
count = myDoc.count

If count <> 1 Then
   For i = 1 To count - 1
      myDoc(i).Select
      Selection.WholeStory
      Selection.Copy
      myDoc(count).Range.Select
      Selection.EndKey Unit:=wdLine
      Selection.TypeParagraph
      Selection.Paste
   Next i
Else
    MsgBox ("No other documents open")
End If

End Sub

我遇到的唯一问题是，当软件将xml文件转换为Word文档时，即使已在MS Word中打开，VBA也无法识别任何转换后的文档。如果我运行“ application.windows.count或documents.count”之类的代码，它将无法识别它。如果我打开任何其他文档，则代码会将所有内容合并在一起。但是从软件转换后的文档无法合并。我可以采取什么措施来迫使MS Word识别转换后的文档？