自动保存Personal.xls
我在Windows 7 Professional安装程序上使用Excel 2003。 在我的Personal.xls文件中,我已经编译了我从不同地方获得的代码/公式的片段,以便在使用Excel时可供参考。 这些包含一些volatile函数,比如cell()
, rand()
, today()
等。因此,当我closuresExcel时,它询问我是否要保存Personal.xls。
我想保持我的Personal.xls,因为它,但以某种方式禁用popup。 我很好,保存,而不是保存,因为我不会改变Personal.xls。
我已经在Workbook_BeforeClose
部分的personal.xls中尝试了以下代码
Private Sub Workbook_BeforeClose(Cancel As Boolean) ThisWorkbook.Save End Sub
但似乎没有工作。 我尝试了一些变化,包括.Save
和.Saved=True
,并试图交替使用ThisWorkbook.
, Me.
& Workbooks("PERSONAL.xls")
。 但是,Excel仍然要求我保存Personal.xls
我也试图在我的Personal.xls中禁用计算。
Private Sub Workbook_Open() For Each ws In ThisWorkbook.Worksheets ws.EnableCalculation = False Next End Sub
这也不能解决问题。 最后,我尝试在将计算模式更改为手动之后执行“ThisWorkbook.Save”,但这也不会改变任何内容。
我在这里错过了什么? 任何意见,将不胜感激。 提前致谢!
你要:
Me.Save
在您的工作簿BeforeClose事件。
我不知道这是否会帮助你,但我已经尝试运行,我可以保存..请不要投票它为你的身边工作。
我只是删除取消为布尔值
Private Sub Workbook_BeforeClose() ThisWorkbook.Save End Sub