在后台打开窗口

时间:2015-07-30 19:41:46

标签: excel excel-vba excel-2013 vba

我有3个输入框,当选择文档时,它会打开文档并填写一个选择框。使用Excel 2013这些窗口在文档前面打开,必须最小化才能选择下一个窗口。有没有办法让它自动在后台打开文档?

Workbooks.Open (file_path)
If Application.Version >= 15# Then
    ActiveWindow.WindowState = xlMinimized
End If

这就是我现在所拥有的,但是我宁愿在后台打开它而不是最小化它。我试图关闭该部件的屏幕更新,但这不起作用。

Application.ScreenUpdating = False
    Workbooks.Open (file_path)
Application.ScreenUpdating = True

Application.ScreenUpdating中的WorkBooks.open会影响Excel 2013吗?

1 个答案:

答案 0 :(得分:0)

Application.ScreenUpdating不适用于excel 2013。

您可以尝试创建功能:

<div id="c3" class="left"><img src="https://dummyimage.com/300x200/000/fff" style="width:100px"/></div>

致电请求:

  1. 调用myScreenUpdate(False,previousScreenUpdate)
  2. 调用myScreenUpdate(True,previousScreenUpdate)

    Sub myScreenUpdate(screenUpdateRequest As Boolean, previousScreenUpdate As Boolean)
        If screenUpdateRequest Then
            Application.ScreenUpdating = previousScreenUpdate
        Else
            previousScreenUpdate = Application.ScreenUpdating
            Application.ScreenUpdating = False
        End If
    End Sub