巧解Excel遇断电、蓝屏数据丢失的尴尬

苦恼：对于记录着重要数据的表格，一旦卡机数据丢失，追悔莫及！

需求：能否实时保存我正在编辑的Excel表格呢？

实际操作情况：

在操作过程中，不进行任何的手动保存操作，看看结果。

【1】在单元格中输入“Excel”，不退出单元格的编辑状态

【2】用任务管理器结束Excel程序。

【3】打开刚才结束的Excel文件，看看“Excel”的输入是否保存？

【4】很显然在编辑的时候突然被结束掉，“Excel”显然是没有被保存的。

解决方案：

【1】右键选中工作表名，在弹出的菜单中选中“查看代码”

【2】在代码界面中，选择工作表改变事件 Change 。

【3】输入 ThisWorkbook.Save  这一句代码即可。

【4】另存为后缀名为.xlsm的宏文件。

见证奇迹的时刻：

【1】单元格中输入“Excel”且保持编辑状态

【2】结束该Excel程序

【3】再打开刚才结束的程序

【4】看，输入的“Excel”被保存了。

思路阐述：

利用单元格改变事件，在单元格发生改变的时候保存工作簿。

'当用户更改工作表中的单元格，或外部链接引起单元格的更改时发生此事件。Private Sub Worksheet_Change(ByVal Target As Range)ThisWorkbook.Save'当前工作簿 保存End Sub

代码解说：

Private Sub Worksheet_Change(ByVal Target As Range)

ThisWorkbook.Save'保存当前工作簿所做的更改

End Sub

注意事项：

上述操作后，需要另存*.xlsm格式的文件哦！

以上。

图文制作：赵中山