苦惱：對(duì)于記錄著重要數(shù)據(jù)的表格，一旦卡機(jī)數(shù)據(jù)丟失，追悔莫及！
需求：能否實(shí)時(shí)保存我正在編輯的Excel表格呢？
實(shí)際操作情況：
在操作過(guò)程中，不進(jìn)行任何的手動(dòng)保存操作，看看結(jié)果。
【1】在單元格中輸入“Excel”，不退出單元格的編輯狀態(tài)
【2】用任務(wù)管理器結(jié)束Excel程序。
【3】打開(kāi)剛才結(jié)束的Excel文件，看看“Excel”的輸入是否保存？
【4】很顯然在編輯的時(shí)候突然被結(jié)束掉，“Excel”顯然是沒(méi)有被保存的。
解決方案：
【1】右鍵選中工作表名，在彈出的菜單中選中“查看代碼”
【2】在代碼界面中，選擇工作表改變事件 Change 。
【3】輸入 ThisWorkbook.Save 這一句代碼即可。
【4】另存為后綴名為.xlsm的宏文件。
見(jiàn)證奇跡的時(shí)刻：
【1】單元格中輸入“Excel”且保持編輯狀態(tài)
【2】結(jié)束該Excel程序
【3】再打開(kāi)剛才結(jié)束的程序
【4】看，輸入的“Excel”被保存了。
思路闡述：
利用單元格改變事件，在單元格發(fā)生改變的時(shí)候保存工作簿。
'當(dāng)用戶(hù)更改工作表中的單元格，或外部鏈接引起單元格的更改時(shí)發(fā)生此事件。Private Sub Worksheet_Change(ByVal Target As Range)ThisWorkbook.Save'當(dāng)前工作簿 保存End Sub
代碼解說(shuō)：
Private Sub Worksheet_Change(ByVal Target As Range)
ThisWorkbook.Save'保存當(dāng)前工作簿所做的更改
End Sub
注意事項(xiàng)：
上述操作后，需要另存*.xlsm格式的文件哦！
以上。
圖文制作：趙中山
本站僅提供存儲(chǔ)服務(wù)，所有內(nèi)容均由用戶(hù)發(fā)布，如發(fā)現(xiàn)有害或侵權(quán)內(nèi)容，請(qǐng)
點(diǎn)擊舉報(bào)。
