关闭VBA中“失去焦点”的表格？

Question

我有一个VBA应用程序，它显示一个带有控件的表单。 我试图找到一种方法来关闭表单，如果用户点击它之外的任何地方。

我的VBA应用程序不在Excel中，因此我无法使用Worksheet.SelectionChange事件

Answer 1

我在这里找到了解决这个难题的绝妙方法：

https://sites.google.com/site/msaccesscode/forms-1/howtoclosepopupnonmodalformwhenitlosesfocus

此方法使用弹出式窗体的Timer事件来不断检查弹出式窗体是否为活动窗体。如果是这样，则表单保持打开状态。如果没有，它将关闭。