添加隐藏启动工作簿后，如何自动打开空白Excel工作簿？

我之前在网络上搭建了一个替代启动位置，用来存储和分发宏相关的两个文件：一个.xslb文件和一个.xla文件。但遇到了个麻烦——通过指向这个启动位置的快捷方式打开Excel时，不会自动弹出空白工作簿，每次都得手动新建，挺影响效率的。

后来我尝试在启动文件的ThisWorkbook Excel对象里添加了一段VBA代码，完美解决了这个问题。代码逻辑很直观：当启动工作簿打开时，检查当前已打开的工作簿总数，如果数量≤2（毕竟启动时默认会加载我们的两个宏文件），就自动新建一个空白工作簿。

具体代码如下：

Option Explicit
Private Sub Workbook_Open()
    If Workbooks.Count <= 2 Then
        Workbooks.Add
    End If
End Sub

内容的提问来源于stack exchange，提问作者Andy Keller