Question

我正在通过访问2007 vba创建并打开word文档。文档已创建，但焦点不会转移到单词。相反，重点仍然放在创建文档的访问表单上。以下是我的代码：

Dim obj As Word.Application
Dim wor As Word.Document
Dim str As String

str = "C:\hello\folder1\vin.dot"

Set obj = CreateObject("Word.Application")
Set wor = obj.Documents.Add

With wor

 .SaveAs str

 .Close
End With


obj.Visible = True
obj.Documents.Open str

obj.WindowState = wdWindowStateMaximize

请提出任何意见。

Answer 1

您可以使用AppActivate移动焦点;

AppActivate "Microsoft Word"

Answer 2

VBA Word.Application对象可能有多个与之关联的Window。您可以使用其标题属性指定要显示的窗口。

由于您创建了一个新的Word.Application并且只创建了一个Document，因此您可以假设第一个元素（基于1的数组）是您希望在代码中显示的内容。

AppActivate (obj.Windows(1).Caption)

Microsoft访问vba-shift焦点从访问word

2 个答案: