EXCEL - 命令按钮单击以在前面打开文档答案

【问题标题】：EXCEL - Commandbutton click to open document IN FRONTEXCEL - 命令按钮单击以在前面打开文档
【发布时间】：2016-10-28 20:48:55
【问题描述】：

我正在使用以下代码从用户窗体打开文档。它工作正常，文档打开，但它在后台打开，用户可能不知道文件已打开，除非他们看到任务栏上的 Word 图标闪烁。如何获取此代码以确保文档在他们正在使用的 Excel 文档前面打开？任何帮助将不胜感激，祝您有美好的一天！

Private Sub SPECDOC_Click()
On Error Resume Next
Set appWD = CreateObject("Word.Application")
appWD.Visible = True
appWD.Documents.Open FileName:="File Location"
End Sub

【问题讨论】：

无论你有UserForm1.Show（假设名称），尝试输入UserForm1.Show vbModeless。此外，check out this link 似乎与您要做的事情非常相似。 :)

标签： excel vba userform

【解决方案1】：

这似乎有效，希望它在未来对其他人有所帮助：

Private Sub SPECDOC_Click()
On Error Resume Next
Set appWD = CreateObject("Word.Application")
appWD.Visible = True
appWD.Activate
appWD.Documents.Open FileName:="File Location"
End Sub

【讨论】：