苦恼:对于记录着重要数据的表格,一旦卡机数据丢失,追悔莫及! 需求:能否实时保存我正在编辑的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 代码解说:
注意事项: 上述操作后,需要另存*.xlsm格式的文件哦! 以上。 图文制作:赵中山 |
|
来自: hercules028 > 《excel》