Word VBA:Documents.add:将此新文档放在顶部

Question

我正在使用VBA进行MS Word。我创建了一个宏文件 (docm( 以使用documents.add创建一个新的 Word 文档....

我想在屏幕上从我的宏文档切换到我新创建的文档：

Sub test()
Dim MacroDocument As Document
Set MacroDocument = ActiveDocument
Dim newDocument As Document
Set newDocument = Documents.Add
'try to show my macroDocument on the windows screen,
MacroDocument.Select
stop
' now to the new document
newDocument.Select
End Sub

为什么不起作用？

有什么想法吗？

Answer 1

document.Select只选择文档，但不显示它。

请改用MacroDocument.Activate和newDocumente.Activate。

Answer 2

添加文档时，新文档会自动成为活动文档，并将替换屏幕上的当前文档。因此，在大多数情况下，任务不是让它显示，而是将前一个保持在顶部。在这种情况下，使新文档不可见是您可能需要考虑的选项之一。Set NewDocument = Documents.Add(Visible:=False)