如何打开附加超链接(本地内联网上的 Word 文档)并将其置于最前面?

如何打开附加超链接(本地内联网上的 Word 文档)并将其置于最前面?

我有一张包含指向我的本地内联网网络文件的超链接的 Excel 表。

超链接地址如下: http://maxapp.local:90/allhelipa.doc

问题:

如果已经有一个打开的 Word 文档,然后我单击超链接(本地内联网上的 Word 文档),后面的文件不会自动打开,我必须单击闪烁的任务栏按钮来打开引用的第二个文件。

此问题仅发生在我的本地内联网上找到的 Microsoft Word 文档中。

如果没有打开的文档并且我单击了任何单词超链接,它会正常打开而没有任何问题。

我尝试将相同的 Word 文档放在我的工作中共享文件夹并将超链接地址设置到相应的位置。

打开附加超链接(Word 文档)没有任何问题,并且它会自动置于前面,而无需我单击闪烁的任务栏按钮。

是否有任何可应用的选项或任何可使用的注册表设置?

答案1

我无法重现您的问题(Office 365),所以我无法测试我提出的解决方案......

请在 Word 中使用此事件normal.dotm,如果您的问题与 Word 文档类型有关:

Private Sub Document_Open()
    If Application.Documents.Count > 1 Then
        AppActivate Application.ActiveWindow.Caption
    End If
End Sub

理论上,它应该在文档打开时激活 Word 应用程序。

如果这样不行,API 调用(可能SetForegroundWindow)应该可以完成工作。我尝试避免使用 API,如果这个简单的解决方案对您有用...

我使用以下代码从 Excel 对其进行了测试:

Sub testActivateWord()
    Dim objWd As Object
    Set objWd = GetObject(, "Word.Application")

    AppActivate objWd.ActiveWindow.Caption
    Set objWd = Nothing
End Sub

并且它完成了工作......

它需要针对尚未打开 Word 会话的情况进行错误处理,但这很简单。我的意思是,在 Excel 中。而 WordApplication适用Application于所有情况。:)

相关内容