先前文档上的BeforeSave另存为事件的事件

问题描述

我有某种“警告”，以避免在未启用宏的情况下使用Excel工作表。在我的示例中，它是我的第一张纸上要求用户启用其宏的普通愚蠢矩形。当您打开矩形上的宏时，它是隐藏的，当文档关闭时，它再次可见。

Private Sub Workbook_Open()
    ThisWorkbook.Worksheets("sheet 1").Shapes.Range(Array("Rectangle 1")).Visible = False
End Sub

Private Sub Workbook_BeforeClose(Cancel As Boolean)
    ThisWorkbook.Worksheets("sheet 1").Shapes.Range(Array("Rectangle 1")).Visible = True
End Sub

代码运行良好，直到将文档“另存为”，另存为时不会触发BeforeClose中的事件。如果存在一个“ BeforeSave”事件，则该布尔值是否为“另存为”，但是此事件将在保存的新文档上触发，而不是在旧文档/上一个文档上触发。问题是当我打开旧文档时，矩形是不可见的，因为它在打开时是隐藏的，但是通过“ BeforeClose”事件无法再次设置为可见。

任何想法如何解决这个问题？在将其另存为或类似名称之前，我应该在“上一个”文档上调用此代码。

解决方法

暂无找到可以解决该程序问题的有效方法，小编努力寻找整理中！

如果你已经找到好的解决方法，欢迎将解决方案带上本链接一起发送给小编。

小编邮箱:dio#foxmail.com (将#修改为@）

excel excel save-as