在其他屏幕（监视器）VBA中打开第二个excel工作簿

Question

我有两个显示器。 在右边，我有我的第一个宏工作簿。 我将如何使用位于第一个工作簿中的宏（VBA）打开左侧的第二个工作簿。 谢谢

Answer 1

如果您仅自己使用此文件并且始终在同一配置中，则可以使用一些快捷方式。
主监视器的left是 = 0。如果辅助监视器位于主监视器的左侧，则left将为某个数字 < 0（取决于分辨率）。
次要在右侧，然后left标记辅助监视器的开始将是left + excel 窗口的width （如果它已最大化）。
假设辅助监视器在左侧
这应该很好用

Option Explicit

Public Sub NewWbk()
    Dim Exl As Excel.Application

    Set Exl = New Excel.Application 
    'here you'll need to change to open your file instead of adding new empty file 
    Exl.Workbooks.Add 
    Exl.Visible = True
    With Exl.Application
        .WindowState = xlNormal 'can't move maximized window 
        .Left = -500 'should work on most resolutions
        .WindowState = xlMaximized
    End With

End Sub

但这是非常不可靠的解决方案，在许多情况下可能无法正常工作。 您应该做的是使用 API 调用，检查监视器的数量，检查您的应用程序在哪个监视器上可见，并决定在哪里打开新文件。
看看这里